ewgeniy2004

Можно написать обработчик для события Worksheet_Change

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("AF9:AH9")) Is Nothing Then
        If Target.Value2 = "" Then
            Target.EntireColumn.Hidden = True
        End If
    End If
End Sub

Книга Джеффри Фридла «Регулярные выражения»

но стоит ли столь подробно

регулярка только выглядит страшной - так то она довольно простая.

Смотрите параметры загрузки в bios. Возможно там по умолчанию стоит загрузка windows