format an excel cell

[juve11]

hello,
i made alot of changes to an excel sheet from visual basic like bordering,setting landscape,margins... but there is a thing a didnt managed to change : the cell format.

i have two columns and i need that all the cells from those columns to be type "text"

do you have any ideas?

thank you

[QVeen72]

Hi,

This makes Column B and Column C as Text Columns..

Range("B:B").NumberFormat = "@"
Range("C:C").NumberFormat = "@"
 

Say you want only first 20 Cells of Columnd as Text, then:

Range("D1:D20").NumberFormat = "@"
 

Regards
Veena

[juve11]

hi,thank you for posting!
i try in my project you're idea but doesnt works like i need : i have a database in access wich i am taking to excel via visual basic. the database contains two columns with telephone numbers : standalone and mobile. both start with "0".so, when i put the database in excel it does not trasfer the leading "0" , just the rest of the number.

i sauth that if i format the cell to "text" everything is ok,that's why i asked how do you change the type of a cell in excel from visual basic.

thank you.

[QVeen72]

Hi,

Pass the above Code (My Previous Post), before populating the data to Excel, or PreFix the database Text Value with Single Quote say:

Cells(10, 2 ) = "'" & RST("MyFieldName")
 

Preceeding Quote ensures, it as a Text Field..

Regards
Veena

[juve11]

indeed, you are right, thank you very much for youre time.

my best regards.