Domino 9 und frühere Versionen > Entwicklung

Adressenetiketten aus LN erstellen

<< < (3/7) > >>

adminnaddel:
@eknori

ist es mir möglich (mal umständlich gedacht) deine konfiguration an eine bestimmte data becker norm anzugleichen?

grüße
Andreas

Don Pasquale:

--- Zitat von: eknori am 19.03.03 - 11:16:15 --- ;D http://www.eknori.de/downloads/Label.zip  ;D

--- Ende Zitat ---

Interessant,

warum öffnet sich Word eigentlich zweimal :-)  ?

Ciao Don Pasquale

Axel:
Hi,

das liegt an dieser Zeile in der Routine CreateMailingLabels:

Set wrd = CreateObject ( "Word.Application"  )

Der Funktion CreateObject ist es egal ob ein Wordtask vorhanden ist oder nicht. Es wird immer ein neuer gestartet.

Ich hab' s so gelöst:

...
On Error Resume Next
Set objWord = GetObject("", "Word.Application")
If Err = 208 Then  '  Fehler 208 tritt auf wenn Word noch nicht läuft
  Err = 0
  Set objWord = CreateObject("Word.Application")
  objWord.Visible = True  'Word sichtbar machen
End If
...

Ich versuche erst auf eine bestehende Task zuzugreifen, wenn das nicht gelingt, weil Word eben noch nicht läuft, starte ich es.

Axel

ata:
@Axel

... rafitükisch...  ;D

ata

Don Pasquale:

--- Zitat von: Axel am 20.03.03 - 13:28:13 ---das liegt an dieser Zeile in der Routine CreateMailingLabels:
Set wrd = CreateObject ( "Word.Application"  )

--- Ende Zitat ---

Ich weiß :-)

Deine Lösung funktioniert prima.

Ich wollte nur vorlaut sein.


Ciao

Don Pasquale

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete