2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
Keresés
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    IT café

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

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

  • #38095 Delila_1 veterán dellfanboy #38093
    Új Válasz #38095
    Ú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 dellfanboy #38093 üzenetére

    A ThisWorkbook laphoz kell rendelned a makrót.

    Private Sub Workbook_Open()
    Dim honap As String

    honap = Chr(Month(Date) + 64)
    With Sheets("Munka1") 'Írd át a lap nevét
    .Columns("A:N").Locked = True
    .Protect Password:="TitkosJelszó", UserInterfaceOnly:=True 'Írd át a jelszót
    .Columns(honap & ":N").Locked = False
    End With
    End Sub

    A füzetben Alt+F11-gyel bejutsz a makró szerkesztőbe. Bal oldalon kiválasztod a füzetedet, majd azon belül a ThisWorkbook lapot. A jobb oldalon lévő üres felületre másold be a makrót. A füzetbe visszalépve makróbarátként kell elmentened.

    Mikor megnyitod a füzetet, ez a makró automatikusan lefut, és elvégzi a feladatot.

    Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

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