Hallo zusammen
Wir fragen uns folgendes:
Wir möchten Etiketten in erstellen, die all die nötigen Daten aus einem Exel ziehen. Der Anwender sollte bei einem VBA-Formular die Artikelnummer eingeben können, anhang von dieser füllt Word automatisch die vorgegebenen Felder aus.
Das mit dem Formular und dem Schreiben an vorgegebenen Ort habe ich folgendermassen schon geschaft:
Private Sub OKbut_Click()
Dim Artikelnummer As Range
Set Artikelnummer = ActiveDocument.Bookmarks("Artikelnummer").Range
Artikelnummer.Text = Me.TextBox1.Value
End Sub
Jetzt wäre es toll, wenn man irgendwie ein wenn dann Abfrage machen könnte, die dann anhand dieser eingegebenen Artikelnummer die restlichen vorgegebenen Felder ausfüllt. Also wenn Artikelnummer in Excel, dann soll es den Artikelname von der Zeile, in der sich die Artikelnummer befindet in den vorgegenen Platz einfügen.
Könnt ihr uns da weiterhelfen?
Gruss
Juilian
|