Jeg ville gerne finde en løsning, så jeg ved hjælp af en enkelt knap kan fratrække x værdi fra flere felter.

 

Evt. Og med en advarselsbeksed om man er sikker. evt. mulighed for at, gange denne fratrækning x antal gange, for at undgå at trykke fx. 15 gange.

 

Jeg håber nogle kan komme med nogle gode ideer.

 

2.

Hvordan laver man en funktion så der kommer en alarm eller liste hvis en værdi i et eller flere felter kommer under et hvis antal.= automatisk bestillings lister til bestilling af nye komponenter.

 

Ha det rigtig godt alle sammen. 

Marker aktuelle celler og kør koden (tildel evt en knap el. genvejstast)

 

Sub tst()
tal = InputBox("Indtast tal der skal fratrækkes valgte celleværdier")
If MsgBox("Er du sikker ? ", vbYesNo) = vbYes Then
For Each c In Selection
c.Value = c.Value - tal
Next
End If
End Sub