- Betelik a pohár: nagy igény lenne a gyorshajtás-ellenes technológiára
- Újabb államok perelik az Apple-t, mert sok pénzt szed ki a vevőkből
- Reklámblokkolók topikja
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Alternatív kriptopénzek, altcoinok bányászata
- Ubiquiti hálózati eszközök
- Aliexpress tapasztalatok
- Hálózati / IP kamera
- Tarr Kft. kábeltv, internet, telefon
- Facebook és Messenger
-
IT café
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
-
Sprite75
tag
válasz Delila_1 #44322 üzenetére
Az And Target <> "" feltételt átírtam erre IsNumeric(Target) mert hibaüzenetet dobott amikor elíndítottam az Újsor makrót.
Az új sor makró ez:
Sub Újsor()
Dim usor As Long
usor = Range("C" & Rows.Count).End(xlUp).Row
ActiveSheet.Unprotect Password:="baromfi"
Rows(usor).Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
ActiveSheet.Protect Password:="baromfi", DrawingObjects:=False, Contents:=True, Scenarios:= _
False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
Range("A" & usor).Select
End Sub
Így hibaüzenet nincs.
Viszont a Q oszlopba beállítottam érvényesítést, hogy csak számot írhassanak bele, de ha mégis betűt írok véletlenül és jön a hibaüzenet az érvényesítés miatt akkor lefut a sorszámozás.
Ez ki lehet valahogy küszöbölni?Tudod a "bolond boztonság" miatt
Új hozzászólás Aktív témák
- Computex 2024: feltárta a Lunar Lake-et az Intel
- Budapest és környéke adok-veszek-beszélgetek
- Óra topik
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- kissgábor007 károsultjai
- Érintésnélküli fizetési megoldások - PayPass via NFC
- Politika
- Kerékpárosok, bringások ide!
- Tőzsde és gazdaság
- Vezeték nélküli fülhallgatók
- További aktív témák...