zdravím potřebuji poradit zda se dá nějak vytvořit podmínka na to jestli je vytvořen textbox.
např takto:
if TextBox("name") = exist then
.....
nemůžu na to pořád přijít
díky :-)
Potřebuji poradit.
v buňce mám vzorec
=KDYŽ(D16="";"";ZAOKROUHLIT((F16*(1-G16)*(1+J16)*(1+$D$8))*(1+$D$6);0))
jak bych takový vzorec napsal ve formátu R1C1 ve VBA
když bych chtěl ten vzorec do bunky
Sheets("blabla").Range("K" & i) =
díky. vyřešeno pomocí statusBaru :-)
zdravím,
potřebuju poradit.
nevím jak mám udělat to ,že když probíhá nějaké macro tak bude na obrazovce formulář který bude vypisovat probíhá... hotovo x %
samozřejmě hodnota x je proměnná
co mam použít aby se do toho formuláře zapisovala ta proměnná a ne pouze statický text
př. u msgBox takhle
MsgBox "Probíhá... hotovo: " & x
ale tady musím po každém cyklu kliknout na ok a to nechci.
Díky moc chlapi funguje to přesně jak má :-) Díky.
jo díky už jsem na to přišel a nevíš jak udělat to samé na diakritiku?
zdravím,
listprvní (1,1) = Ahoj jak se máš
listdruhý (1,1) = máš
mám podmínku
If Sheets("prvni").Cells(1, 1).Value Like ("*" + Sheets("druhy").Cells(1, 1) + "*") then
nyní je podmínka splněna
Potřebuju
listdruhý 1,1 = mas (Aby to porovnání ignorovalo diakritiku a podmínka tím pádem bude splněna)
díky :-)
vyzkoušel jsem a funguje to Díky.
a kdybys mi to mohl i vysvětlit? co znamená to mid a pak co znamena to 2,2 jestě jednou díky
Zdravím,
narazil jsem na problém. Mám:
sheets("první").cells(1, 1) = ahoj
sheets("druhy").cells(1, 1) = *ah*
potřebuju však:
sheets("druhy").cells(1, 1) = ah
a hvezdičky zapsat do kódu:
if sheets("první").cells(1, 1).Value Like sheets("druhy").cells(1, 1) then
zkouším:
if sheets("první").cells(1, 1).Value Like sheets("druhy").cells("*"1, 1"*") then
TO JE ALE BLBOST.
Nevíte někdo jak má zápis vypadat díky :-)
ano jedna se o cyklus
For a = StartAutomatPolozka To KonecAutomatPolozka
if Sheets("blabla").Cells(1, 2).Value Like Sheets("pepe").Range("PStartAutomatPolozka:PKonecAutomatPolozka").Value Then
takhle by to bylo uplně nejlepší to však jak ste psal fungovat nemůže nevite prosim co stim?
nevíte někdo co stim mam delat? proc mi to nejede?
If Sheets("blabla").Cells(1, 2).Value Like Sheets("pepe").Range("P15:P22").Value Then
pise mi to type mismatch
blbne mi tam to range protože když tam bylo cells tak to krasne fungovalo potrebuju ale rozsah :-) díky
díky ti moc s tím like by mi to mělo stacit. a slepy nejsi neuvedl jsem vba jsem novacek fora promin a ještě jednou diky
no moje podmínka vypadá takhle
If Sheets("blabla").Cells(1, 1) = "aoj" then
takhle to tu buňku s hodnotou ahoj nejde to nějak napsat takhle? abych jen upravil text v uvozovkách?
Zdravím,
Chtěl jsem se zeptat, jestli jde udělat podmínka na část slova. Uvedu příklad.
V buňce A1 mam text AHOJ a potřebuju tuhle buňku najít, i když v podmínce bude jen část slova např. A nebo AHO nebo AOJ prostě aby nemuselo být úplně stejné jak v buňce kterou hledám.
Myslel jsem že bude fungovat zápis “*A*“ nebo “*AHO*“ nebo “*AOJ*“ to mi ale nefunguje poradí mi někdo?
Díky.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.