Legfrissebb anyagok
Mobilarena témák
- MWC 2026: Meglepően jó áron jön a kicsi, de erős, illetve a nagy és fotós Xiaomi
- Xiaomi 17 Ultra - jó az optikája
- MWC 2026: Leica telefont gyártott a Xiaomi
- Xiaomi 15T Pro - a téma nincs lezárva
- Samsung Galaxy S24 - nos, Exynos
- Magyarországra érkezett a Mijia, a Xiaomi okos háztartási nagygépeinek márkája
- Jolla és SailfishOS tapasztalatcsere
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
PROHARDVER! témák
IT café témák
GAMEPOD 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
- Kertészet, mezőgazdaság topik
- E-book olvasók
- Trollok komolyan
- MWC 2026: Meglepően jó áron jön a kicsi, de erős, illetve a nagy és fotós Xiaomi
- Battlefield 6
- Milyen billentyűzetet vegyek?
- Xiaomi 17 Ultra - jó az optikája
- Szeged és környéke adok-veszek-beszélgetek
- Fejhallgató erősítő és DAC topik
- MWC 2026: Leica telefont gyártott a Xiaomi
- További aktív témák...
Új fizetett hirdetések
- Mushkin 2x16GB DDR4 3200MHz - Új, bontatlan - Eladó!
- Apple iPhone 14 Pro Max 256GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! Asus H310M i7 9700F 16GB DDR4 512GB SSD STRIX RTX 2070 Super 8GB Corsair Crystal 550W
- BESZÁMÍTÁS! ASRock A520M R5 5500 16GB DDR4 512GB SSD RTX 2060 6GB CM Masterbox MB311L ARGB 500W
- Apple iPhone 13 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
Üzleti előfizetők hirdetései
- Dell Latitude 5290 i5 8350U, 8GB RAM, SSD, jó akku, EU bill., szép állapot, számla, 6 hó gar - 12.18
- Apple iPhone 15 Pro 256GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! ASRock B550 R5 5600 16GB DDR4 512GB SSD RTX 3070 Ti 8GB CM MasterBox MB520 TT 750W
- Telefon felvásárlás!! iPhone 14/iPhone 14 Plus/iPhone 14 Pro/iPhone 14 Pro Max
- ÁRGARANCIA! Épített KomPhone Ultra 9 285K 32/64GB RAM RTX 5070 Ti 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

