weis jemand von euch nen Rat zu folgendem Makro
Sub A_15_3()
Application.ScreenUpdating = False
Application.Run "Datenübernahme_löschen_VarVergl"
Sheets("Teile").Select
Selection.AutoFilter Field:=21, Criteria1:="1"
Range("B19:G999").Select
Selection.Copy
Sheets("VarVergl").Select
Range("B19:G999").Select
ActiveSheet.Paste
Range("C3").Select
Application.ScreenUpdating = True
End Sub
folgendes:
Er bringt mir die Meldung dass Kopier- und Einfügbereich nicht gleich gross sind.
Ich denk mal dass dies damit zu tun hat dass ich das Bezugstabellenblatt("Teile"), zuerst mit einem Autofilter(21) filtere, und dann der Kopierbereich nicht identisch mit dem Einfügebereich im Zieltab.("VarVergl") ist.
Weis mir jemand eine entsprechende Lösung/Anweisung die diese´n Umstand ignoriert, sprich wie müsste ich den Bereich denn sonst definieren, irgendwie mit "activeRow" oder so ähnlich ..., ich weis hier leider nicht weiter,
könnt ihr mir bitte helfen,
recht herzlichen Dank für alle Vorschläge
udo