habe mal wieder ein kleines Excel/VBA Problem.
In einer Datei sind horizontal die Kalenderwochen abgetragen, wobei immer nur 12 Wochen angezeigt werden. (Die übrigen 40 sind ausgeblendet)
Über folgendes Makro: (Danke an Rudi)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 84 And Target = "beendet" Then Target.EntireRow.Hidden = True
End Sub
blende ich alle Zeilen die in Spalte 84 "beendet" stehen haben aus.
Nun kopiere ich über ein Makro ( Danke an den Recorder)
ActiveWindow.SmallScroll Down:=6
Range("abcde").Select
'Range("CC45").Activate
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
ActiveSheet.Paste
.
.
.
.
.
ein bestimmten Bereich und füge ihn in ne neue Datei ein.
Hier sind aber nach dem Einfügen die augeblendeten "beendet"- Zeilen wieder vorhanden.
Mit strg.+C,bearbeiten, gehen zu, nur sichtbare Zellen kommt Laufzeitfehler 1004 unterschiedlich große Bereiche, bla bla bla
Weiß jemand von euch Rat?
Danke Gruß Micha
Kann mir jemand helfen?