Habe ein Problem.
Habe in Excel eine Kapazitätenplanung. Die Daten für einen Mitarbeiter werden ausgelesen und per e - Mail an ihn versandt.
Bis jetzt gebe ich feste Werte für die Zeile, die ausgelesen werden soll, vor.
Habe versucht, mit ActiveCell die Sache zu lösen, dass ich die Zeile, in der ich mich befinde auslese. Funktioniert aber irgendwie nicht. Kann das evtl daran liegen, dass das ganze in einem Modul stattfindet?
Hier ein Teil aus meinem Code:
For i = 2 To 32 Step 1 'JANUAR
xQuelle = i
yQuelle = 31
xZiel = i
yZiel = 5
Notiz = Workbooks("Kappa 2002.xls").Sheets("Kapazitätenplanung2002").Cells(yQuelle, xQuelle).NoteText
Workbooks("Berater_Vorlage.xls").Sheets("Jahresübersicht").Cells(yZiel, xZiel).Value = Workbooks("Kappa 2002.xls").Sheets("Kapazitätenplanung 2002").Cells(yQuelle, xQuelle).Value
Workbooks("Berater_Vorlage.xls").Sheets("1. Quartal").Cells(i + 3, 3).Value = Workbooks("zeb-Kappa 2002_130302.xls").Sheets("Kapazitätenplanung 2002").Cells(yQuelle, xQuelle).Value
Workbooks("Berater_Vorlage.xls").Sheets("Jahresübersicht").Cells(yZiel, xZiel).NoteText Notiz
Workbooks("Berater_Vorlage.xls").Sheets("1. Quartal").Cells(i + 3, 4).Value = Notiz
Next
Schonmal besten Dank im Voraus.