Děkuji, ale to můj problém neřeší. Potřebuji,aby se do listů vkládala data a aby se zabránilo přidání listu tímto tlačítkem. Je to pro lidi s nulovou znalostí Excelu, kteří nejsou schopni omylem vložený list odstranitcitovat
No ja to mám takto(slovenský excel 2010)
Súbor > informácie > zabezpečiť zošit > zabezpečiť struktúru zošita > a zaškrtnúť štruktúru, zvoliť heslo a > OKcitovat
Vo VBA vlož do ThisWorkbook (Tento sešit) kód:
Private Sub Workbook_NewSheet(ByVal Sh As Object)
Application.DisplayAlerts = False
Sh.Delete
Application.DisplayAlerts = True
End Subcitovat
@Jirka70: Buď si pleteš tlačítka "Zamknout list" a "Zamknout sešit", nebo jsi mé řešení vůbec nevyzkoušel. Testoval jsem na Office 2010, a funguje dokonale. Je to nejjednodušší řešení, navíc přímo zabudované do Excelu.
P.citovat
Pavlus - vyzkoušel, funguje, ale makrem vkládám listy, které pojmenuji atd. - a to v navrhovaném postupu nejde. Šlo by to ještě tak, při zavření souboru, List přidaný tímto tlačítkem odstranit.
Nepřišel jsem na to jak List pokaždé s jiným číslem odstranit. Ostatní listy v souboru jsou pojmenovány jinak než "List .."
Hav-Ran - hlásí Compile error:Only comments may apper after End Sub,End Function or End Properitycitovat
Bez přílohy těžko říct, o co přesně ti jde.
Každopádně, když už tam máš makra, tak lze uzamknout a odemknout sešit i příkazem VBA.
Zamčení sešitu: ActiveWorkbook.Protect Structure:=True, Windows:=FalseOdemčení sešitu: ActiveWorkbook.UnprotectJednoduše si tedy před vložením listu makrem můžeš sešit odemknout, a po vložení listu zase zamknout. Pokud máš dobře napsané "zadání", pak toto musí splňovat požadavek ;-)...
P.citovat