Есть вопросы!

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
Vaseninbox
Сообщения: 34
Зарегистрирован: 05 сен 2008, 15:11
Контактная информация:

Уважаемые господа программисты!

Скажите,есть ли какой-то способ увидеть программный код .exe-файла?? И как вообще пишутся эти .exe-файлы?? Есть ли какие-нибудь ссылки на интернет-источники или мануалы, где с примерами показано как создаются exeшники???

P.S. Речь идёт о VBA,конечно же)
Аватара пользователя
Naeel Maqsudov
Сообщения: 2570
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

В VBA забудьте про это. Только VB. Там просто в меню выбирается команда "Скомпилировать" и получается exe-шник. Посмотреть в нем исходный код уже нельзя.
Vaseninbox
Сообщения: 34
Зарегистрирован: 05 сен 2008, 15:11
Контактная информация:

Спасибо за ответ! :)

Помогите плиз с новой проблемой.....

Есть "Книга.xls". В ней, на "Лист5", в конце дня становится заполненным диапазон "B1:E30".

Какой код создаст новую "Книгу.xls", в ней создаст всего один лист ("Лист1"), на этом листе в таком же порядке сохранит диапазон "B1:E30" и даст имя созданной книге,равное сегодняшней дате??
Teslenko_EA
Сообщения: 526
Зарегистрирован: 04 фев 2007, 18:37
Откуда: Сургут
Контактная информация:

Здравствуйте Vaseninbox.
Поупражняйтесь с подобным кодом:

Код: Выделить всё

Sub saveDay()
Dim oNewWB As Workbook
Sheets("Лист3").Range("B1:E30").Copy ' к листу можно обращаться как по имени - Sheets("Лист5"), так и по индексу Sheets(5)
Set oNewWB = Workbooks.Add
With oNewWB.Sheets(1)
    .Range("B1").Select
    .Paste
End With
oNewWB.SaveAs Filename:=Format(Date, "yyyy.mm.dd") & ".xls", FileFormat:=xlNormal
oNewWB.Close
End Sub
Евгений.
Vaseninbox
Сообщения: 34
Зарегистрирован: 05 сен 2008, 15:11
Контактная информация:

Огромнейшее спасибо,Евгений!!!
Всё заработало!! :D Класс!!
Ответить