Cześć,
czy ma ktoś pomysł dlaczego dla poniższego kodu makro ukrywa tylko pierwszą kolumnę w arkuszu "FTC.023"?
W komórce B4, C4, C4, E4 w arkuszu panel sterowania jest ustawiona wartość "TAK".
Poniżej zamieszczam kod.
Sub zamykanie_miesiąca()
Sheets("Panel_Sterowania").Activate
For s = 2 To 73
If Cells(4, s) = "TAK" Then
Sheets("FTC.023").Activate
Columns(4 + s).Select
Selection.EntireColumn.Hidden = True
End If
Next s
End Sub
czy ma ktoś pomysł dlaczego dla poniższego kodu makro ukrywa tylko pierwszą kolumnę w arkuszu "FTC.023"?
W komórce B4, C4, C4, E4 w arkuszu panel sterowania jest ustawiona wartość "TAK".
Poniżej zamieszczam kod.
Sub zamykanie_miesiąca()
Sheets("Panel_Sterowania").Activate
For s = 2 To 73
If Cells(4, s) = "TAK" Then
Sheets("FTC.023").Activate
Columns(4 + s).Select
Selection.EntireColumn.Hidden = True
End If
Next s
End Sub