Hallo VBA-Gemeinde,
habe nur anfänger kentnisse in vba.
Hoffe ihr könnt mir helfen
Problem:
ich muss eine Excel-tabelle nach verschiedenen werten in der gleichen zeile(!) durchsuchen.
diese stehen in spalte C, F und G
falls alle 3 zutreffen, dann muss ich den wert in der gleichen Zeile, in der Spalte E ausgeben
ansonsten nimm die nächste zeile und wiederhole, bis das ganze wahr ist
ein beispiel
Tabelle123
A B C D E F G
u g h j 7 j ö
4 x k ü 5 r l
für C=k, F=r und G=l
gebe E aus
Weiss nicht genau wie ich Zeilen und Spaltensuche bzw. die ausgabe implementiren soll
hoffe ihr könnt mir helfen!
Edit:
Hab das ganze jetzt implementiert aber iwarum spuckt er mir immer 0 aus
Function Umlagerunsmenge_herraussuchen(ziel1 As String, aus1 As String, k As String, k1 As Boolean) as Integer
'Suchen in Tabelle blubb
With ThisWorkbook.Worksheets(„blubb“)
Dim a As Variant
Dim x As Integer
Dim i As Integer
'Anzahl Reihen
x = Cells(Rows.Count, 1).End(xlUp).Row
For i = 3 To x
a = 0
'k1 ausgewählt
If k1 = True Then
'C
If Cells(i, 3) = aus1 Then
'F
If Cells(i, 6) = k Then
'G
If Cells(i, 7) = ziel1 Then
a = Cells(i, 5)
End If
End If
End If
End If
Next
End With
End Function
Luchs