< návrat zpět

MS Excel


Téma: Okno při otevření rss

Zaslal/a 22.7.2010 13:50

Prosím o pomoc.

Potřeboval bych aby se mi hned při otevření excelu objevilo okno s dvěma tlačítky. 1. tlačítko - při zmáčknutí automicky otevře zadaný list(např. list 5) a 2. tlačítko - mi tuhle tabulku bude ignorovat a otevře se mi normálnějak bylo naposledy uloženo.

Pokud možno aby se dalo ješte někam dát zaškrtovací tlačítko a to bude nastavovat jestli se má ta tabulka otevít při otevření a nebo ne.

Dá se to prosím nějak nastavit? Děkuji moc.

Zaslat odpověď >

icon #001968
Poki
Zdravím,
tohle by Vam mohlo pomoci - tato procedura musi byt ulozena v modulu ThisWorkbook
Private Sub Workbook_Open()
If Worksheets("List1").Range("a1") = "ne" Then Exit Sub
Dim List As String
List = "List5"

Z = MsgBox("Chceš otevřít list: " & List & "?", vbYesNo, "Přejít na list")

Select Case Z
Case vbNo
Exit Sub
Case vbYes
Worksheets(List).Activate
End Select
End Sub


Pokud jde o zaskrtavaci policko - mozne to je, ale uz by to bylo o dost slozitejsi a vyzadovalo by to zapisovat "stav" policka do nejake bunky v sesitucitovat
#001969
avatar
A mohl by si mi popsat postup při tom zaškrtavavím políčku? :) pokud ne, nevadí i takhle mi to bude stačit 4 zítra v práci vyzkouším.citovat
icon #001971
Poki
S tim zaskrtavacim polickem by se to melo asi tak, ze by se musel vytvorit uzivatelskej formular, kde by se umistilo ono zaskrtavaci tlacitko, ktere by se propojilo s nejakou bunkou, takze kdyz se zaskrtne, do bunky se zapise nejaka hodnota - makro pri spusteni by se potom vzdycky nejdriv podivalo, jestli je v te bunce hodnota, ktera formular povoluje nebo zakazuje...
Problem je, ze jak bys jednou policko zaskrtl, uz by se formular nikdy neukazal (dokud bys rucne neprepsal bunku, ktera je s polickem propojena)...citovat
#001972
avatar
Dobře, zaškrtovací políčko tedy nebude.

Ale jak píšeš mohl bysme to udělat na základě té buňky na které se bude makro při spuštění koukat. Bych ručně přepisoval tu buňku. Třeba na ano(zobrazovat) nebo ne(nezobrazovat).citovat
icon #001973
Poki
Jo, to je jednoduchy - upravil jsem kod, kterej jsem uz vlozil.
Pokud bude bunka A1 na List1 obsahovat slovo "ne", procedura bude ignorovana a otevre se list, ktery byl jako posledni aktivni - bunku a list muzes jednoduse zmenit v prvnim radku procedury...citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje