Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  4 5 6 7 8 9 10 11 12   další » ... 44

Takhle?

Takhle?

Takže v první tabulce máš data (která si mám vymyslet 6 ) a ty chceš např. do F3 napsat výrobek a k tomu dohledat zbytek nebo podle čeho to má vyhledávat?

Zkoušel jsem tento kód a je to v pohodě.

Dim wsZDROJ As Worksheet
Dim wsCIL As Worksheet

Set wsZDROJ = Worksheets("List1")
Set wsCIL = Worksheets("List2")

Application.ScreenUpdating = False
wsZDROJ.Range("D1:Z200").Copy
wsCIL.Range("J5").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
Application.CutCopyMode = False
Application.ScreenUpdating = True

Takhle?

Já to blbě napsal, místo 27 mělo být POCET

Není za co.

Nebylo by toto lepší?

Sub VlookUp2()

Dim wsZDROJ As Worksheet
Dim wsCIL As Worksheet
Dim POCET As Long

Set wsZDROJ = Worksheets("data")
Set wsCIL = Worksheets("EXPORT")

POCET = wsCIL.Cells(Rows.Count, "D").End(xlUp).Row - 1

wsCIL.Range("A2").Resize(POCET).Formula = "=IFERROR(VLOOKUP(D2,data!A:B,2,0),"""")"
wsCIL.Range("A2").Resize(POCET).Value = wsCIL.Range("A2").Resize(POCET).Value

End Sub

Problém je v tom, že kódy na listě "data" máš naformátována jako text a na listě EXPORT naformátována jako obecný resp. číslo.

veny napsal/a:

To se bude muset kousek po kousku ochutnávat


5 5 5

Nenapadá mě jak to ošetřit tak, aby to bylo spolehlivé. Nicméně pokud vám to alespoň malinko pomůže, tak si přemístěte tlačítko na zdrojový list, aby bylo pro uživatele viditelné a nezapoměli na archivaci.

veny napsal/a:

@Lugr nezpochybňuji tvou odpověď jen si myslím že pokud napsal "v textovém řetězci" tak bylo myšleno pokud je hledané ovoce i mezi vícero druhy.

Na to by nám ale odpověděl je zadavatel


Já to nemyslel špatně. 1

Jen nevím, jak to spočítáme, až si zadavatel udělá ovocný salát. 5

Jsou dvě možnosti. Buď se spustí makro při otevření souboru, ale to může nadělat chyby a nebo při změně buňky, ale tam taky vidím určitá rizika. nehledě na to, že jste psal(a), že "Soubor nemusí být otevřen vždy posledního v měsíci!" 8

@WB_1 Opravdu není za co, kéž by všechny problémy byly tak jednoduchý. 1

@veny, on napsal výskyt konkrétního ovoce. 1

Tak?

COUNTIFS($G$6:$G$15;C$5;$H$6:$H$15;$B6)

Mohl by jsi vložit i zdroj (CSV) a kód VBA?

Problém bude už při importu.


Strana:  1 ... « předchozí  4 5 6 7 8 9 10 11 12   další » ... 44

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21