-
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
-
Sprite75
tag
válasz
jackal79 #44962 üzenetére
Próbéltam ilyet keresni de nem találtam. A lap elrejtős/felfedős dolog is jó lehetne szerintem neked, ha azt meg lehetne úgy csinálni makróval, hogy ha fel akarod fedni az elrejtett lapokat akkor kérjen jelszót.
Amit most kipróbáltam hogy pl a Munka2 lapot elrejteni és felfedni makróval, jelszóval védve a füzetvédelem segítségével, csak ezzel az a baj hogy a makrót bárki tudja használni aki megnyitja a táblázatot
Sub lezár() ' A Munka2 lapot elrejti és zárja le jelszóval
Sheets("Munka2").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("Munka1").Select
ActiveWorkbook.Protect 1, Structure:=True, Windows:=False ' Az 1 a jelszó
End Sub
Sub kinyit() ' A Munka2 lapot felfedi
ActiveWorkbook.Unprotect 1 ' Az 1 a jelszó
Sheets("Munka1").Select
Sheets("Munka2").Visible = True
End Sub
Új hozzászólás Aktív témák
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- ESET termékek hivatalos forgalmazója / NOD32 / Internet Security / Android / Server / Mail / stb.
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Cégek számára kedvezmény! Irodai programok: Office, Word, Excel