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

MS Excel

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

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

Namiesto DOSADIT tam napíš SUBSTITUTE
A to LET tiež vynechajcitovat

Adecko(30.7.2014 13:41)#020790

SUBSTITUTE nelze, mám českou verzi Excelu.

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

marjankaj(30.7.2014 13:43)#020791

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

uz som videl pocestene visual studio .... :) takze aj to je moznecitovat

marjankaj(30.7.2014 13:46)#020794

@adecko
Alebo skús cez záznamník.

Asi tam vadí stredník ";". Daj tam čiarku ","citovat

Adecko(30.7.2014 13:49)#020795

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

Asi tam vadí stredník ";". Daj tam čiarku ","citovat

eLCHa(30.7.2014 14:01)#020797

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

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

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)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse