Domino 9 und frühere Versionen > ND6: Entwicklung

Text aus MS Word kopieren mit VBA

<< < (2/2)

ManniF:
Halllo,

habe jetzt versucht, folgenden VBA-Code in Script umzuwandeln

--- Code: ---oDoc.Range(Start:=oDoc.Bookmarks("A").Range.Start, _
               End:=oDoc.Bookmarks("B").Range.Start).Select
--- Ende Code ---
  in:

--- Code: ---wddoc.Range(wddoc.Bookmarks("Betreff").Range.Start, wddoc.Bookmarks("Ende").Range.Start).Select
--- Ende Code ---

Leider ohne Erfolg. Kann mir wer sagen, was an dem Code noch fehlerhaft ist?

Untitled:
Was gibts denn für eine Fehlermeldung?

Eventuell mal "Call wddoc.Range..."

Ansonsten könnte ich mir vorstellen, das LS mühe hat mit der Klassentiefe. Habe da auch schon Probleme beobachtet, wenn Klassen zu tief angesprochen wurden (zum Bleistift "hauptklasse.unterklasse.unterklasse.methode()").

Versuch mal, zum Beispiel sowas hier (ungetestet):


--- Code: ---Dim bmStart as Variant
Dim bmEnd as Variant

Dim rangeStart as Variant
Dim rangeEnd as Variant

Set bmStart = wddoc.Bookmarks("Betreff")
Set bmEnd = wddoc.Bookmarks("Ende")

Set rangeStart = bmStart.Range
Set rangeEnd = bmEnd.Range

wddoc.Range(rangeStart.Start, rangeEnd.Start).Select

--- Ende Code ---

Vielleicht entdeckt der Debugger dann auch schon in einer Zeile vorher einen Fehler.

Grüsse
Moritz

ManniF:
Hallo,

Super. Es klappt einwandfrei.

Vielen Dank

Mfg Manni

Navigation

[0] Themen-Index

[*] Vorherige Sete