• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Replace

Zaslal/a vary 25.1.2016 12:10

Narazil sem na další problém se kterým si nevím rady jedná se o odstranění uvozovek.
mám proměnou nazev, která bere hodnotu z buňky:
nazev = Sheets("List1").Cells(i, 28).Value
jenže:
nazev = "textZbunky"
potřeboval bych:
nazev = textZbunky
dá se nějak pomocí replace ty uvozovky odstranit? našel jsem něco ve stylu:
nazev = Replace(nazev, chr(34), "_")
jenže tohle mi právě nefunguje.
někdo kdo už uvozovky odstraňoval nebo ví jak na to a poradí? díky!!!

Zaslat odpověď >

---

elninoslov(25.1.2016 12:40)#029543

Čo prosím ? Ak myslíte úvodzovky ktoré ohraničujú textový reťazec, tie tam v skutočnosti niesú, to len symbolizuje že hodnota je reťazec. Ak reťazec skutočne obsahuje uvodzovky tak ich uvedený príkaz musí odstrániť. Vyskúšajte, čo Vám dá
ASC(Left(nazev, 1))citovat

vary(25.1.2016 12:55)#029546

dejme tomu ze v bunce A1 je text abcd
nazev = Sheets("List1").Cells(1, 1).Value
tzn:
nazev = "abcd"

no a já pak potřebuji:
nazev.Object.BorderColor = &H0&

jenže objekt "abcd" neexistuje existuje jen objekt abcd
po:
ASC(Left(nazev, 1)) se nazev = 111citovat

vovka.h(25.1.2016 13:14)#029547

Nejspíš máte jiný Excel než já a elninoslov. Popisujete problém, který v Excelu není! Ta chyba bude vznikat nejspíš mezi vaší klávesnicí a židlí...
Pardon, už to vidím:
nazev.Object.BorderColor = &H0&
Problém spočívá ve vašem pojetí toho, jak volat objekt...citovat

vary(25.1.2016 13:24)#029548

to bude nejspíše ono tzn: že ten problém je opravdu mezi mou klávesnicí a židlí citovat

vary(25.1.2016 14:03)#029549

tak sem to vyřešil tak jak mi mé znalosti dovolily:
Sheets("List3").OLEObjects(nazev).Object.BorderColor = &H0&
i tak díky !!! citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse