Excel

  • Автор темы Fan13tom
  • Дата начала
Статус
Закрыто для дальнейших ответов.
F

Fan13tom

Гость
#1
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) не пойму почему не присоединяется!
 
D

Domino6

Гость
#2
<!--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]
замени на
Код:
filepath$="c:\" & embed.Name
Print filepath$
xlApp.Selection.InsertFile(filepath$)
и все станет ясно
 
Статус
Закрыто для дальнейших ответов.