Habe schon jede Menge Hilfe von Euch erhalten - ein kräftiges Dankeschön an alle.
Nun habe ich noch eine weitere Frage - wird wohl nicht die letzte sein ;-(
und zwar: Gibt es eine Möglichkeit mehrere Kriterien bei der Select Case abzufragen und wenn ja, wie?
Möchte eine
Function erstellen bei der ich den Artikel abfrage und zusätzlich ob die Option "Ventil" (0 od. 1) besteht.
Function Ventil(b_art)
Select Case b_art
Case 2 To 4
If b_ven = "0" Then '' diese Abfrage funktioniert nicht
Ventil = "2%" 'W&H
End If
Case 14 To 16
If b_ven = 0 Then
Ventil = "4%" 'STA
End If
Case 30 To 32
If b_ven = 0 Then
Ventil = "3%" 'BFB
End If
Case 38 To 40
If b_ven = 0 Then
Ventil = "6%" 'SFB
End If
Case Else
Ventil = "gibt's nicht"
End Select
End Function
Upload:
https://www.herber.de/bbs/user/27462.xls
Danke für eure Hilfe
und Grüsse aus der Schweiz
köbi