ich habe jetzt ein paar VBA Funktionen gefunden und in meine Datei eingebaut,
komme aber trotzdem nicht zum Schluss.
Ich habe 5 Tabellenblätter (1 - 5). Für die KW 6 will ich per VBA ein neues Blatt
einfügen und in A1 der Tabelle6 mittels Makro die Funktion
"vorheriges Tabellenblatt (5) Zelle A1 + 1 eingeben, damit im Tabellenblatt 6 in A1 eine 6 erscheint.
In der nächsten Woche (7) das selbe Spiel. Gehe in das letzte Tabellenblatt, (6) kopiere
die Tabelle, gehe in A1 und gibt die Formel Tabelle 6 A1 + 1 ein, damit in Tabelle 7 in A1 eine 7 erscheint.
Habt ihr noch ne Idee oder Lösung für mich.
Sub NeueTabelle()
' NeueTabelle Makro
Sheets(Sheets.Count).Select
Sheets(Sheets.Count).Copy After:=Sheets(Sheets.Count)
' "Jetzt möchte ich die Formel aus A1 der voherigen tabelle in die
' neue letzte Tabelle in A1 kopieren. (und das passiert wöchentlich
' bis 52 Wochen voll sind.
' ActiveCell.FormulaR1C1 = "=+'5'!RC+1" (funzt nicht, da '5' in der KW 7
' 6 sein muss
ActiveCell.Offset(5, 0).Range("A1").Select
End Sub
Gruß
André