Ú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 Then
        Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + 1
    End If
    If Target.Column = 3 Then
        Target.Offset(0, -1).Value = Target.Offset(0, -1).Value - 1
    End If
    Cancel = True
    End 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