Hirdetés
- Ilyen olcsó sem volt még egy Apple notebook
- Túl nagy alkatrészt vettél? Így kerülheted el a PC-építés legnagyobb hibáját
- MWC 2026: leégsz, ha nem figyelsz a TCL 15 ezer nites panelje előtt
- Második villámcsapás: teszteltük a ROG Raikiri II Xbox kontrollert
- 100 TB-os HDD-k felé vezető alapot prezentált a Seagate
- RAM topik
- Vezetékes FEJhallgatók
- Projektor topic
- Soundbar, soundplate, hangprojektor
- Ilyen olcsó sem volt még egy Apple notebook
- Kormányok / autós szimulátorok topikja
- Intel Core i7 9xx "Bloomfield" (LGA 1366)
- Megérkezett az Apple 5K-s, 120 Hz-et biztosító monitora
- Milyen monitort vegyek?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
-
PROHARDVER!
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
-
Fferi50
Topikgazda
válasz
botond187
#22788
üzenetére
Szia!
Paraméterezheted is a makrót.
Csinálsz egy táblázatot, amelybe berakod egy-egy oszlopba a "főcikk" tól-ig cikkszámokat, a másik 2 oszlopba pedig a hozzátartozó "kiegészítő" cikkek tól-ig határait.
Ezután a makródnak azt kell megnéznie, hogy az adott cikkszám mely határok közé esik és onnan kivenni a hozzátartozó határértékeket.
Kicsit csúnya mert még egy for ciklus van benne, de most hirtelen nem jut jobb eszembe (pedig biztosan van).For xx= 1 to 200
cikkszam=cells(xx,1).value
kiegalso=""
kiegfelso=""
for zz=1 to főcikkfeltételszám
if cikkszam>=cells(zz,10).value and cikkszam<=cells(zz,11).value then
kiegalso=cells(zz,12).value
kiegfelso=cells(zz,13).value
exit for
endif
next
if kiegalso<>"" then
kieg=""
for yy=1 to 200
if cells(yy,1).value>=kiegalso and cells(yy,1).value<=kiegfelso then
if kieg="" then
kieg=cells(yy,1).value
else
kieg=kieg & elválasztó & cells(yy,1).value
endif
endif
next
if kieg<>"" then
cells(xx,2).value=kieg
endif
endif
nextA határokat tartalmazó táblázat a 10-12. oszlopban van. A ciklushatárokat igazítsd a feltöltött sorokhoz.
A belső yy-os ciklus elvileg indulhat xx -től egy (1) helyett, ha a kiegészítő termékek cikkszáma nagyobb, mint a főtermékeké és a cikkszámok sorba vannak rendezve. A működéshez ez nem szükséges, akkor marad az 1, mint cikluskezdő (hiszen lehet, hogy az első cikkszám nem főtermék, hanem kiegészítő).Üdv.
Új hozzászólás Aktív témák
- PC Game Pass előfizetés
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- The Elder Scrolls Online Imperial Collector s Edition
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Dell Precision 3561,15.6" FHD,i7-11850H,16GB DDR4,512GB SSD,T600 4GB VGA,WIN11
- Apple iPhone 16 128GB Teal használt, újszerű 100% akku (0 ciklus) garanciás 2029.02.11-ig
- Apple iPhone 17 Pro Max 256GB Deep Blue használt, karcmentes 100% akku (52 ciklus) Apple garan
- Samsung Galaxy A80 128GB, Kártyafüggetlen, 1 Év Garanciával
- Beszámítás! LENOVO LOQ 15AHP10 FHD Gamer notebook - R7 250 16GB DDR5 1TB SSD RTX 5060 8GB
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
