Legfrissebb anyagok
Mobilarena témák
- Mobil flották
- Redmi Note 13 Pro+ - a fejlődés íve
- Nothing Phone (3) – tervezett kaotika
- iPhone topik
- Bemutatkozott a Poco X7 és X7 Pro
- Samsung Galaxy A53 5G - kevesebbet többért
- Hivatalos a OnePlus 13 startdátuma
- Samsung Galaxy A56 - megbízható középszerűség
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- One mobilszolgáltatások
PROHARDVER! témák
IT café témák
Ú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
Aktív témák
- Filmvilág
- Gumi és felni topik
- CADA, Polymobil, és más építőkockák
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Könyvajánló
- Gitáros topic
- Üzleti vita és megbeszélés
- Kerékpárosok, bringások ide!
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- További aktív témák...
Új fizetett hirdetések
- Samsung Galaxy A32 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Újszerű Karcmentes Samsung Galaxy S24 8/128GB 2028.05.19-ig garanciával
- 16 db Intel Celeron és Celeron D processzor
- Gamer PC - Ryzen 7 5700X / RTX 5060 / A520M / 16GB vagy 32GB RAM / 256GB + 1TB M.2 SSD / 650W Silver
- Gamer PC eladó, erős gép, frissen pasztázva.
Üzleti előfizetők hirdetései
- Felújított laptopok számlával, garanciával! Ingyen Foxpost!
- BESZÁMÍTÁS! ASRock Z370 i7 9700KF 16GB DDR4 512GB SSD RX 7600 XT 16GB ZALMAN I3 NEO ADATA 600W
- AKCIÓ! GIGABYTE AORUS ELITE Z790 i7 14700K 64GB DDR5 1TB SSD 7900 XTX 24GB be quiet! SB 802 1000W
- Apple iPhone 13 / 128GB / Gyárifüggetlen / 12Hó Garancia / 89% akku
- Azonnali készpénzes GAMER / üzleti notebook felvásárlás személyesen / csomagküldéssel korrekt áron
Állásajánlatok
Cég: FOTC
Város: Budapest