< návrat zpět

MS Excel

Téma: zápis funkce do buňky ve VBA rss

Zaslal/a Adecko 30.7.2014 13:20

Dobrý den.
Prosím o pomoc se začátečnickou (patrně) chybou :
mám sešit pojmenovaný seznam a potřebovala bych do prvního prázdného řádku do buňky Q zapsat vzorec =KDYŽ(DOSADIT(Cx;" ";"")<>"";1;0) (x je číslo toho řádku). První prázdný řádek už nějak zjistím,ale to dosazení se mi nedaří.
Příslušný kód:

Worksheets("seznam").Activate
Range("Q" & PrvniPrazdnyRadek).Select
' Range("Q" & PrvniPrazdnyRadek).Formula = "=KDYŽ(DOSADIT(C" & PrvniPrazdnyRadek & ";"" "";"""")<>"""";1;0)"

Let ActiveCell.Formula = "=KDYŽ(DOSADIT(C" & PrvniPrazdnyRadek & ";"" "";"""")<>"""";1;0)"

Nahlásí na řádku .. Let Active.... chybu
Application-defined or object-defined error.
Chybu nehlásí v případě, že zadám .... = " =KDYŽ ...... Což ovšem není vzorec v buňce, ale text. Už nevím, kde mám hledat. (Také, když něco k nějakému problému najdu, skoro nikdy to nefunguje ). Mám Excel 2003.
Prosím o radu.
Díky a stálé zdraví přeju.

Zaslat odpověď >
Strana:  1 2   další »
marjankaj(30.7.2014 13:38)#020789
avatar
Namiesto DOSADIT tam napíš SUBSTITUTE
A to LET tiež vynechajcitovat
Adecko(30.7.2014 13:41)#020790
avatar
SUBSTITUTE nelze, mám českou verzi Excelu.

Sorry, byla jsem moc rychlá. Zkusím. Díkycitovat
marjankaj(30.7.2014 13:43)#020791
avatar

Adecko napsal/a:

SUBSTITUTE nelze, mám českou verzi Excelu.

Sorry, byla jsem moc rychlá. Zkusím. Díky


VBA neumí česky.citovat
Palooo(30.7.2014 13:45)#020793
avatar
uz som videl pocestene visual studio .... :) takze aj to je moznecitovat
marjankaj(30.7.2014 13:46)#020794
avatar
@adecko
Alebo skús cez záznamník.

Asi tam vadí stredník ";". Daj tam čiarku ","citovat
Adecko(30.7.2014 13:49)#020795
avatar
Teď je ta opověď zase jiná. Musím ale trvat na funkci excelu DOSADIT. VBA sice neumí česky, ale EXCEL má názvy funkcí česky. Funkci SUBSTITUTE tento Excel nezná.
Vynechání Let nepomohlo.
Mně to připadá, že mu vadí kombinace znaků "=
před KDYŽ. Ovšem v knihách i v příkladech na webu je to běžně používané.citovat
marjankaj(30.7.2014 14:00)#020796
avatar
Asi tam vadí stredník ";". Daj tam čiarku ","citovat
icon eLCHa(30.7.2014 14:01)#020797
eLCHa
jenom jsem tu nakoukl a moc jsem to nečetl, ale zkuste místoActiveCell.FormulaActiveCell.FormulaLocalPokud jsem mimo, taxe omlouvám a zase mizím ;))citovat
Adecko(30.7.2014 14:27)#020798
avatar
Vřelé díky všem za rady.
Vítězem se stává .FormulaLocal - už to prošlo.
Stálé zdraví přeju.

PS.
Podle jednoho komentáře na stránkách office.lasakovi.com se při použití .Formula a
anglických názvů funkcí Excelu provede překlad a Excel v češtině to podle autora "stráví".
Zkusila jsem, ale nezadařilo se. Možná je to verzí Excelu - tam se mluvilo o 2007.citovat
MJJ(30.7.2014 16:04)#020802
avatar
Ono budete-li to vždy používat na českých Office, tak použijte FormulaLocal, ale pokud to chcete univerzálně a mezinárodně funkční, tak použijte Formula, syntaxe ve VBA pak musí být anglicky a s čárkama místo středníků, Office sám si to pak převede do lokální podoby a vám se v buňce objeví klasická česká syntaxe jak jste zvyklá.

M@citovat

Strana:  1 2   další »

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