Új hozzászólás Aktív témák

• #49099 Delila_1 veterán andreas49 #49098

  Új Válasz 2022-05-24 13:46:09 #49099

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz andreas49 #49098 üzenetére

  Sub AblakRogzites()
    Dim lap As Integer
    Application.ScreenUpdating = False
    For lap = 1 To Worksheets.Count
        Sheets(lap).Select
        Range("B2").Select  'Itt írd át a rögzítés helyét
        ActiveWindow.FreezePanes = True
    Next
    Application.ScreenUpdating = True
End Sub

  Ez a makró minden lapon rögzíti az ablaktáblát B2-ben. Az első sor és első oszlop nem mozdul el görgetéskor. A B2 helyét átírhatod az igényednek megfelelően.

Új hozzászólás Aktív témák