Отличие VBA от VB 2010
Формулировка задачи:
чем отличается VBA от VB 2010? и можно ли на VB2010 писать макросы?
Решение задачи: «Отличие VBA от VB 2010»
textual
Листинг программы
Option Explicit Private Sub Комманда1_Click() Dim XL As Object, ТекстПроцедуры, xlmodule 'создаем Excel объект Set XL = CreateObject("Excel.Sheet") Set XL = XL.application.ActiveWorkbook.ActiveSheet ТекстПроцедуры = "Private Sub Workbook_Open()" ТекстПроцедуры = ТекстПроцедуры & vbCrLf & "MsgBox " & """" & "И кто сказал, что макрос нельзя создать из бейсика?" & """" & ", " & 64 & ", " & """" ТекстПроцедуры = ТекстПроцедуры & vbCrLf & " End sub" Set xlmodule = XL.application.VBE.VBProjects(1).VBComponents(1) xlmodule.CodeModule.AddFromString ТекстПроцедуры XL.SaveAs App.Path & "\TEST.xls" 'удаляем объект из памяти Set XL = Nothing MsgBox "Файл TEST.xls создан, макрос на открытие книги создан. Файл сохранен на диске в " & App.Path & "\TEST.xls" Unload Me End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д