auswahl aus listbox in word übergeben

[emmit]

hallo,

habe ein problem:

hier erstmal der code, um den es geht:

Private Sub Befehl79_Click()
Dim daten As String
For i = 0 To Liste26.ListCount - 1 'Alle Einträge der Liste durchlaufen
If Liste26.Selected(i) = True Then 'Wenn ein Eintrag markiert ist...
daten = daten & Liste26.ItemData(i) & vbCrLf '...speicher ihn ab.
End If
Next
MsgBox daten
End Sub

... ich habe eine Listbox (Liste26) erstellt, in dieser Liste werden Werte dargestellt, die aus einer Tabelle (Kundeninformation) kommen.
In dieser Listbox kann man mehrere Einträge markieren, diese werden bei Klick auf (Befehl79) in einer MessageBox ausgegeben...

Ich möchte jetzt diese Werte in Word übergeben, damit ich daraus einen Serienbrief generieren kann.
Wie kann ich das anstellen ?
...evtl neue Tabelle erstellen ?

Help.

emmit

 

[Zorck]

Da gibt es verschieden Vorgehensweisen.
Erst einmal musst du aber ein "WordObject" erstellen.
Das machst du wi folgt:

Dim Word As Object
Set Word = CreateObject("Word.Document")

Jetzt kannst du mit Hilfe des Objects 'Word' MsWord fernsteuern.
Entweder du erstellst von deinem Programm aus den Serienbrief oder du schreibst ein WordMakro, welches du dann von deinem Programm aus aufrufst und die entsprechenden Daten übergibst!

Das wäre erstmal mein Vorschlag! ;-)

Zorck

 

[emmit]

re

danke schon mal für die schnelle antwort...

ich bin neu in access business und deswegen hab ich da auch keinen plan wie, wo was hingehört...
kannst du das mal für "anfänger" erklären ?

emmit

 

[Zorck]

Ich kann jetzt nicht viel mit deiner Frage anfangen! Sorry!
Und für eine komplette Anleitung hab ich jetzt auch keine Zeit.

(Es geht in den Urlaub )

Aber wenn du konkrete Fragen hast, werden dir diese bestimmt auch beantwortet.

Viel Glück!

Zorck

 

[simonef]

Hallo emmit,

im Anhang findest du ein kleines Beispiel zum Umgang mit Word.

Wichtig ist, dass du beim Projekt unter Projekt-Verweise MSWord mit einbindest.

Hilfe bekommst du auch bei VBA, das ist sehr ähnlich.
Drum kannst du auch in Word alles, was das Probgramm machen soll, als Makro aufnehmen, und musst es nur leicht abändern.

cu
simone