Formula = "=IF(ISERROR(FIND(""+Y"",B19)),"""",""JA"")"
Das er quasi JA ausgibt wenn "X" und "Y" gefunden wurden.
Danke schon mal ;)
Sub finde_hütchen()
Range("J19:J" & Rows.Count).ClearContents
With Range("J19:J" & Cells(Rows.Count, 2).End(xlUp).Row)
.Formula = "=IF(ISERROR(FIND("Y",B19)*FIND("^",B19)),"","JA")"
.Value = .Value
End With
End Sub
Sub finde_hütchen()
Range("J19:J" & Rows.Count).ClearContents
With Range("J19:J" & Cells(Rows.Count, 2).End(xlUp).Row)
Formula = "=IF(ISERROR(FIND(""+Y"",B19)),"""",""JA"")"
.Value = .Value
End With
End Sub
Sub finde_hütchenundy()
Range("J19:J" & Rows.Count).ClearContents
With Range("J19:J" & Cells(Rows.Count, 2).End(xlUp).Row)
Formula = "=IF(AND(ISERROR(FIND(""^"",B19)),ISERROR(FIND(""Y"",B19))),"""",""JA"")"
.Value = .Value
End With
End Sub
Sub finde_hütchenundy()
Range("J19:J" & Rows.Count).ClearContents
With Range("J19:J" & Cells(Rows.Count, 2).End(xlUp).Row)
.Formula = "=IF(OR(ISERROR(FIND(""^"",B19)),ISERROR(FIND(""Y"",B19))),"""",""JA"")"
.Value = .Value
End With
End Sub
.Formula = "=IF(OR(ISERROR(FIND(""SCH"",B19),ISERROR(FIND(""Y"",B19),ISERROR(FIND(""°°"",B19)))"""",""JA"")"
.Formula = "=IF(OR(ISERROR(FIND(""SCH"",B19),ISERROR(FIND(""Y"",B19),ISERROR(FIND(""°°"",B19)))"""",""JA"")"
.Formula = "=IF(OR(ISERROR(FIND(""SCH"",B19)),ISERROR(FIND(""Y"",B19))),ISERROR(FIND(""°°"",B19))))"""",""JA"")"
.Formula = "=IF(OR(ISERROR(FIND(""SCH"",B19)),ISERROR(FIND(""Y"",B19)),ISERROR(FIND(""°°"",B19)))"""",""JA"")"
WENN(ODER(ISTFEHLER(FINDEN("SCH";B19));ISTFEHLER(FINDEN("Y";B19));ISTFEHLER(FINDEN("°°";B19)));"";"JA")
Die Formel via VBA in eine Zelle:
.Formula = "=IF(OR(ISERROR(FIND(""SCH"",B19)),ISERROR(FIND(""Y"",B19)),ISERROR(FIND(""°°"",B19))),"""",""JA"")"
Gruess Hansueli
=Wenn(ZählenWenn(B19;"*X*")*ZählenWenn(B19;"*Y*");"Ja";"")
oder mit
=WENN(UND(ISTZAHL(FINDEN({"X";"Y"};B19)));"JA";"")
wenn X und Y in festgelegter Reihenfolge stehen, könnte auch das funktionieren, allerdings muss dann X vor Y stehen
=Wenn(IstZahl(Finden("*X*Y*";B19));"JA";"")
Gruß Daniel