MS Excel

Zdravím,

prosím o pomoc: pracujem s excelovými súbormi (momentálne Excel2007) kde je nepreberné množstvo listov, ktoré by som kvôli rýchlosti potreboval mať zobrazené na obrazovke nad sebou v 2 či viacerých lištách (ako na obrázku či bežne na lište windowsu). Google nezafungoval.. Ďakujem za tip

Zaslat odpověď >

Strana: « předchozí 1 2

Sestihran(26.4.2016 12:29)#031279

Jen se chci přidat k dotazu. Hodně lidí by čisté vyřešení problému ocenilo(dle 16776_2jpg).
Seznamy známe, ale při vícero listech se musí jít do další tabulky (...další listy - tab AKTIVOVAT) a tam šoupat posuvníkem.
To je potom pohodlnější vytvoření odkazů na list.citovat

nunus67(26.4.2016 15:34)#031283

Mne pomaha take makro:
Sub SeznamListu()
Dim i As Long
On Error Resume Next
Application.DisplayAlerts = False
Sheets("Seznam Listu").Delete
Application.DisplayAlerts = True
On Error GoTo 0
ThisWorkbook.Sheets.Add Before:=ThisWorkbook.Worksheets(1)
ActiveSheet.Name = "Seznam Listu"
For i = 1 To Sheets.Count
ActiveSheet.Cells(i, 1).Select
ActiveSheet.Hyperlinks.Add Anchor:=ActiveSheet.Cells(i, 1), Address:="", _
SubAddress:="'" & Sheets(i).Name & "'!A1", TextToDisplay:=Sheets(i).Name
With ActiveCell.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = Sheets(i).Tab.Color
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Next i
End Subcitovat

xlnc(26.4.2016 18:31)#031289

@elcha: Vy jste mi dal, já furt, že je to bez API, jak to, že je kód tak krátký.. už blbnu a dojel jsem na Label a kousek třídy, ach jo :-) Jinak z běžných prvků právě ListBox a Frame mají snadno zjistitelný handle (dokonce přímo ze skryté vlastnosti ve VBA), takže si myslím, že s tunou API by ListBox obarvit šel. Ale na to jste lepší vy...citovat

Jeza.m(27.4.2016 14:19)#031304

Takový pokus v příloze. Daný exe soubor je možno zavolat makrem z jakéhokoliv excelového souboru pomocí shell.
Případně si na dané makro nastavit klávesovou zkratku.
Spustit jde i samostatně. Při každé aktivaci okna programu načte listy posledního aktivního (stále spuštěného) excelu.
Ne že bych to použil, ale byla to taková výzva :-). Když na to přijde můžu poskytnout zdroj k úpravě, ale sem se to nevejde.

M@

Příloha: zip

31304_listbar.zip (222kB, staženo 40x)

citovat

Strana: « předchozí 1 2

Téma: Dve lišty listou pod sebou

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje