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

Příspěvky uživatele

Skús odcheckovat (zrušiť fajku) v položke Display item labels when no fields are in the values area, viď obr.

edit: Je možné, že hore navrhnuté sa ti nepodarí a ani si nie som istý, že to bude fungovať na 100%.

Fungovať by mohlo nasledujúce:
1. Z KT odstráň príslušný popisok riadku, v ktorom to blbne (pole, kde sa nachádzajú tie položky z obrázku)
2. Refreshni tabuľku
3. Popisky riadkov vráť späť do KT

marjankaj, tlieskam za vtipnú odpoveď :)

Vladimíre, problém možno bude len to, že termín makrokamera pmn nikto okrem Vás nepoužíva. Zažitý názov je záznamník makier.

Petře, pekné. Asi nepoužijem Shift+Enter a Shift+Tab, je ale fajn dozvedieť sa, že niečo také existuje...

@Jeza
ten vnútorný cyklus by som asi nahradil niečím iným, napr. testom prostredníctvom countif, kvôli zrýchleniu behu makra.

O tom, Petře, práve hovorím :). Proste, záujem nula. Keď budeš mať cestu z Liberca do Prahy, môžeme sa stretnúť. To samé s Karlom. Ale pokiaľ teda budeme iba traja, tak 2 osoby kľudne privítam a ubytujem i u nás doma, na to žiadny penzión nepotrebujeme :)

Záujem zatiaľ nič moc, takže?

napr. cez vlastnost FullName objektu Workbook. V okne immediate:

? Left(ActiveWorkbook.FullName,2)

@ chezy
v kladeni otazok pokracuj v povodnom vlakne, ktore si zalozil 15.10.2017
Toto vlakno zamykam.

Urobim to cyklom, obom Vam dakujem.

Ahoj, priznam sa, ze sa mi nechce moc hladat, tak sa pytam: Nemate niekto po ruke code snippet, ktory by spojil data z dvoch poli (pole A a pole B) nasledovne:
A B Vysledok
a m am
b n bn
c o co
d p dp
Rad by som to urobil na urovni poli vo VBA a bez cyklu. Je to mozne, alebo sa bez cyklu, kde to budem spajat postupne po jednotlivych elementoch oboch poli (from lbound to ubound) neobidem?

24.11. nie je vikend, je to piatok. 24.11. sme pozvani na hon a nasich dvoch madarskych stavacov o to nemienim pripravit. 25.11. a/alebo 26.11. by som snad mohol

Jirko, 90% uzivatelov nema ani tucha, ze existuje VBA, natož nejaké power, ci ine query. Asi kazdy zijeme v inom svete.
Edit: Ak sa ale to percento tykalo poctu vyskytu verzii Excelu 2010 a vyssich, tak to sa priet nebudem, to je mozne, ze to bude niekde na tej hodnote. K rozsireniu pouzivania power nastrojov stale ale cesta dlha. Osobne napr. davam stale prednost Accessu.

Preto, Petře, že ten kód je špatne napísaný. Očakáva dátum v tvare d.mm.rrrr a pokial dostane dd.mm.rrrr tak si s tým nevie poradiť. Ako som zmienil, korektný postup je prepísať makro tak, aby s dátumom pracovalo ako s numerickou hodnotou, nie textom, v podstate to, čo si napísal Ty. Ničmenej, pokiaľ nebudem trvať na čistom riešení, tak zmena regional settings v tomto prípade pomôže.

Bez makra tazko a v pripade makra to uz nebude svyhledat. Nastrel makra:Sub AssignPrice()
Dim srcRng As Range, tgtRng As Range, cell As Range, copyWhat As Range
Set srcRng = [I1].CurrentRegion
Set tgtRng = [A1].CurrentRegion
Set tgtRng = tgtRng.Offset(1, 0).Resize(tgtRng.Rows.Count - 1, 1)
For Each cell In tgtRng.Cells
On Error Resume Next
Set copyWhat = srcRng.Cells(WorksheetFunction.Match(cell, srcRng.Columns(1), 0), 2)
On Error GoTo 0
If Not copyWhat Is Nothing Then copyWhat.Copy cell.Offset(0, 1)
Set copyWhat = Nothing
Next cell
End Sub

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje