Hi,
If Trim(wsh3.Range("A2").Value) = "ABC" Then
wb1.Activate
''input box
at6 = Application.InputBox("Amount", , 0, Type:=1)
au6 = wsh1.Range("Ax5").Value
If au6 = "" Then
wsh1.Range("AX5").Value = at6 * 0.25
av6 = at6 * 0.75
Else
av6 = at6 - au6
End If
How do i refer the input putted in at6 below for doing calculation