Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Как написать приложение с добавлением коментария? (http://forum.oszone.net/showthread.php?t=241997)

Natasall 04-09-2012 17:07 1982907
Как написать приложение с добавлением коментария?
 
Задание такое:
1. Создать приложение в VBA, позволяющее создать примечание при открытии книги Excel.
даже незнаю как делать(((((((((((((

Iska 04-09-2012 18:56 1982981
Вставьте следующий код:
Код:
Option Explicit

Private Sub Workbook_Open()
    Dim strText As String
   
    strText = Trim(InputBox("Введите текст примечания для ячейки A1:", "Добавление примечания"))
   
    If Len(strText) <> 0 Then
        With ThisWorkbook.Sheets.Item(1).Range("A1")
            .ClearComments
            .AddComment CStr(Now()) & ":" & vbLf & strText
        End With
    End If
End Sub
в модуль «ЭтаКнига» рабочей книги Microsoft Excel.

Natasall 04-09-2012 19:04 1982987
:yahoo: :yahoo: :yahoo: :yahoo: :yahoo: :yahoo: Спасибо огромное :kiss: ВЫ моё спасение))))

Delirium 05-09-2012 02:18 1983257
Natasall, вы на будущее посмотрите, что такое макросы, которые можно записывать в Excel. Включаем запись, делаем нужные задачи и выключаем макрос. Идем в конструктор и смотрим на код. Удаляем лишнее, облагораживаем и получаем нужный результат :)


Время: 19:06.

Время: 19:06.
© OSzone.net 2001-