Error

[Juan C]

Hello...

I have the following Macro:

Sub Datex()
dTime = Now + TimeValue("00:00:05")
Application.OnTime dTime, "Datex"
With Sheets("D 0-1")
If Now - Date >= TimeValue("00:00:00") And Now - Date <= TimeValue("17:00:00") Then
.Cells(Rows.Count, "B").End(xlUp).Offset(1, 0).Value = .Range("A1").Value
.Cells(Rows.Count, "C").End(xlUp).Offset(1, 0).Value = .Range("A2").Value

End If
End With
End Sub

Every time I run it, I get the following message: The macro 'XX!Datex' cannot be found.

Any ideas on how to solve this...???

Thanks

JC

 

[VoG]

Where did you put the code? It needs to go in a regular module (in the VBE Insert > Module).

 

[Juan C]

OK... thanks. It solved the isssue....

JC

Where did you put the code? It needs to go in a regular module (in the VBE Insert > Module).

 

[Juan C]

Macro this

Hello... Could somebody help me converting this formula:

=IF(J3>$A$2,0,LOOKUP(J3,$C$2:$C$4500,$B$2:$B$4500))

Into a macro....

Thanks

JC

 

[John_w]

Re: Macro this

Put this in a Module:

Public Function MyFormula() As Variant
'   =IF(J3>$A$2,0,LOOKUP(J3,$C$2:$C$4500,$B$2:$B$4500))
    If Range("J3") > Range("A2") Then
        MyFormula = 0
    Else
        MyFormula = Application.WorksheetFunction.Lookup(Range("J3"), Range("C2:C4500"), Range("B2:B4500"))
    End If
End Function

 

[Juan C]

Re: Macro this

Thanks John... I got this error '1004':
Unable to get the Lookup property of the WorksheetFunction class

Any ideas???

Put this in a Module:

Public Function MyFormula() As Variant
'   =IF(J3>$A$2,0,LOOKUP(J3,$C$2:$C$4500,$B$2:$B$4500))
    If Range("J3") > Range("A2") Then
        MyFormula = 0
    Else
        MyFormula = Application.WorksheetFunction.Lookup(Range("J3"), Range("C2:C4500"), Range("B2:B4500"))
    End If
End Function

 

[John_w]

Re: Macro this

Thanks John... I got this error '1004':
Unable to get the Lookup property of the WorksheetFunction class

Any ideas???

This error is normal if the value being looked up was not found. See http://www.ozgrid.com/forum/showthread.php?t=30623

 

[Juan C]

Parabolic SAR

Hello all!!!

Does somebody know the formula (not a macro nor add in) to calculate a Parabolic SAR????

Thanks

JC