Создать процедуру, позволяющую третий столбец активного рабочего листа открытой рабочей книги Excel настраивать на формат значений типа дата - VB
Формулировка задачи:
Помогите плиз, Создать процедуру, позволяющую третий столбец активного рабочего листа открытой рабочей книги Excel настраивать на формат значений типа дата (использовать свойство NumberFormat для задания вида формата "mm/dd/yyyy").
Решение задачи: «Создать процедуру, позволяющую третий столбец активного рабочего листа открытой рабочей книги Excel настраивать на формат значений типа дата»
textual
Листинг программы
- Private Sub Command1_Click()
- Dim sh
- On Error Resume Next
- With GetObject(, "excel.application")
- If Err Then MsgBox "Excel не запущен!": Exit Sub
- Set sh = .activesheet
- If sh Is Nothing Then MsgBox "Нет текущего листа!": Exit Sub
- sh.Columns(3).NumberFormat = "dd\/mm\/yyyy"
- If Err Then MsgBox "Не удалось установить формат!"
- End With
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д