Hirdetés
- Stabil pályára állt az Android 16
- MWC 2025: Előrendelhető a Nothing Phone (3a)
- Samsung Galaxy Watch6 Classic - tekerd!
- Honor Magic6 Pro - kör közepén számok
- Apple iPhone 16 Pro - rutinvizsga
- Garmin Instinct – küldetés teljesítve
- Garmin topik
- Fotók, videók mobillal
- iPhone topik
- MWC 2025: A kicsi és a kamerás - megjött a Xiaomi 15 és az Ultra
-
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
válasz
JagdPanther #40957 üzenetére
Nem lassít majd a sok sor, mert mindig a 6. sorba viszed be az új adatokat.
Azért egy kicsit egyszerűsítettem a makrókon.Sub Ma()
Sheets("Bevitel").Select
Rows(6).EntireRow.Insert Shift:=xlDown
Range("B6") = Date
Range("E6").Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=Adat!$F$2:$F$8"
Range("F6").Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=Adat!$L$2:$L$3"
Range("C7:I7").Copy
Range("C6:I6").PasteSpecial xlPasteFormats
Range("J7").Copy
Range("J6").PasteSpecial Paste:=xlPasteAll
Range("C6").Select
End SubSub Megse()
Rows(6).Delete Shift:=xlUp
End SubSub Hibakiadva()
Cells(6, "H") = Date
End SubSub Hibaelvegezve()
Cells(6, "I") = Date
End Sub
Új hozzászólás Aktív témák
- Interactive Brokers társalgó
- Kínai és egyéb olcsó órák topikja
- OpenWRT topic
- Kuponkunyeráló
- Stabil pályára állt az Android 16
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Autós topik
- Azonnali informatikai kérdések órája
- A fociról könnyedén, egy baráti társaságban
- Villanyszerelés
- További aktív témák...
- Hp USB-C/Thunderbolt 3 dokkolók: USB-C Universal, G2, G4, G5, Hp Elite/Zbook- Thunderbolt 4 G4
- SEAGATE ST6000NM0034 6TB 7.2k SAS HDD, nettó 15747Ft + ÁFA, 1 év garancia
- Xiaomi Redmi 9 64GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! iPhone 16/iPhone 16 Plus/iPhone 16 Pro/iPhone 16 Pro Max
- CONCORDE TAB DRACO 8GB 7"
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest