Excel

Тема в разделе "Lotus - Программирование", создана пользователем Fan13tom, 27 янв 2006.

Статус темы:
Закрыта.
  1. Fan13tom

    Fan13tom Гость

    Set xlApp = createObject("Excel.Application") 'создаем объект Excel
    Set xlWB = xlApp.Workbooks.Add 'создаем новую книгу
    Set xlSheet = xlWB.Sheets(1) ' выбираем первую "страницу"
    xlApp.visible = True ' делаем объект видимым
    xlApp.Selection.InsertFile( "c:\" & embed.Name) не пойму почему не присоединяется!
     
  2. Domino6

    Domino6 Гость

    <!--QuoteBegin-Fan13tom+27:01:2006, 09:38 -->
    <span class="vbquote">(Fan13tom @ 27:01:2006, 09:38 )</span><!--QuoteEBegin-->embed.Name
    [snapback]29870" rel="nofollow" target="_blank[/snapback]​
    [/quote]

    А это где определено ?

    <!--QuoteBegin-Fan13tom+27:01:2006, 09:38 -->
    <span class="vbquote">(Fan13tom @ 27:01:2006, 09:38 )</span><!--QuoteEBegin-->xlApp.Selection.InsertFile( "c:\" & embed.Name)
    [snapback]29870" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    замени на
    Код (Text):
    filepath$="c:\" & embed.Name
    Print filepath$
    xlApp.Selection.InsertFile(filepath$)
    и все станет ясно
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей