Makrocode
08.05.2013 14:37:51
Dirk
ich habe einen Code geschrieben, der nur falsch sein kann....
For i = 1 To AnzahlZeilen2
If Range("F" & i + 1).Text = wkB Then
ActiveCell = 1
Else
Range("U" & i + 1).FormulaR1C1 = "=COUNTIF(C[-1],RC[-1])"
Next i
Nun eine kurze Erklärung was ich damit bezwecken möchte. Letztendlich geht es nur um den If-Then-Else Ausdruck. Es soll in der Spalte F geschaut werden, ob dort die Buchstaben "wkB" vorhanden sind (möglich ist dort immer eine 5 stellige Zahl wie "79896" oder eine 5 stellige Zahl mit entsprechender Ergänzung "79896wkB". Was wahrscheinlich etwas unschlau ist, weil es damit mal Zahl mal Text ist. Ist aber nicht änderbar). Wenn "wkB" vorhanden ist, soll eine "1" in die aktive Zelle geschrieben werden. Wenn nicht, dann soll die entsprechende ZählenWenn-Formel eingefügt werden.
Die Formulierung mit "[...].Text" habe ich einfach mal so hingeschrieben....
Konnte ich mich verständlich machen?
Viele Grüße aus Hannover und herzlichen Dank!
Dirk