MS Excel

Téma: VBA Select case Nejde

Zaslal/a kristv 6.2.2011 10:51

Dobrý den.
Prosím o pomoc s funkcí Select Case.
Na list Parametry dělám seznam listů s hypertextovými odkazy.
Potřebuji, aby fyzické názvy listů zůstaly, ale v seznamu v Parametrech mohly bý jiné názvy a přitom odkazy jsou stále na fyzické názvy (potřebuji to kvůli několikajazyčné tabulce). Zkouším pomocí Select case, podle tlusté knihy o VBA. Netuším, co dělám špatně, už si nevím rady. Přikládám vzorový soubor, v makru jsou popsány moje kroky. Moc díky. Krist

Příloha: zip

4024_nejde_case.zip (12kB, staženo 28x)

Zaslat odpověď >

Poki(6.2.2011 12:59)#004025

Problem bude zrejme v definovani Case.
Vas kod:
Select Case vyhl_list.Name
Case naz_list = "prvni": naz_list = "ahoj prvni"
Case naz_list = "druhý": naz_list = "ahoj druhý"

Case Else
naz_list = vyhl_list.Name
End Select

Tucne by v kodu byt nemelo, protoze v radku Select Case definujete, k cemu se onen Pripad (case) vztahuje.

Když tedy vyberete Case jako 'list.name', musi byt pri vyberu pripadu jiz jen hodnota pripadu: Case "prvni".

Snad to pomuze...citovat

kristv(7.2.2011 5:45)#004030

No jasně. Tak pro ostatní se stejným problémem :

Select Case vyhl_list.Name
Case Is = "prvni": naz_list = "ahoj prvni"
Case Is = "druhý": naz_list = "ahoj druhý"

Case Else
naz_list = vyhl_list.Name
End Select

Poki, moc děkuji za pomoc. Prostě kdo umí, ten umí. Ale takových, kteří umí a ještě jsou ochotni pomoci jiným, moc neexistuje.
Ještě jednou tisíceré díky.
Kristcitovat

Téma: VBA Select case Nejde

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje