myGully.com - Einzelnen Beitrag anzeigen

wombat223 · 23.07.10, 12:32

Danke gosha16

mit

Code:

      For i = 2 To Worksheets.Count - 1
         .Range("C7:H7").Offset(0, j).Value = Worksheets(i).Range("C12:L12").Value
        z =z + 13
      Next

bin ich mitlerweile ein gutes stück weiter gekommen.

23.07.10, 12:32	#3
wombat223 Anfänger Registriert seit: Jul 2010 Beiträge: 4 Bedankt: 2	Danke gosha16 mit Code: For i = 2 To Worksheets.Count - 1 .Range("C7:H7").Offset(0, j).Value = Worksheets(i).Range("C12:L12").Value z =z + 13 Next bin ich mitlerweile ein gutes stück weiter gekommen.