excel. put ' ' around every item in a column

[westconn1]

if you look in the cell edit window the ' is shown correctly,
one solution is to put a leading space

acell.Value = " '" & astr & "'"

pete