boh, forse ho capito
prova così:

Inserisci un tastino e assegnaci questa macro:

codice:
Private Sub CommandButton1_Click()

    colonnainizio = 1
    colonnafine = 5
    rigavalore = 2
    
    
    For col = colonnainizio To colonnafine
        If ActiveSheet.Cells(rigavalore, col) = "" Or ActiveSheet.Cells(rigavalore, col) = 0 Then
            ActiveSheet.Columns(col).EntireColumn.Hidden = True
        Else
            ActiveSheet.Columns(col).EntireColumn.Hidden = False
        End If
    Next col

End Sub
le prime due variabili identificano l'intervallo di colonne da analizzare 1 = A, 2 = B, ecc...
qui agisce dalla colonna 1 alla 5 (da A ad E)
la terza variabile determina la riga da analizzare.

boh, prova, tieni presente che la macro nasconde le colonne, poi le devi scoprire in modo manuale, se non automatizziamo qualcosa in più

ciao ciao