InputBox to get user hidden columns question

[Stuart]

Can I develop this further to hide columns before printing,
or is there a better way, please?

Dim ExclColRng As Variant
Set ExclColRng = Application.InputBox("Use the left mouse " & _
"button with the Control key," & vbNewLine & "to select at least" _
& " one cell in each column " & vbNewLine & "(or the entire" _
& ".column), to indicate those" & vbNewLine & "Columns to be" _
& " hidden. Click OK. when done", Type:=8)

This seems to take the user's hidden columns into the inputbox, but
can I use this, and if so how, please?

Regards.

 

[Stuart]

Many thanks.

So that is not the root of this problem after all.
I've looked at it since your help, but with no success,
and have posted anew with a description of how the
problem manifests itself.

I had wondered if the selection of more than 1 column
might be the cause. Apparently not.

Regards.