| Plánař | Vložení přílohy do dokumentu MS Word |
| Dobrý den,
zase problém. Proč to nejde rutině (povzdech).
Potřebuji do dokumentu MS Word vložit jiný soubor jako přílohu-objekt.
Začal jsem klasicky:
....
Set objAppWord = GetObject("Word.Application")
Set objNewDoc = objAppWord.Documents.Add()
....
pak vytvořil tabuku :
...
Set range = objAppWord.Selection.Range
Set table = objNewDoc.Tables.Add(range,PocetR+1,8)
...
a snažím se do pole tabulky ve Wordu "narvat" objekty z jiného RT pole LotusNotes dokumentu:
...
Forall obj In rtitem.EmbeddedObjects
table.Cell(Radek, 7).Range.Attachment(obj) <-a samozřejmě mi to nefunguje
table.Cell(Radek, 8).Range.InsertAfter (obj) <-a samozřejmě mi to nefunguje
table.Cell(Radek, 8).Range.InsertAfter (obj.name)
table.Cell(Radek, 8).Range.InsertAfter (";")
End Forall
...
Prosím tedy o radu.
Děkuji |
| Plánař | Správný řádek a hned 2 dotazy |
14.02.2024
20:54:31
ID: 3775.1
| table.Cell(Radek, 8).Range.InlineShapes.AddOLEObject , ObjCesta & obj.name, False, False
1.Když MS Word překlopím do PDF, už nelze vložený OLE objekt otevřít. Nevíte proč ?
2. Jak se zjišťují nějak efektivně příkazy z VBA použitelné v LotusScriptu ?
Děkuji |
| Plánař | Správný řádek a hned 2 dotazy |
14.02.2024
20:54:32
ID: 3775.2
| table.Cell(Radek, 8).Range.InlineShapes.AddOLEObject , ObjCesta & obj.name, False, False
1.Když MS Word překlopím do PDF, už nelze vložený OLE objekt otevřít. Nevíte proč ?
2. Jak se zjišťují nějak efektivně příkazy z VBA použitelné v LotusScriptu ?
Děkuji |
| Plánař | Správný řádek a hned 2 dotazy |
14.02.2024
20:54:32
ID: 3775.3
| table.Cell(Radek, 8).Range.InlineShapes.AddOLEObject , ObjCesta & obj.name, False, False
1.Když MS Word překlopím do PDF, už nelze vložený OLE objekt otevřít. Nevíte proč ?
2. Jak se zjišťují nějak efektivně příkazy z VBA použitelné v LotusScriptu ?
Děkuji |
