Couturier, slight bug-- I had to change the range command to "range rCol=col(2);" to get it working. Your suggestion was slightly faster and it got me to think of a simpler approach. Your two commands could be replaced by one line: "wks.col2.width=0;". However, I will keep your suggestion in mind if I want to use column labels instead of column numbers.
Colhide looks to be a good X-function to keep in mind if I want to restore columns to their original width. Note to OriginLab: I couldn't find colhide in the help files.