< návrat zpět

MS Excel


Téma: Replace rss

Zaslal/a 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ěď >

#029543
elninoslov
Č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
#029546
avatar
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
#029547
avatar
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
#029548
avatar
to bude nejspíše ono 5 tzn: že ten problém je opravdu mezi mou klávesnicí a židlí 5citovat
#029549
avatar
tak sem to vyřešil tak jak mi mé znalosti dovolily:
Sheets("List3").OLEObjects(nazev).Object.BorderColor = &H0&
i tak díky !!! 5citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje