Excel VBA: Vyhledání položky dle ID a změna hodnoty ve vedlejší buňce

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Goo
nováček
Příspěvky: 28
Registrován: duben 17
Pohlaví: Muž
Stav:
Offline

Excel VBA: Vyhledání položky dle ID a změna hodnoty ve vedlejší buňce

Příspěvekod Goo » 23 led 2018 18:32

Dobrý den

Pokouším se ulehčit si práci s excelem a možná budete vědět. Mám seznam skladových položek. Mám formulář, do kterého chci navést ID materiálu (například název) a množství položek, které chci vyskladnit.

Potřebuji vyřešit makrem, aby se prohledal seznam skladových položek a upravilo se jejich aktuální množství na skladu, v závislosti právě na počtu vyskladněných kusů.

Vzorce mi jakž takž jdou, tak jsem se pokoušel řešit vlookupem, ale jak tuto funkci zapracovat do makra, na tom jsem ztroskotal. Přikládám .xls, aby bylo pochopitelnější, co řeším.

Za případné rady děkuji
Přílohy
SKLAD.xlsm
(18.25 KiB) Staženo 59 x

Reklama
guest
Pohlaví: Nespecifikováno

Re: Excel VBA: Vyhledání položky dle ID a změna hodnoty ve vedlejší buňce

Příspěvekod guest » 23 led 2018 21:10

A na co makra? Vystačíte si s plus a minus, pokud budete jo fajnšmekr, tak nějaký ten SUMIF, kontingenční tabulka. Přemýšlejte u toho.

Goo
nováček
Příspěvky: 28
Registrován: duben 17
Pohlaví: Muž
Stav:
Offline

Re: Excel VBA: Vyhledání položky dle ID a změna hodnoty ve vedlejší buňce

Příspěvekod Goo » 24 led 2018 07:21

Bohužel, není zde vypsán celý proces, který potřebuji udělat a v podstatě si neumím představit fungování s pomocí vzorců. Pro lepší nástin upřesním:

Mám jakési výrobní šablony v excelu, tedy formulář, kde zadám základní údaje a vygeneruje se mi nákres a rozpis jednotlivých materiálů. Mimo jiné se mi vygeneruje také seznam použitých komponent a materiálů. Já pak mohu ručně vyhledávat v tabulce skladové evidence právě použitý materiál a ručně měnit hodnoty, ale doufal jsem, že do vedlejšího listu tento výpis nakopíruji.

Chtěl jsem následně udělat makro, které:
- Vybere první buňku prvního řádku (kde bude třeba ID položky) a jeho hodnotu si nakopíruje do paměti. Zároveň si načte hodnotu ve vedlejším sloupci, což bude hodnota příjmu/výdeje.
- Následně bude pomocí „if“ hledat v určeném sloupci v listu skladových položek tak dlouho, dokud nenajde identickou hodnotu.
- Když ji najde, tak zase ve vedlejší buňce jen udělá matematický výpočet a upraví finální hodnotu
- Následně se přesune na druhý řádek v listu, kde bude „výdejka“ materiálu a prohledávání a záměnu bude opakovat.
- Takto by opakovalo tak dlouho, dokaď nenarazí na konec.

Tak nějak si myslím, že by to mělo makro dělat, takže se už nějakou dobu pokouším to zrealizovat. Nějak tady skládám cyklus for, pokouším se pracovat s proměnnými, výběrem textu…ale vždy když vyřeším jeden problém, tak mi skočí hned druhý a zase den hledám specifikaci jednotlivého příkazu. Proto to zkouším tady.

Goo
nováček
Příspěvky: 28
Registrován: duben 17
Pohlaví: Muž
Stav:
Offline

Re: Excel VBA: Vyhledání položky dle ID a změna hodnoty ve vedlejší buňce

Příspěvekod Goo » 27 led 2018 18:32

Nikdo neví? Zablokoval jsem se ve fázi, kdy:
- Načtu hodnotu z buňky E3 a uložím do proměnné (ID materiálu, který hledám)
- Načtu hodnotu z buňky F3 a uložím do další proměnné (počet jednotek, které přijímám na sklad)
- Vyberu oblast, kterém vyhledávám ID
- Naleznu v oblasti buňku se stejnou ID a zvýrazním buňku.

Nyní ale potřebuji načíst hodnotu z vedlejší buňky s vyhledanou ID, načíst její hodnotu a k ní připočíst uloženou hodnotu z buňky F3.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Součet hodnot s prázdnou vedlejší buňkou Příloha(y)
    od Karrex » 22 kvě 2023 17:00 » v Kancelářské balíky
    7
    1863
    od elninoslov Zobrazit poslední příspěvek
    23 kvě 2023 22:38
  • Nastavení měřítka obrazovky na jiné, než předdefinované hodnoty Příloha(y)
    od Grander » 29 čer 2023 17:34 » v Windows 11, 10, 8...
    0
    1050
    od Grander Zobrazit poslední příspěvek
    29 čer 2023 17:34
  • změna CPU?
    od sign0r » 07 říj 2023 21:32 » v Rady s výběrem hw a sestavením PC
    3
    1539
    od Alferi Zobrazit poslední příspěvek
    07 říj 2023 22:08
  • Změna hesla
    od draxxx » 25 říj 2023 20:49 » v Windows 11, 10, 8...
    0
    1306
    od draxxx Zobrazit poslední příspěvek
    25 říj 2023 20:49
  • Zmena IP adresy
    od ShadowWord:Pain » 15 zář 2023 09:49 » v Sítě - hardware
    11
    2215
    od petr22 Zobrazit poslední příspěvek
    15 zář 2023 12:48

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 2 hosti