Daten aus vielen Tab.blättern holen
04.07.2004 13:28:30
André
ich arbeite an einer Bundesliga-Tipp-Datei.
Jeder Mitspieler bekommt einen Tippzettel (Spieler 1)usw.
Nun möchte ich, dass automatisch mit eintragen des Tipps
im Hauptblatt (Tipp) alles abgespeichert wird.
Für ein Worksheet habe ich es hinbekommen .
Dieser Code steht im Worksheet (Spieler 2):
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("Tipp").Range("I4:K52").Value = _
Worksheets("Spieler 2").Range("B2:D50").Value
Worksheets("Tipp").Range("I54:K102").Value = _
Worksheets("Spieler 2").Range("J2:L50").Value
Worksheets("Tipp").Range("I104:K152").Value = _
Worksheets("Spieler 2").Range("R2:T50").Value
Worksheets("Tipp").Range("I154:K172").Value = _
Worksheets("Spieler 2").Range("Z2:AB20").Value
End Sub
Ich hatte jetzt die Idee einen Code zu schreiben im Worksheet (Tipp),
der aus jedem ( auch neuen ) Spielerblatt die Tipps automatisch einträgt.
?Suche nach Tabellennamen, dann eintragen?
Zum Besseren Verständnis auch noch die Datei:
https://www.herber.de/bbs/user/8070.xls
Vielen Dank
AndréL.