Kann mir jemand das hier erklären:
Mappe mit Blättern (KWalt, KW1...KW52, KW53o.1) dient zur Arbeitszeiterfassung.
Wird über cmdButton ein neues Jahr begonnen, müssen die Daten aus "KW53o.1" in das neue Jahr übernommen werden, wenn in dieser KW Dezember- und Januartage vorhanden sind. In Zelle E7 der "KW53o.1" steht 1 oder 53.
Habe dazu mit Makrorecorder folgenden Code aufgezeichnet:
Sub Makro1()
Sheets("KW53o.1").Select
Range("B11:K59").Select
Selection.Copy
Range("A1").Select
If Range("E7") = 1 Then
Sheets("KW1").Select
Range("B11:K59").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("A1").Select
Else
Sheets("KWalt").Select
Range("B11:K59").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("A1").Select
End If
End Sub
Starte ich das Makro, passiert genau alles umgedreht, dh. wenn in "KW53o.1" E7=1 werden die Daten in "KWalt" kopiert, bei E7<>1 in "KW1". Tausche ich im Makro "KW1" mit "KWalt" funzt es richtig, aber WARUM ??????