|
Hallo Till,
du bist der Beste! Das funktioniert super! Ich staune nur, wie du das löst. Die Spalte B ist schon richtig!!!
Und ich versuche das über ein neues RangeObjekt... Wie gesagt, bin noch am Üben, ist mein erstes Makro!
Eine Bitte hätte ich noch:
Wie kann ich nun die Werte in Sternchen setzen (*Artikelnr* aus Spalte B)? Das brauche ich, um dies in Barcode 39 umzuwandeln. Das Font verlangt es so!
Font Wechseln klappt schon, bloß beim RangeObjekt meckert der Debbuger, da Typen unverträglich!
1 2 3 4 5 6 7 | rng.Columns(8) = "*" & rng.Columns & "*"
rng.Columns(8) = "*" & Zeile & "*"
rng.Columns(2).Copy rng.Columns(8)
rng.Columns(8).Font.Name = "Free 3 of 9 Extended"
|
Ich suche derweil weiter und bin dir jetzt schon zu größtem Dank verplichtet!
Grüße
|