-Ïîèñê ïî äíåâíèêó

Ïîèñê ñîîáùåíèé â rss_sql_ru_access_programming

 -Ïîäïèñêà ïî e-mail

 

 -Ïîñòîÿííûå ÷èòàòåëè

 -Ñòàòèñòèêà

Ñòàòèñòèêà LiveInternet.ru: ïîêàçàíî êîëè÷åñòâî õèòîâ è ïîñåòèòåëåé
Ñîçäàí: 16.03.2006
Çàïèñåé:
Êîììåíòàðèåâ:
Íàïèñàíî: 4


Ñîçäàíèå êíèãè Excel èç ìîäóëÿ Access

Ïÿòíèöà, 05 Äåêàáðÿ 2014 ã. 01:37 + â öèòàòíèê
Çäðàâñòâóéòå.
ïîìîãèòå, ïîæàëóéñòà, íîâè÷êó.
Èç ìîäóëÿ Access ïûòàþñü ñîçäàòü ðàáî÷óþ êíèãó Excel ñ ïîìîùüþ ïðîñòîé ïðîöåäóðû (ïðèâåäåíà íèæå). Íî, ïî÷åìó-òî íè÷åãî íå ïðîèñõîäèò. Íîâàÿ ðàáî÷àÿ êíèãà íå ïîÿâëÿåòñÿ. Åñëè æå âñòàâèòü â êîíöå êîìàíäó MsgBox wrb.Name, òî ÿ ïîëó÷àþ èìåíà "Êíèãà1", "Êíèãà2" ò.ä.

Ïî÷åìó íå ñîçäàåòñÿ ñàìà ðàáî÷àÿ êíèãà?

Çàðàíåå áëàãîäàðåí çà ïîìîùü.

Sub NewWrb()
    Dim objExcel As Excel.Application
    Dim wrb As Workbook
    
    Set objExcel = New Excel.Application
    Set wrb = objExcel.Workbooks.Add

End Sub

http://www.sql.ru/forum/1130645/sozdanie-knigi-excel-iz-modulya-access


 

Äîáàâèòü êîììåíòàðèé:
Òåêñò êîììåíòàðèÿ: ñìàéëèêè

Ïðîâåðêà îðôîãðàôèè: (íàéòè îøèáêè)

Ïðèêðåïèòü êàðòèíêó:

 Ïåðåâîäèòü URL â ññûëêó
 Ïîäïèñàòüñÿ íà êîììåíòàðèè
 Ïîäïèñàòü êàðòèíêó