Hirdetés
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Különleges mini munkaállomás jött a Minisforum színeiben
- Billentyűzet gondom van
- Azonnali alaplapos kérdések órája
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Házimozi belépő szinten
- Milyen alaplapot vegyek?
- 3D nyomtatás
- Vezeték nélküli fülhallgatók
- HiFi műszaki szemmel - sztereó hangrendszerek
Új hozzászólás Aktív témák
-
martonx
veterán
válasz
bende126
#2190
üzenetére
Szerintem kezdjük azzal, hogy pontosan mi is az a részfeladat amit ezzel a kóddal meg szeretnél oldani?
Egyébként a kód első ránézésre nagyon túlbonyolítottnak tűnik.Pl ez helyett:
Do While e1 < e2
s2 = s1 + 1
e2 = Cells(s2, 1).Value
e1 = Cells(s1, 1).Valueelég lenne ez:
Do While Cells(s1, 1).Value < Cells(s2, 1).Value
s2 = s1 + 1Ráadásul s1-et nem is növeled, szóval az s1 is felesleges, ha az mindig fix 1
"- Lehet úgy változót deklarálni, hogy a do while utasítás alatt található? Vagy már korábban meg kéne tennem?"
Persze, miért ne lehetne
Új hozzászólás Aktív témák
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Eredeti játékok OFF topik
- Revolut
- btz: Internet fejlesztés országosan!
- Megérkeztek a Xiaomi 15T sorozatának telefonjai Magyarországra
- Különleges mini munkaállomás jött a Minisforum színeiben
- Billentyűzet gondom van
- Brogyi: CTEK akkumulátor töltő és másolatai
- Azonnali alaplapos kérdések órája
- Assetto Corsa Rally
- További aktív témák...
- ÚJszerű 1Hónapos Apple iPhone 17 256GB Black 1OO% ! még 11 Hó nemzetközi APPLE GaranciÁval
- iPhone 17 Pro Max Cosmic Orange 256GB BONTATLAN 3 ÉV MAGYAR GARANCIA! iCentre számlával!
- T14 Gen1 27% 14" FHD IPS érintő i7-10610U MX330 16GB 256GB NVMe ujjlolv új akku gar
- Samsung Galaxy S23 128Gb fekete, megkímélt
- HP EliteBook x360 830 G7 i5-10210U Refurbished
- HP ZBook Studio x360 Gen5 Intel Xeon E-2176M
- 145 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090 (ELKELT)
- 13-14" Új és használt laptopok , üzletitől a gamerig , kedvező áron. Garanciával !
- Eladó Samsung Galaxy Tab A9 4/64GB / 12 hó jótállás
- GYÖNYÖRŰ iPhone 13 mini 128GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3837, 100% Akkumulátor
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


