Danke, es funktioniert jetzt einwandfrei. Ich habe viel durch deine Programmierung gelernt, vor allem durch deine Kommentare an jeder Zeile
So macht diese Sache wirklich Spaß, irgendwie kriegt man da ein Erfolgserlebnis wenn man sieht was man da alles machen kann und es dann auch noch funktioniert.
Ich hatte mal vba-excel in der Schulausbildung, aber da bringen sie einem nur unnütze Sachen bei…
Ich habe da wieder mal eine Frage zu diesem Program.
Und zwar in der Zeile:
'Wert aus Quelle Spalte C (3) in Ziel Spalte A (1) eintragen
wksZiel.Cells(Zeile, 1).Value = .Cells(Zeile, 3).Value
Hier würde ich gerne auch die Formate mitkopieren.D.h.: die Zelle ist irgendwie noch rot oder orange hinterlegt - da würde ich gerne die Farbe auch noch mitkopieren. Geht das?
'Wert aus Quelle Spalte C (3) in Ziel Spalte A (1) eintragen inkl. Zellfarbe
wksZiel.Cells(Zeile, 1).Value = .Cells(Zeile, 3).Value
wksZiel.Cells(Zeile, 1).Interior.Color = .Cells(Zeile, 3).Interior.Color
'alternativ:
'Zelle aus Quelle Spalte C (3) in Ziel Spalte A (1) Kopieren
.Cells(Zeile, 3).Copy
wksZiel.Cells(Zeile, 1).PasteSpecial Paste:=xlPasteFormats
wksZiel.Cells(Zeile, 1).PasteSpecial Paste:=xlPasteValues