< návrat zpět

MS Excel


Téma: Vlastní panel nástrojů rss

Zaslal/a 20.5.2010 10:29

Zdravím všechny příznivce Excelu a VBA,
mám takový dotaz, neb jsem si vytvořil nový panel nástrojů v MS Excel 2003, na něm jsem si vytvořil tlačítka, ke kterým jsem přiřadil naprogramovaná makra a tento vlastní panel jsem i zkopíroval do daného sešitu, ale když jej přepošlu jinam, tak se mi zobrazí prázdný panel nástrojů bez tlačítek, ale makra tam jsou.
Nevíte někdo, jak přenést ten soubor na jiné PC i s těmi tlačítky?
Děkuji za Vaše tipy.
2 2

Zaslat odpověď >

icon #001702
Poki
Zdravím,
pokud vím, tak nastavení excelu je uloženo v každém PC ve skrytém souboru personal.xls.
Pokud jde o to, jak mít v jednom konkrétním souboru jeden konkrétní panel nástrojů - je nutné mít v tomto souboru makro, které při spuštění souboru panel vytvoří a na něm vytvoří tlačítka, kterým přiřadí makra.
Před zavřením souboru pak musí další makro panel odstranit, protože by v PC zustal.citovat
#001703
avatar
Zdravím, jde o to, že jsem to vyhotovil u sebe doma, ale pro někoho a ta dotčná osoba to na jenom PC otevřela se vším, tedy i s tlačítky, ale jinde zase bez nich, jen prázdný panel. A ot je ten problém.
Nechci tvořit panel makrem, ani jej po skončení práce z PC zrušit, panel musí být přiřazen k sešitu a toť hotovo.
Děkuji za Vaše názory. :-) 4citovat
icon #001705
Poki
No, jde o to, ze panely nastrojů nejsou prirazeny ke konkretnimu sesitu, ale vzdy jen k personal.xls na konkretnim PC, takze jedina moznost, jak zdanlive personalizovat konkretni sesit je ten, ze se pri otevreni sesitu makrem panel vytvori a pak zase zrusi... Jinou moznost nevidimcitovat
#001708
avatar
No jo, ale jak můžu zrobiz to makro, které mi vytvoří tento panel i s talčítky? Ale já mám tyto tlačítka specifická, tudíž jsou na nich různé ůprav.Dík za info. 4citovat
icon #001710
Poki
Panel s jednim tlacitkem vytvoris snadno (dalsi talcitka jsou taky snadne) - pokud ti staci ty tlacitka s popisem, bude to takhle:

Nasledujici procedura by mela byt spoustena pri otevreni, tedy Private Sub Workbook_Open()
Sub Vytvor_panel()

CommandBars.Add "Panel"
CommandBars("Panel").Controls.Add msoControlButton

With CommandBars("Panel").Controls(1)
.Style = msoButtonCaption
.Caption = "Popisek tlačítka"
.OnAction = "objemy" 'toto je nazev makra, ktery tlacitko spousti
.BeginGroup = True
End With

With CommandBars("panel")
.Visible = True
.Position = msoBarLeft
End With

End Sub


a tento kod panel zrusi (idealne pri zavreni sesitu: Private Sub Workbook_BeforeClose(Cancel As Boolean))
Sub Smaz_panel()
CommandBars("Panel").Delete
End Sub
citovat

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

Oddělovač polí

Milan-158 • 1.3. 16:01

Oddělovač polí

Whooocak • 1.3. 15:14

Vkládání dat z formuláře na zamknutém listu.

Milan-158 • 1.3. 15:12

Vlastne planovanie zmien

Anonym • 1.3. 7:56

Vkládání dat z formuláře na zamknutém listu.

Začátečník • 28.2. 19:34

Vkládání dat z formuláře na zamknutém listu.

Zdenys84 • 28.2. 19:05

Vkládání dat z formuláře na zamknutém listu.

Zdenys84 • 28.2. 19:00