Warum Fehler "End If" ohne "If-Block"?
05.01.2007 18:28:42
proxima05
kann mir jemand sagen, warum der folgende Code den o.g. Kompilierungsfehler bringt?
============================
Private
Sub CommandButton1_Click()
Dim Zeile As Integer
Zeile = 15
Do
Zeile = Zeile + 1
If range("A15").Value <> """" Then
range("C15").FormulaR1C1 = "=(1/(1+R6C2/R7C2)^RC[-2])"
Exit Do
End If
Loop
End Sub
============================
Danke
Ralph
Anzeige