Страница: 1 |
Dim Appex as Excel.Application ... .... Appex.Quit Страница: 1 |
Вопрос: из textbox в Exel
Добавлено: 13.05.04 11:34
Автор вопроса: Aid.CCCP
ПОдскажите как из текстбокса записать данные в Exel сохранить их там, а потом закрыть Exel так чтобы он выгрузился из память, а то я ему close, а он в из процесов невыгружается((
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Svetlana
ICQ: 262385618
Вопросов: 43
Ответов: 205
Профиль | | #1
Добавлено: 13.05.04 17:37
Номер ответа: 2
Автор ответа:
Svetlana
ICQ: 262385618
Вопросов: 43
Ответов: 205
Профиль | | #2
Добавлено: 13.05.04 17:55
Private Sub Command2_Click()
Dim appex As Excel.Application
Set appex = New Excel.Application
Dim wb As New Excel.Workbook
Set wb = appex.Workbooks.Open("C:\Documents and Settings\sveta\Desktop\1.xls")
Dim ws As Worksheet
Set ws = wb.Worksheets(1)
ws.Cells(1, 1) = Text1.Text
wb.Close True
Set wb = Nothing
appex.Quit
MsgBox "OK"
End Sub