Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как добавить выгруженные данные в Excel на тот же лист. / 5 сообщений из 5, страница 1 из 1
16.04.2004, 12:38
    #32484109
Gyslik.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить выгруженные данные в Excel на тот же лист.
На кнопку, (для Ac97) для выгрузки данных в Exel вешаю такой код:
bulOK = False
Dim xlsObject As Object
If Not IsNull(Me.flPath) And Not (Me.flPath = "") Then
Else
MsgBox "Не указан путь выгрузки!", vbOKOnly, "Ошибка ввода"
GoTo ex
End If
If Not IsNull(Me.flSheet) And Not (Me.flSheet = "") Then
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, "зап_все_поля2", Me.flPath, , Me.flSheet
Else
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, "зап_все_поля2", Me.flPath, , "Лист1"
End If
If Me.flOpen Then
Set xlsObject = CreateObject("Excel.Application")
xlsObject.Workbooks.Open Me.flPath
xlsObject.Visible = True
bulOK = True
DoCmd.Close acForm, "пфр_сохранить_данные"
Else
bulOK = True
DoCmd.Close
End If
ex:

Собственно говоря все отлично работает, но этот код каждый раз создает в Excel новый лист и выгружает туда данные.
А как сделать, чтобы данные не писались на новый лист в Exel, а добавлялись на уже существующий?
Может кто-нибудь сталкивался с подобной проблемой?
Подскажите, PLEASE.
...
Рейтинг: 0 / 0
16.04.2004, 12:45
    #32484124
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить выгруженные данные в Excel на тот же лист.
...
Рейтинг: 0 / 0
16.04.2004, 12:47
    #32484129
Gyslik.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить выгруженные данные в Excel на тот же лист.
Да, смотрел, даже вроде когда-то какой-то похожий топик пробегал, но в поиске не нашел.
...
Рейтинг: 0 / 0
16.04.2004, 12:49
    #32484135
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить выгруженные данные в Excel на тот же лист.
2 Gyslik.

DoCmd.TransferSpreadsheet не позволяет вставлять данные в определенное место,
посмотри другие способы http://www.zmey.1977.ru/Access_To_Excel_Ru.htm
либо как вариант, из нового созданного листа программно копируй все записи
и вставляй их в конец нужного тебе листа
как найти конец писали здесь или на vb форуме ...
...
Рейтинг: 0 / 0
16.04.2004, 12:56
    #32484149
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить выгруженные данные в Excel на тот же лист.
Вот так открываешь нужный файл
Код: plaintext
1.
2.
3.
4.
Dim XL As New Excel.Application 

XL.Workbooks.Open  "c:\1 .xls" 
XL.Worksheets( 1 ).Select 
XL.Visible = True 

а дальше переносишь данные одним из множества способов, указанных в сылках (см. выше)
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как добавить выгруженные данные в Excel на тот же лист. / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]