VBA Excel - import into cell changes cellformat

[Johnomill]

I'm reading data from a comma-separated-file into a worksheet. The worksheet is protected. The cells have a format with left allignment of the Euro-sign and right allignment of the value. After import the Left allignment of the Euro-sign is changed to right. How can I prevent this from happening? I tried to read the value only into the cell with
Workbooks(A).Worksheets(B).Cells(R,K).Value=Importvalue
But this doen't work.

 

[SkipVought]

Hi,
So you are opening a text file for sequential input?
Reading into a buffer and parsing values into a variable(s)?
The writing the variable(s) to specific cells?
It should work without clobbering the format, but if it is, here's what you could do...

    With Workbooks(a).Worksheets(B).Cells(R, K)
        .Value = ImportValue
       'this is a custom format for US Dollars - you can macro-record your own
        .NumberFormat = "_($* #,##0.00_);_($* (#,##0.00);_($* ""-""??_);_(@_)"
    End With

Skip,
metzgsk@voughtaircraft.com

 

[Johnomill]

Thanks Skip, it works..

Merry christmas!

Jan