Super, děkuji Vovka. Tohle by se dalo použít.
U jednoho kliknutí je blbé, že to bude pořád obtěžovat uživatele, když si bude jen procházet dokument a klikat na nějaké buňky. Jestli jsem tedy správně pochopil?
Jinak úpravu dokumentu mám nastavenou právě tak, že:
dvojklik = přidání, úprava položky
pravé tlačítko myši = odstranění položky.
Děkuji
Díky za radu. Zajímavé řešení ale bohužel neřeší můj problém.
Úprava listu probíhá pomocí userformu, který se spouští pomocí dvojkliku na levé tlačítko myši. A potřeboval bych poučit uživatele o tom, že pro úpravu buňky musí dvakrát kliknout na buňku.
Zdravím, již delší dobu hledám jak nahradit hlášení na zamčeném listu "Buňka nebo graf,které se snažíte změnit, jsou na zamknutém listu...." Například MsgBoxem se svým vzkazem. Neví někdo, prosím, jak na to?
Nemůžu hlavně přijít na to, jak to makro spustit, když se uživatel bude pokoušet přepsat buňku.
Private Sub Worbook_Chance (Byval sh As object, Byval Target As range) nejde protože nedojde ke změně buňky.
Děkuji za každou radu.
Děkuji Vám za pomoc. Elninoslov: Super, ten první kód s cyklem funguje. Díky
Zdravím,
v buňce (1,1) mám zapsaný název listu, který si přiřazuje basic např.(List2). Potřeboval bych aby makro načetlo název listu z buňky (1,1) do proměnné. Poté na základě názvu zobrazilo tento list.
Nemůžu využít Aktivaci listu pomocí: Sheets("blabla").Activate protože kdyby mi uživatel přepsal název listu tak již tato funkce nebude fungovat. Stejně tak u Sheets(2).Activate protože kdyby uživatel prohodil pořadí listu nezobrazí se správný list.
Tudíž potřebuji využít aktivaci pomocí: List2.Activate
Makro mi funguje když zadám název listu přímo do kodu:
Set nazev_listu = List2
nazev_listu.Activate
Tak to funguje.
Ale když upravím kod na:
Set nazev_listu = List1.Cells(1,1)
nazev_listu.Activate
Tak to nefunguje
Nevěděl by někdo prosím jak to ošetřit? Děkuji
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.