Hirdetés
- MWC 2025: A kicsi és a kamerás - megjött a Xiaomi 15 és az Ultra
- Apple iPhone 16 - ígéretek földje
- iPhone topik
- Poco X6 Pro - ötös alá
- Android alkalmazások - szoftver kibeszélő topik
- Apple iPhone 16 Pro - rutinvizsga
- Samsung Galaxy S24 FE - később
- MWC 2025: Előrendelhető a Nothing Phone (3a)
- Honor 200 - kétszázért pont jó lenne
- Stabil pályára állt az Android 16
-
Mobilarena
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Delila_1
veterán
A gombhoz a Veletlen makrót rendeld, ez hívja meg a Inditas-t.
Sub Veletlen()
Dim kezd As Long, sor As Long
If Range("AA1") = "" Then
Inditas
Else
MsgBox "Nyugi! 5 mp után újra indul" & vbLf & _
"ha ezt leokéztad", vbInformation
Application.Wait Now + TimeValue("0:00:05")
Inditas
End If
Range("AA1") = "Indítva"
End SubSub Inditas()
Dim kezd As Long, sor As Long
kezd = Range("E" & Rows.Count).End(xlUp).Row + 1
If kezd = 2 Then kezd = 1
For sor = kezd To kezd + 4
Cells(sor, "E") = Int(Rnd() * 153) + 1
Next
End SubÉrdemes a ThisWorkbook laphoz rendelni egy makrót, ami a füzet behívásakor kiüríti az AA1 cellát.
Private Sub Workbook_Open()
Sheets("Munka1").Range("AA1") = ""
End Sub
Új hozzászólás Aktív témák
- MWC 2025: A kicsi és a kamerás - megjött a Xiaomi 15 és az Ultra
- A fociról könnyedén, egy baráti társaságban
- Vélemény: más cég lenne az Intel, ha korábban nevezik ki Lip-Bu Tant
- Meggyi001: Vegán? Nem vegán?
- Windows 10
- The First Berserker: Khazan
- EAFC 25
- Apple iPhone 16 - ígéretek földje
- Milyen alaplapot vegyek?
- Autós topik
- További aktív témák...
- Apple iPhone 12 64GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! Samsung Galaxy A13/Samsung Galaxy A33/Samsung Galaxy A53
- DELL PowerEdge R630 rack szerver - 2xE5-2680v4 (28c/ 56t, 2.4/3.3GHz), 128GB RAM, 10G, áfás szla
- Samsung Galaxy A40 64GB, Kártyafüggetlen, 1 Év Garanciával
- LG 27CN650N-6A - Felhő Monitor - 1920x1080 FHD - 75Hz 5ms - USB Type-C - Quad Core - BT + WiFi
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest