Код Excel VBA, чтобы получить исходную ширину столбца, прежде чем он был скрыт

Question

Я установил ширину полностью пустого столбца 'E' в 29 точек и скрыл столбец.

Затем я иду в ячейку E1 «Перейти к» (с помощью команды Control + G) и ищу «Формат -> Ширина столбца», и она правильно показывает ширину как ноль, поскольку столбец «E» скрыт.

Если я затем раскрою столбец E, ширина столбца будет восстановлена ​​до первоначального значения 29. Excel как-то это запоминает.

Мне бы хотелось, чтобы код VBA извлекал исходную ширину столбца до того, как он был скрыт.

Answer 1

Ответ в том, что вы действительно не можете.Тем не менее, вы можете быстро показать его, получить ширину и скрыть столбец, даже не заметив этого.

Sub test()

    Debug.Print Range("A:A").ColumnWidth    '0

    'unhide the column
    Application.ScreenUpdating = False
    Range("A:A").EntireColumn.Hidden = False

    Debug.Print Range("A:A").ColumnWidth    '30

    'rehide the column
    Range("A:A").EntireColumn.Hidden = True
    Application.ScreenUpdating = True

    Debug.Print Range("A:A").ColumnWidth    '0

End Sub