- iPhone topik
- Fotók, videók mobillal
- Samsung Galaxy S26 - szeret, nem szeret
- Samsung Galaxy S22 Ultra - na, kinél van toll?
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- Motorola Edge 50 Neo - az egyensúly gyengesége
- Xiaomi 17 Ultra - jó az optikája
- Xiaomi 15T Pro - a téma nincs lezárva
- Google Pixel Watch 3 - képpontos idő
- Samsung Galaxy S26 Ultra - fontossági sorrend
Új hozzászólás Aktív témák
-
King Unique
titán
Üdvözletem!
Excel VB programozásban (tudom van más topik, de én itt kérdezném) kéne megoldani az alábbi feladatot és nem igazán boldogulok vele:
• Legyen a párbeszédablakban egy méret feliratú legördülő lista, amelyben ki lehessen választani egy egész számot 2-10-ig! A legördülő lista tartalmát ciklussal töltsük fel, új adatot ne lehessen megadni benne, kezdőértéke legyen 5!
• Egy Gererál nyomógomb megnyomására generáljunk egy Méret*Méret méretű adatblokkot az első munkalapra, ahol a Méret a legördülő lista aktuális értékét jelöli. A blokk bal felső cellája sarokcella az A1-es cella legyen, az adatok legyenek véletlen egész számok és essenek bele a [0, 100] intervallumba! A munkalapon lévő előző adatblokkot töröljük!
• Egy megfelelően paraméterezett szubrutin határozza meg az adatblokk legnagyobb adatát és annak helyét (sor, oszlop)! Ha több ilyen adat is lenne, akkor az első ilyen (legkisebb sor, ill. index) adjuk eredményként!
• Egy Maximum feliratú nyomógomb megnyomására hívjuk meg az előző szubrutint és emeljük ki a megfelelő elemet (cellát) kék betűszínnel! Az összes többi elem legyen fekete betűszínű!
• Legyen a párbeszédablakban egy Összes feliratú jelölőnégyzet, ami a kezdetben legyen kikapcsolt állapotú! Bekapcsolt állapotban a Maximum nyomógomb a legnagyobb elemnek ne csak az első, de az összes előfordulását emelje ki!

Új hozzászólás Aktív témák
- 27% - ASUS ROG Ryuo IV SLC 360 ARGB (90RC0151-B0EAY0) AIO Vízhűtés !
- LENOVO ThinkPad T460,14",FHD,i5-6300U,8GB RAM,256GB SSD,WIN11,DUPLA akku
- A LEGENDA! ASUS ROG STRIX GTX 1080 Ti 11GB GDDR5X 352bit - Brutális erő, makulátlan hűtés!
- Apple iPhone 13 mini, 128 GB, fehér, aksi 87%
- LENOVO ThinkPad X260,12.5",i5-6300U,8GB DDR4,256GB SSD,WIN11
- Spigen Essential Ee673eu 3-portos hálózati töltő 67W Fehér (2xUSB-C, 1xUSB-A)
- Xiaomi Redmi Note 10 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
- 27% - Corsair Hydro X XD7 RGB black (CX-9040005-WW)Pumpa/Tartály kombó
- ÁRGARANCIA!Épített KomPhone Ryzen 5 4500 16/32/64GB RAM RTX 5050 8GB GAMER PC termékbeszámítással
- Apple iPhone 16 128 GB Ultramarine 96% Akkumulátor 2026.07.10-ig Garancia Beszámítás Házhozszállítás
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


