Консультация № 175214
13.12.2009, 19:31
0.00 руб.
0 1 1

Уважаемые эксперты код ниже вставляет текущую дату, освобожденную от поля в формате "день одной цифрой & месяц в текстовом формате & год из четырёх цифр & г."
Selection.InsertDateTime DateTimeFormat:="d MMMM yyyy 'г.'", InsertAsField:=False, DateLanguage:=wdRussian, CalendarType:=wdCalendarWestern, InsertAsFullWidth:=False
Подскажите, каков код в ВБА : вставить в 6 строке 2 таблицы Вордовского документа текст «АВВ» & текущую дату, освобожденную от поля в этом формате. Спасибо Эндрю

Обсуждение

давно
Профессор
230118
3054
14.12.2009, 23:58
общий
это ответ
Здравствуйте, Ципихович Эндрю.

Попробуйте так.

Приложение:
Документ.Tables(2).Cell(6, 1).Range.Text = "ABB "
i = Selection.EndKey(Unit:=wdLine, Extend:=wdMove)
Selection.InsertDateTime DateTimeFormat:="d MMMM yyyy 'ã.'", InsertAsField:=False, DateLanguage:=wdRussian, CalendarType:=wdCalendarWestern, InsertAsFullWidth:=False
5
Форма ответа