Office: Inventurliste Excel plus minus Button erweitern

Hallo zusammen,

ich habe folgedes Problem.

Ich möchte für eine einfachere Inventur eine "interaktive" Excelliste erstellen.
Dort soll ein "+"Button und "-"Button die Aktuelle Materialanzahl addieren bzw. subtrahieren.

E4=Anzahl Anfang / F4="+"Button / G4="-"Button / H4=Anzahl Aktuell

Dies habe ich auch schon für eine Zeile fertig, der code sieht wie folgt aus:


Sub Plus()

Dim AnzahlAnfang As Integer
Dim AnzahlAktuell As Integer

AnzahlAnfang = Range("H4").Value

AnzahlAktuell = AnzahlAnfang + 1

Range("H4").Value = AnzahlAktuell

End Sub

Sub Minus()

Dim AnzahlAnfang As Integer
Dim AnzahlAktuell As Integer

AnzahlAnfang = Range("H4").Value

AnzahlAktuell = AnzahlAnfang - 1

Range("H4").Value = AnzahlAktuell

End Sub

Damit die Aktuelle Anzahl als Startwert in H4 genommen wird, habe ich H4=E4 gesetzt. sobald man + oder - klickt ändert h4 sich dementsprechend.

Jetzt zu meinem Problem

wie bekommt man es hin, dass wenn man Zeile 4 makiert und per schwarzen Kreuz nach unten zieht, die neuen Buttons sich nicht immer auf Zeile 4 beziehen?

Klicke ich z.B. in Zeile 6 das + ändert der Wert sich in H4 und nicht in H6

würde gern auf einfache Art die Liste erweitern können, da Materialien hinzu kommen könnten.

Vielen Dank schonmal für Eure Hilfe

MFG

:)

 

Hallo!

Das funktioniert so nicht. Du vermischst Excel Bordmittel und VBA. VBA ist es völlig egal, ob du in der Tabelle nach unten kopierst. Der Code ändert sich dadurch nicht.
Es ist außerdem überhaupt nicht sinnvoll, für jede Zeile Buttons anzulegen, das ist viel zu aufwändig.

Möglichkeit 1: Erstelle zwei Buttons für das ganze Blatt. Diese zählen in der jeweils markierten Zeile hoch bzw. runter. Das sieht dann so aus:
Code:

und natürlich -1 für Minus. Dein Code mit den Variablen ist zwar nicht falsch, aber einfach sinnlos *wink.gif*

Möglichkeit 2: Verzichte auf Buttons und verwende das Doppelklickereignis. Wenn du in Spalte I der betreffenden Zeile doppelklickst, wird addiert, in Spalte J wird subtrahiert
Code:

Das kannst du ebenfalls vorher abfragen, ohne erst umständlich in der Zelle eine Formel eintragen zu müssen. Du verwendest VBA, als verwende es auch richtig.
Code:

 

Hallo,

hier mal ein Beispiel wo die Plus Minus Buttons
der aktiven Zelle folgen.
Eingabe nur möglich wenn aktive Zelle Spalte A gewählt.

Sowie Berni's Vorschläge an der richtigen Stelle wäre das
zu deiner Fragestellung,

PHP:

         Jetzt zu meinem Problem


 

Vielen lieben Dank euch beiden, Ihr habt mir sehr geholfen :-)

 

Moin,

nur der vollständigkeit halber:
Die Formularsteuerelemente bieten ein Drehfeld, dass sich direkt mit einer Zelle verknüpfen lässt. Legt man sich für jede Zählzeile ein solches an, braucht es gar kein VBA.

Viele Grüße
derHöpp