Suche im Archiv ergab hunderte Beispiele aber das richtige habe ich nicht gefunden.
Kopiere die Werte aus aktiver Tabelle und möchte sie in Tabelle 6 einfügen, wobei die Anzahl der mit Zahlen beschriebenen Zellen immer unterschiedlich ist. Nur die Zellen, in denen Zahlen stehen sollen gefärbt werden.
gruß Werner
Private Sub CommandButton1_Click()
Range("B2:J10").Copy
Tabelle6.Select
Range("Druck1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("A1").Select
End
End Sub