Supportnet / Forum / Textverarbeitung
Rechnung über Word mit Makro...
Frage
hallo!
ich versuche ein automatisiertes rechnungsformular zu erstellen.
hab aber nun ein problem:
wie kann ich erreichen, daß, wenn ich z.b. artikel mittels eines listenkombinationsfeldes eingetragen habe, ein zum artikel gehöriger einzelpreis in ein weiteres textfeld automatisch eingetragen wird, wenn ich nach artikelauswahl die TAB taste drücke.
hab´s schon so probiert:
Private Sub cmbArtikel_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)_
If cmbArtikel.Text = "1234 ARTIKEL1, 10 cm" _
Then If KeyAscii = vbKeyTab Then _
txtPreis.Text = "1.234" _
ElseIf cmbArtikel.Text = _
"5678 Artikel2, 11 cm" Then _
txtPreis.Text = "5.678" _
Else: txtPreis.Text = "" _
End If
und ähnlich....
klappt aber nicht...
wer kann mir sagen, wie ich a. obengenanntes erreichen kann, und b. wie ich im makro die preise einpflegen muss.
anm: die eingaben aus dem formular werden danach in eine im dok integrierte tabelle eingetragen
ich weiss, es wäre einfacher über excel, es soll aber nun mal eine rechnung über word sein....
bin für jeden tipp dankbar!!!
mfg/sepp

