< návrat zpět

MS Excel


Téma: Skryvani a opetovny zobrazovani panelu nastroju rss

Zaslal/a 4.2.2013 22:31

Ahoj, narazil jsem na dalsi vec.
Chtel jsem udelat, aby soubor pri otevreni skryl Mrizku, Nadpisy, Radek vzorcu, to se povedlo. Ale taky aby si minimalizoval panel nastroju, coz se taky povedlo. Udelal jsem to timto kodem:

Sub ShowGridHeader()
Application.ScreenUpdating = False
With ActiveWindow
' zobrazeni mrizky
.DisplayGridlines = True
' zobrazeni nadpisu (cisla a pismena)
.DisplayHeadings = True
' zobrazeni radku vzorcu
.Application.DisplayFormulaBar = True
End With
Application.ScreenUpdating = True
End Sub

Sub HideGridHeader()
Application.ScreenUpdating = False
With ActiveWindow
' zobrazeni mrizky
.DisplayGridlines = False
' zobrazeni nadpisu (cisla a pismena)
.DisplayHeadings = False
' zobrazeni radku vzorcu
.Application.DisplayFormulaBar = False
End With
Application.ScreenUpdating = True
End Sub

Sub Minimize_Ribbon()
If Application.CommandBars("Ribbon").Height > 80 Then SendKeys "^{F1}"
End Sub

Sub Full_Ribbon()
' If Application.CommandBars("Ribbon").Height < 80 Then SendKeys "^{F1}"
SendKeys "^{F1}"
End Sub

Bohuzel, pri zavirani bych chtel aby se to zase vse pozapinalo. Vsechno fungovalo mimo panelu nastroju. misto toho aby se objevil, vzdy naskocila napoveda excelu (JAKO BY V KODU BYLO IGNOROVANO CTRL A MACKALO SE JEN F1).

Na netu jsem nasel dalsi reseni (viz prilozeny soubor). To ale schovava uplne vsechno nahore, OTAZKA1: nevite jak se to da zpatky zobrazit z toho otevrenyho souboru?

Otazka2: jak by sa dal vyresit prvni pripad? proc se zapina ta napoveda?

Nahledal jsem azaz a vicemene jsem nasel, ze to trapi vic lidi. Predem diky, Danny

Zaslat odpověď >

Strana:  1 2   další »
#011395
avatar
zde soubor
Příloha: rar11395_ribbony.rar (62kB, staženo 29x)
citovat
#011396
Opičák
????????????? F1 startuje nápovědu a když to v tom kodu je, tak to "napovídá"

mrkni na tento způsob, zrušeno vše k tomu účelu nepotřebné.
Příloha: zip11396_zobrazit_schovat_vsechno.zip (20kB, staženo 36x)
citovat
#011397
Opičák
Funkce pro mini a maxi pás karet. Snad to pomůže, jdu spát 2
Příloha: zip11397_pas-karet-mini-maxi.zip (19kB, staženo 37x)
citovat
#011415
avatar
Opičáku diky, vse cos poslal funguje bezvadne. Jen mi jeste chybi kod pro znovuzvetseni pasu karet z jeho mini verze. To je prave ta podivna vec, ktera vyhazuje napovedu (coz by nemela, kdyz tam je Ctrl pred F1).
stejnej zapis jako pro minimalizovani pasu karet pro obnoveni proste nefunguje.citovat
#011446
avatar
Nevite pls, jak obnovit ten panel nastroju z minimalizovani?citovat
#011447
Opičák
SendKeys "^{F1}" pokud je jako součást funkce tak funguje jako Ctrl F1 - pro pás karet, ale pokud je součástí makra, tak funguje jako nápověda. Proč? no tak to se mě zeptej.
Prvním zavoláním fce se zmenší, dalším se zvětší.citovat
#011448
Opičák
Zkus teď ....
Příloha: zip11448_pas-karet-mini-maxi-2.zip (17kB, staženo 33x)
citovat
#011449
Opičák
a nebo, což je v podstatě to samé.

Bylo odzkoušeno jen na win8 a Off2010, tohle mi funguje i na win7 a Off2007. Je pravda, že původní verze na 7 nejela.
Příloha: zip11449_pas-karet-mini-maxi_3.zip (18kB, staženo 29x)
citovat
#011450
Opičák
A po chvíli oškubávání kodu zbyde jen tohle a ejhle, vono to funguje. Vyzkoušel jsem i jiné funkční klávesy F12, Ctrl+F12 a všechno funguje, pokud jsou stisky kláves zapsány jako funkce.
Příloha: zip11450_mini-max.zip (17kB, staženo 36x)
citovat
#011499
avatar
Teda ty to sem sazis, to posledni uz je hafo jednoduchy.
Snazim se to napasovat so souboru, aby to fungovalo pri jeho zavirani, ale at zkusim cokoliv, stejne naskoci jen napoveda. Doufam, ze to predelavam spravne, ale presto, nevytvoril bys soubor, v kterym se pas pri otevreni minimalizuje a pri zavreni zase obnovi, aby kdyz pak otevru jiny soubor, byl pas karet celej. ? dik tak jako tak!citovat

Strana:  1 2   další »

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21