-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Как запустить макрос созданый в xls

Вторник, 04 Февраля 2014 г. 14:50 + в цитатник
Добрый день!

Редко пользуюсь Access, т.к. не знаком с программированием, но иногда приходиться полазить

Ситуация следующая, по кнопке происходит экспорт отчета из Access в EXCEL, по следующему коду:

Private Sub Кнопка100_Click()
On Error GoTo Err_Кнопка100_Click
Dim stDocName As String
stDocName = "DosingCheckList"
DoCmd.OutputTo acReport, stDocName
Exit_Кнопка100_Click:
Exit Sub
Err_Кнопка100_Click:
MsgBox Err.Description
Resume Exit_Кнопка100_Click
End Sub

При этом в EXCEL не правильно отображается время, необходимо выделять ячейки и менять формат времени. Для этого я записал макрос в EXCEL. Его код следующий:

Sub Data_macros()
'
' Data_macros макрос
' макрос записан 04.02.2014 (Master)
'

'
Columns("A:A").Select
Selection.NumberFormat = "h:mm:ss;@"
End Sub

Вопрос, для программистов, наверно простой, как это дело автоматизировать и выполнять последний макрос непосредственно по кнопке в Access, чтобы в EXCEL уже был нормальный формат даты. Подскажите, если не сложно.
Спасибо.

http://www.sql.ru/forum/1075339/kak-zapustit-makros-sozdanyy-v-xls


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку