range.find() в excel

[Shrike]

Цитата:

Изначально опубликовано dn

Тогда напиши кусок кода на VBA, который не удается реализовать в Axapta.

Sub Макрос1()
Range("B2578").Select
Cells.Find(What:="34", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
).Activate
End Sub

все параметры начиная со второго необязательные. если без них - все работает. хоть один добавить - вываливается с ошибкой.