Hirdetés
- Luck Dragon: Asszociációs játék. :)
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Elektromos rásegítésű kerékpárok
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- eBay-es kütyük kis pénzért
- Magga: PLEX: multimédia az egész lakásban
- Hieronymus: Na, mit hoz a húsvéti nyuszi?
-
LOGOUT
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
-
perfag
aktív tag
válasz
motinka
#8244
üzenetére
A + jelnem jó. A cellatartalmat Delete-tel törlöd és üres lesz, ennyi elég.
Tegnap volt a hosszú napom, ma reggelről egy megoldás:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("C2:C20")) Is Nothing Then
If ActiveCell.Value = Empty Then ActiveCell.FormulaR1C1 = "=IF(OFFSET(RC,0,-2)=""SC"",""SC"",""-"")"
End If
Application.EnableEvents = True
End Sub
A VBA "adat" lapjára kell tenned.Műxik, egy apró szépséghibával: Delete, Enter ezzel kitörlöd a cellát, pontosabban üres lesz, majd vissza kell rá kattintani, akkor beírja a képletet. Most mennem kell dolgozni, de du. megnézem mi a francért nem csinálja ezt meg elsőre, a Delete, Enter-re.
Már 2-3 éve nem programozok, berozsdáltam.
Új hozzászólás Aktív témák
- E-book olvasók
- Huawei FreeBuds Pro 5 – független alternatíva
- Suzuki topik
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Xbox tulajok OFF topicja
- Okos otthon - Home Assistant, openHAB és más nyílt rendszerek
- LEGO klub
- S.T.A.L.K.E.R. 2: Heart of Chornobyl
- Formula-1
- Genshin Impact (PC, PS4, Android, iOS)
- További aktív témák...
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- MS SQL Server 2016, 2017, 2019
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Gyári DELL, HP, LENOVO,Asus,Fujitsu laptop töltők, 27% ÁFA
- Telefon felvásárlás!! Honor Magic6 Lite, Honor Magic6 Pro, Honor Magic7 Lite, Honor Magic7 Pro
- Samsung Galaxy Watch5 LTE 40mm, Kártyafüggetlen, 1 Év Garanciával
- Owl Labs Owl Bar 4K Videokonferencia Rendszer FRS100
- Lenovo ThinkPad X1 Active Noise Cancellation fejhallgató
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50