Guten Tag ich habe eine Inventarliste mit Artikeln über Excel erstellt über eine Userform kann ich die nun die Anzahl angeben die gekauft wird.
habe einen Code dafür
Dim wks As Worksheet
Dim iRow As Integer
Set wks = Worksheets("Inventar")
For iRow = 2 To WorksheetFunction.CountA(wks.Columns(1))
If wks.Cells(iRow, 1).Value = TextBox5.Value And wks.Cells(iRow, 2).Value = ComboBox1.Value Then
wks.Cells(iRow, 3).Value = wks.Cells(iRow, 3).Value - CDbl(TextBox1.Value)
End If
Next iRow
Er zählt von Spalte A2 bis A6. Ich habe aber noch mehr Artikel die ich im Inventar einpflegen will wie muss ich es verändern das er nun z.b von Zeile A7 bis A11 zählt. Dachte ich muss hinter For iRow= 7 schreiben aber das klappt auch nicht.
Bitte um hilfe
|