Legfrissebb anyagok
LOGOUT témák
- MasterDeeJay: RAM gondolatok: Mennyi a minimum? DDR3 is jó?
- sziku69: Fűzzük össze a szavakat :)
- Geri Bátyó: Agglegénykonyha 14 – Kések, késélezés
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- ldave: New Game Blitz - 2026
- Brogyi: CTEK akkumulátor töltő és másolatai
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Luck Dragon: Asszociációs játék. :)
- talmida: Változások 2. rész
- D1Rect: Nagy "hülyétkapokazapróktól" topik
PROHARDVER! témák
Mobilarena 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
- Tőzsde és gazdaság
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- Samsung kuponkunyeráló
- S.T.A.L.K.E.R. 2: Heart of Chornobyl
- Milyen nyomtatót vegyek?
- Villanyszerelés
- Anno 117: Pax Romana teszt
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Magisk
- Meghozta az első, memórapánikból eredő áremelését az NVIDIA
- További aktív témák...
Új fizetett hirdetések
- Xiaomi 15 12/512GB - Kártyafüggetlen, Zöld, ÚJSZERŰ - 1 Év Garanciával
- Mini PC (ITX) i7 265K 9070 XT 32 GB DDR5 8000Mhz
- Gigabyte RX 6700 XT EAGLE 12G Szép állapotban 1. tulajtól, 2026.04.14-ig garanciális
- Microsoft Surface Book 3 15 i7 / 32GB / 512GB SSD / Windows 11 Pro
- Macbook air M4 15col, éjfekete, magyar
Üzleti előfizetők hirdetései
- 5G Lenovo ThinkPad P14s Gen 3 Intel Core i7-1280P Nvidia T550 32GB 1000GB 1 év teljeskörű garancia
- Apple iPhone 16 Pro 128GB Natural Titanium használt, karcmentes 90% akku 6 hónap garancia
- Beszámítás! Logitech G920 Driving Force Racing kormány garanciával hibátlan működéssel
- Lenovo ThinkBook 14s Yoga 2-in-1 üzleti laptop tollal ÚJ Állapot i7-1165G7 16gb ram 512ssd FHD Gari
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
