Using formulas in VBA
 

Hi i am having trouble putting this formula in my code any idea where i have gone wrong

Cells(intRowCount + 1, 4) = WorksheetFunction.Substitute(Substitute(A4, "Total Amount - ", ""), " USD [Mln]", "") *

Pls hel

Using formulas in VBA
 

Hi
try replacing
A4
with
Range("A4")

--
Regards
Frank Kabel
Frankfurt, Germany

"Kevin" schrieb im Newsbeitrag
...
Hi i am having trouble putting this formula in my code any idea where
i have gone wrong?

Cells(intRowCount + 1, 4) =
WorksheetFunction.Substitute(Substitute(A4, "Total Amount - ", ""), "
USD [Mln]", "") * 1

Pls help

Using formulas in VBA
 

Kevin,

Cells(intRowCount + 1, 4).Value =
Application.WorksheetFunction.Substitute(Applicati on.WorksheetFunction.Subst
itute(Range("A4").Value, "Total Amount - ", ""), " USD [Mln]", "") * 1

or you can use VBA's Replace function instead of the Substitute
worksheetfunction.

HTH,
Bernie
MS Excel MVP

"Kevin" wrote in message
...
Hi i am having trouble putting this formula in my code any idea where i
have gone wrong?

Cells(intRowCount + 1, 4) = WorksheetFunction.Substitute(Substitute(A4,
"Total Amount - ", ""), " USD [Mln]", "") * 1

Pls help