Makro umstellen
26.06.2003 21:27:15
Gerd
Ich habe hier ein Makro in der Recherche gefunden das ich gern ein wenig verändert haben möchte.
Und zwar geht es um die Zeile Cells(N, 1) = lgNummer
lgNummer = lgNummer + 1
da soll jetzt nicht lgNummer stehen sondern es soll eine Formel eingetragen werden die sich auf die reihe N bezieht zB B * E der reihe N.
Also wenn ich in Reihe 33 stehe und in B etwas eintrage dann soll Die Formel B33*E33 in F33 eingetragen werden
For N = 21 To [b65536].End(xlUp).Row
If Not IsEmpty(Cells(N, 2)) And IsNumeric(Cells(N, 2)) Then
Cells(N, 1) = lgNummer
lgNummer = lgNummer + 1
Ich hoffe meine Auskünfte reichen aus
Anzeige