| Author |
 Topic  |
|
|
denis
7 Posts |
 Posted - 06/02/2005 : 07:32:09
|
Обращение к файлу Excel выглядит так
ExcelObject.Workbooks.Open FileName:="C:\Work\Opis.xls"
Как обратиться к листу Excel, вставленного в лст Visio как обьект "Excel.Sheet.8"?
Заранее благодарен за помощь. |
|
|
Tumanov
Russia
1198 Posts |
Posted - 06/02/2005 : 18:22:01
|
Примерно так:
Dim xlSheet As Excel.Worksheet
Set sh = ActivePage.Shapes("Sheet.1")
Set xlSheet = sh.Object.Worksheets(1)
xlSheet.Range("A1").Formula = 123
MsgBox ActivePage.OLEObjects(1).ClassID
MsgBox ActivePage.OLEObjects(1).ProgID |
 |
|
|
denis
7 Posts |
Posted - 06/03/2005 : 09:33:24
|
Ура-а-а-а-а!!!!!!!!!Заработало.
Огромное спасибо |
|
|
|
krys
55 Posts |
Posted - 05/15/2008 : 15:29:48
|
У меня при компилировании выскакивает ошибка:
Dim xlSheet As Excel.Worksheet - тип не известен (вольный перевод сообщения) :(
В чем может быть дело? |
|
|
|
Tumanov
Russia
1198 Posts |
Posted - 05/15/2008 : 17:50:13
|
Tools / References
и поставить галочку у имеющейся Microsoft Excel Object Library |
|
|
| |
Topic |
|
All Forums
Excel в Visio