Adding Data to a Cell

Here's the scoop:

I have a column of cells (say column B) that have various information in it. Additionally, some cells are blank. What I need to do is add a quotation mark at the beginning and end of the data in each cell.

For example, row 2 may have abc123 inside of it, row 3 empty and row 4 may have 001234. I need say a macro to change these cells with data to read:

"abc123"
"001234"

All blank cells must remain blank.

I tried to think of a way to use the Find/Replace option but because the data varies it won't work.

Thanks

Try this

Please Login or Register  to view this content.

sorry, the code before mine works as well, it must have gotten posted shortly before I posted mine. Both should work for you.

Thanks guys for the help. I tried the first one and it worked perfect. I would have responded sooner but I was in a time crunch to get things finished up.