Příspěvky uživatele
< návrat zpět
Funguje super. Děkuji za pomoc.
Dobrý den,
prosím o radu ohledně vzorce pro přiřazení stejné hodnoty nebo nejbližší vyšší z druhé tabulky na základě podmínky stejné položky viz přiložený soubor. Z modrého sloupce (G) přiřadit stejnou nebo nejbližší vyšší hodnotu do každého řádku sloupce (C) dle hodnoty ve sloupci (B). Děkuji za nápady.
OK, děkuji za cenné rady.
Děkuji, vyzkouším. S VBA začínám, tudíž děkuji, že se mohu přiučit.
Pokud jsem dobře pochopil zadání a pokud nevadí pomocný sloučený sloupec, tak by mohlo snad jednoduše fungovat viz přiložený soubor.
Zdravím a prosím o radu. Mám vytvořené jednoduché makro, které otevře několik souborů xlsx, kde provede jednoduchou úpravu, uloží a zavře. Prosím o radu zda je možné toto provést nějakým cyklem abych nemusel vytvářet a volat makra postupně. Vždy se provede stejná úprava, ale v jiném souboru s jiným daty. Souborů může být až např. 10. Všem děkuji.
Sub uprav()
Call Z1
Call Z2
Call Z3
Call Z4
Call Z5
End Sub
Sub Z1()
With Workbooks.Open(ThisWorkbook.Path & "\Z1.xlsx")
For x = 1 To Cells(Rows.Count, 2).End(xlUp).Row
Cells(x + 1, 1) = Cells(x + 1, 3).Value & Cells(x + 1, 4).Value
Next x
.Save
.Close
End With
End Sub
Sub Z2()
With Workbooks.Open(ThisWorkbook.Path & "\Z2.xlsx")
For x = 1 To Cells(Rows.Count, 2).End(xlUp).Row
Cells(x + 1, 1) = Cells(x + 1, 3).Value & Cells(x + 1, 4).Value
Next x
.Save
.Close
End With
End Sub
Oba kódy pracují naprosto super a splňují moje potřeby. Děkuji za Vaši pomoc i diskusi plnou nápadů a motivace.
Velice děkuji za komentáře a především za kódy, nápady i diskusi.
Ještě jedna drobnost, v případě, že bych potřeboval variantu, když Head1-Head5 jsou již vyplněny, tak data ponechat a nepřepsat jej z Head4. Viz přiložený soubor.Děkuji.
Velice děkuji za pomoc, funguje perfektně.
Ještě doplnění k bodu 2., po kontrole tabulek je vždy zaplněn Head 1 a Head 2 tzn., že by snad mohlo jít použít pro vyhledání vždy End(xlToRight).
Děkuji za reakci. Fungovat by mělo, tak jak je to v přiloženém souboru, ale pomocí rozumnějšího kódu. Tedy vždy přesunout text, který obsahuje poslední vyplněná buňka v řádku do Head 5. Řádky se mohou měnit tzn., že jednou mám tabulku s 5 řádky a jednou s 150 a vždy potřebuji najít poslední s textem a daný text přesunout do Head5.
1. V Head 1 je vždy text
2. ano pokud je Head1 zaplněný tak také přesunout do Head5
Prosím o pomoc s vytvořením kódu pro posun vždy poslední buňky o různou vzdálenost v různém počtu řádků. Názorněji ukazuje přiložený obrázek. Počet řádků se mění. Posun v jednom řádku o přesný počet není problém, ale o různý počet a pro n řádků potřebuji pomoc. Všem děkuji za nápady.
Uživatelské menu
\nMenu
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.
RSS nejnovější články