- Android alkalmazások - szoftver kibeszélő topik
- Betiltották a Pixel 7-et Japánban
- Magisk
- Bemutatkozott a Poco X7 és X7 Pro
- Vivo X200 Pro - a kétszázát!
- Telekom mobilszolgáltatások
- Xiaomi 15 Ultra - kamera, telefon
- Red Magic 10 Air - gaming telefon is lehet kecses
- Xiaomi 13T és 13T Pro - nincs tétlenkedés
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
Új hozzászólás Aktív témák
-
update
csendes tag
válasz
Apollo17hu #211 üzenetére
Hmmm... köszi a segítséget!
De...
És pl 60 és 150 közé eső páros-páratlan véletlenszám?
És az igazán jó az lenne, ha... Min és Max értéket bármikor változtathassam...
Pl beviteli mező Min és beviteli mező Max, és erre a kettő közé generáljon véletlenszámot...
Ahol a min és max között nincsen kapcsolat... pl 13 és 100 vagy akármi!
(Rnd*Min)/Max vagy valami ilyesmi...
Ja... Caption működött végül így
UserForm1.Label.Caption=Cells(1,1)
Cells(1,1)-et az aktív worksheetből szedi... -
update
csendes tag
Ja, és ez miért nem megy?
Label.Caption = Cells(1, 1) -
update
csendes tag
Hali!
Hogy lehet azt megcsinálni VBA-ban, hogy egy adott min és max érték közé generáljon egy véleltlenszámot?
Én úgy próbáltam, hogy csináltam egy sima véletlenszámot, majd km hosszú If részekkel úgy alakítottam, hogy beleférjen min és max közé... szorztam, osztottam stb...
nincen egy egyszerűbb megoldás?
KÖSZI!
Új hozzászólás Aktív témák
Hirdetés
- Napelem
- Több mint 1 milliárd dollárnyi részvényüket adták el az NVIDIA belsős emberei
- Kerékpárosok, bringások ide!
- Milyen belső merevlemezt vegyek?
- Autós topik látogatók beszélgetős, offolós topikja
- A Micron újszerű módszerrel javítja QLC-s SSD-jének sebességét
- Bittorrent topik
- The First Berserker: Khazan
- Mr Dini: Mindent a StreamSharkról!
- Autós topik
- További aktív témák...
- Eladó PNY GeForce RTX 4070 Ti SUPER 16GB videokártya
- Bomba ár! Asus Slate EP121 Tablet - Intel Core i5 I 4GB I 64GB SSD I 12" Touch I Cam I W10 I Gari!
- Bomba ár! HP EliteBook 2570P - i5-3GEN I 4GB I 320GB I DVD I 12,5" HD I W10 I Garancia!
- Bomba ár! HP EliteBook 2560P - i5-2GEN I 4GB I 320GB I 12,5" HD I W10 I Garancia!
- Bomba ár! HP EliteBook 2540P - i5-540M I 4GB I 250GB I 12,1" WXGA I W10 I Garancia!
- Országosan a legjobb BANKMENTES részletfizetési konstrukció! Lenovo ThinkPad L16 Gen 1 Prémium
- Xiaomi Redmi Note 13 256GB Kártyafüggetlen 1Év Garanciával
- Csere-Beszámítás! RTX Számítógép játékra! R5 5600X / RTX 3080 / 32GB DDR4 / 1TB SSD
- KÖZEL FÉLÁR! Apple Magic Keyboard, Mouse, Trackpad, Pencil, Smart Magic Keyboard Folio, Watch szíjak
- AZONNALI SZÁLLÍTÁSSAL Eladó Windows 8 / 8.1 Pro
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft
Város: Budapest