I'm trying to write code for henro8
http://www.excelforum.com/showthread.php?t=651731
and I get the following error with both nested if statements
Compile error: End if without block if
I tried with the Elseif and with separate if's but got the same error. What am I doing wrong?
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RngCell As Range
Dim DrpDown As String
If Target.Column = 1 And Target.Row = 5 Then
DrpDown = Target.Value
Set RngCell = Cells(2, 5)
If DrpDown = "$/square foot" Then
With RngCell
.NumberFormat = "$#,##0.00"
ElseIf DrpDown = "%/construction cost" Then
With RngCell
.NumberFormat = "0.0%"
End If
End If
End Sub
Thanks in advance!
ChemistB
Bookmarks