View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
al al is offline
external usenet poster
 
Posts: 64
Default % variance calculation - amended

Sub Macro2()

Dim exptype

exptype = InputBox("Enter e if expense type.")

If exptype = "e" Then


ActiveCell.FormulaR1C1 = "=-(RC[-1]/RC[-2]-1)"

Else


ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]-1)"

End If
End Sub


Pls help - why i'm not getting any result if exptype is not equal to e

thxs