在工作表中查找第一个可见的列

我有一个VBA的问题,我一直在努力回答。 在电子表格中,我有几个隐藏的列(A:O)。 我想find工作表中的第一个可见列(在这种情况下列P),并获得该列号用于计算目的。 有谁知道如何做到这一点? 这应该是相当直接的,但我似乎无法绕过我的头如何做到这一点。 谢谢!

以下代码打印第一个可见列的编号:

 MsgBox Range("1:1").SpecialCells(xlCellTypeVisible).Column