-
Fototrend
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
-
Fferi50
Topikgazda
válasz
Silious
#54580
üzenetére
Szia!
Csak makróval lehet megoldani, mert egy cella nem tartalmazhat képletet és számot is.
Én azt javaslom, hogy ne gombot tegyél a cellába, hanem csak egy plusz ill. mínusz jelet. A cellát akár színezheted is.
A cellára dupla kattintással kiváltod a növelést ill. csökkentést. Ehhez az alábbi makrót kell a munkalap kódlapjára bemásolnod:Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)If Target.Column = 1 ThenTarget.Offset(0, 1).Value = Target.Offset(0, 1).Value + 1End IfIf Target.Column = 3 ThenTarget.Offset(0, -1).Value = Target.Offset(0, -1).Value - 1End IfCancel = TrueEnd Sub
Az első oszlop bármelyik cellájába írhatod a + jelet ill. a harmadik oszlopba a - jelet. Mindegyikre működik a makró.
Figyelj rá, hogy hibakezelés és védelem nincs a makróban, tehát megváltoztathatók az értékek (a + és - jel is)!
Nálam így néz ki (az első sorba tettem, de bármelyik sorba teheted, a lényeg az A és C oszlop):
Üdv.
Új hozzászólás Aktív témák
- Google Pixel Watch 3 - képpontos idő
- Pécs és környéke adok-veszek-beszélgetek
- Metal topik
- iRacing.com - a legélethűbb -online- autós szimulátor bajnokság
- Tesla topik
- Napelem
- TCL LCD és LED TV-k
- Windows 11
- Okos otthon - Home Assistant, openHAB és más nyílt rendszerek
- Építő/felújító topik
- További aktív témák...
- iPhone 17 Pro Max 256GB 100% (1év Garancia)
- Dell Latitude 7300 Core i5-i7, 8-16GB RAM, SSD, jó akku, számla, 6 hó gar
- AKCIÓ! Sapphire Nitro+ RX 7900XT 20GB videokártya garanciával hibátlan működéssel
- HIBÁTLAN iPhone 11 128GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS4258
- Apple MacBook Pro 13" M2 (2022) 8GB / 256GB asztroszürke
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50