-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
pero19910606
csendes tag
Sziasztok!
Macro-hoz szeretnék egy kis segítséget kérni Tőletek.
Több változós kritérium rendszer alapján szeretnék megírni egy macrot. Alap műveltekkel és néhány logikai változós kódot írtam már, de itt most egy elég összetett problémát szeretnék megoldani.
Készítettem egy folyamatábrát, remélem nagyjából érhető így, most először csináltam ilyet.A cél ugye az, hogy minden feltételt megvizsgálva eljussak az eredményig.
Az első eset:
Nincs nyitott rendelés, Készletszint = 0, Van lemondási ok --> "Folyamatos hiány"VBA: (Idézőjelek közé írtam most hogy az adott cellában milyen érték lenne, egyébként ott csak számok vannak)
If Cells(i, 11) = "Nincs nyitott rendelés" And Cells(i, 6) = "Készletszint = 0" And Cells(i, 13) ="Van lemodnási ok" Then
Cells(i, 14) = "Folyamatos hiány"Ez így egyszerű, könnyen meg van az eredmény, azonban összsen 5 elágazásom lenne, és az elágazásokban is többszörös elagázások szerepelnek, így külön kellene megírnom mindet.
Ezt így kellene megírni? Mert így ez egy logikai műveletek--> Ha az első igaz és a következő igaz és utána is igaz, akkor lesz eredmény.
Ha viszont valamelyik feltétel nem igaz, akkor ezzel a módszerrel külön meg kellene írnom ezt a sort.
Az Elseif-el kombinálva gondoltam, de egylőre nem járok sikerrel.Az lenne a jó, hogy alábbi módon fusson le a macro
1. lépés: van e nyitott rendelés? ha nincs
2. lépés : Van e készlet? Ha van
3. lépés: Elegendő e a következő beérkezésig? Ha igen --> "Minden ok"Majd kezdje előről a következő terméknél:
1. lépés: van e nyitott rendelés? Ha nincs
2. lépés : Van e készlet? Ha nincs
3. lépés: Van e lemondási ok? Ha igen --> "Folyamatos hiány"Köszönöm a segítséget!
Üdv!
Új hozzászólás Aktív témák
- NOTEBOOK / NETBOOK / Mac beárazás
- Luck Dragon: Asszociációs játék. :)
- Több ezer műholddal bővülhet az Amazon flottája
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Keressük meg a legfiatalabb és a legidősebb PH!-zót!
- OLED TV topic
- Eredeti játékok OFF topik
- PlayStation 5
- GoodSpeed: Te hány éves vagy?
- Milyen billentyűzetet vegyek?
- További aktív témák...
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- MS SQL Server 2016, 2017, 2019
- The Elder Scrolls Online Imperial Collector s Edition
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Gamer PC-Számítógép! Csere-Beszámítás! I3 10100F / GTX 1660Ti / 16GB DDR4 / 512 Nvme SSD
- HIBÁTLAN iPhone 12 mini 64GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3481
- Tablet felvásárlás!! Apple iPad, iPad Mini, iPad Air, iPad Pro
- Apple iPhone 13 Pro 128GB,Átlagos,Dobozaval,12 hónap garanciával
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RX 7600 8GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50
