MS Word - hledání čísla v číslovaném seznamu

Napadá mě třeba - vložit na začátek dokumentu (nebo kam je libo) obsah, kde se zobrazí pouze ten tvůj styl a v něm pak už jen klikneš s CTRL na ten hledaný očíslovaný řádek...

Ano, to by asi bylo možné, díky za tip. Když bude nejhůř, tak to tak udělám. Nicméně věc je složitější v tom, že podobné dokumenty založené na stejné šabloně odevzdává řada dalších lidí, pracuje s ní řada jiných lidí... a upřímně řečeno, většina z nich si s Wordem rozumí jen tak "akorát"... Proto jsem byl požádán o nějakou šablonu... Dřív, když se číslovalo manuálně, stačilo dát ctrl+F, číslo kapitoly a bylo... Nějak se mi nechce věřit, že by taková jednoduchá věc při automatickém číslování nebyla možná...

BTW, na těch tvých stránkách nemáš nějaké zmatky v kódování češtiny?

Jj... instaloval jsem novou verzi CMS, tím se totálně rozstřelilo kódování, to jsem už srovnal, ale nakopla se databáze... potřebuju to opravit ze zálohy, jenže to není tak jednoduché, protože nová verze CMS pravděpodobně pracuje s nepatrně pozměněnými tabulkami (myslím, jak vidíš, nejsem profesionál )... Ta nová instalace CMS v zásadě přesně potvrzuje poznámku ve Tvé signatuře...

Prohlédl jsem možnosti hledání a funkce Přejít na... a zdá se, že to asi bude standardními funkcemi wordu neřešitelné...
Jedině snad... napsat si na to makro - to by snad mohlo jít...
Makro se zeptá na kolikátý výskyt stylu se má přesunout a provede tolikrát vyhledání toho stylu...

Bille, Bille... Zapomenout na takovouhle trivialitu?
Já jsem to řešil ještě oklikou, že jsem nadpis nastavil úroveň 1 a v případě potřeby přepnul za zobrazení "osnova". Jenomže i tohle bylo bohužel pro lidi, co s tím dále pracovali, zbytečně komplikované, oni by potřebovali prostě klasické Goto.

Takže první nástřel (bez ošetření chyb u zadávání).

Makro vložit do dokumentu a buď přiřadit kombinaci kláves nebo vložit na začátek dokumentu hledací tlačítko s nápisem GOTO?

Edit: kdyby vadilo, že nalezený odstavec je označen do bloku, tak jsem přidal na konec ještě vypnutí bloku...

Sub Hledat_n_ty_vyskyt_stylu()
 kolik = Val(InputBox("Na kolikátý?"))
    Selection.HomeKey Unit:=wdStory
    Selection.Find.ClearFormatting
    Selection.Find.Style = ActiveDocument.Styles("NAZEV_HLEDANEHO_STYLU")
    With Selection.Find
        .Text = ""
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    For i = 1 To kolik
        Selection.Find.Execute
    Next i
    Selection.HomeKey Unit:=wdLine
End Sub

Tak tohle bych fakt nedal... Já končím u základů php...

Díky moc, vyzkouším... Ale teď musím odejít od compu, vrátím se v podvečer, pustím se do toho... Jestli můžu poprosit, koukni na tohle vlákno někdy večer, v noci...

Díky.

Jo tos neřekl, že jde o wordovský styl Nadpis - na něj se pak (pokud je použita jen jedna úroveň třeba Nadpis 1) dá jít rovnou funkcí Přejít na...:

Ještě rychlá odpověď - nejde o něj, je to "můj" styl "Obraz", jen jsem pro zjednodušení napsal "nadpis". Ale jestli to u nadpisu jde takhle, tak prostě z Obrazu udělám Nadpis a bude to... To by bylo lepší... Otázka ale je, že když má Word má těch nadpisů víc a v tom screenshotu vidím jen jeden, jestli to bude fungovat na Nadpis 1 nebo jak... Ale určitě zkusím...

Bohužel tohle skáče na jakýkoliv wordovský nadpis, takže použít jen jednu úroveň.
Rychlý klíč Ctrl+G

Ano, takhle to funguje. Díky. Sice mě překvapuje, že u MS na tohle zapomněli, resp., že to dodnes nikdo nepotřeboval/neurgoval, ale trik s Nadpisem funguje a myslím, že je to únosné i pro ostatní spolupracovníky... Předělám tedy šablonu a bude to.

Ještě jednou díky.