EXCEL/VBA : find

[ketamask]

bonjour,

est-il possible de mettre plusieurs variables en utilisant la méthode find

Du genre find(what = variable1 & variable2..)

En gros je souhaite raccourcir le code ci dessous :

x1 = "~?"
x2 = "~*"

x1 = plage.Find(What:=c1, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns).Address
x2 = plage.Find(What:=c2, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns).Address

If Not x1 = "" Then
MsgBox "caractère c1 trouvé"
Elseif Not x2 = "" Then
MsgBox "caractère c2 trouvé"
Else
MsgBox "aucun caractere trouvé"
End If

par quelque chose du style :

x1 = plage.Find(What:=c1 & c2, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns).Address

If Not x1 = "" Then
MsgBox "caractère c1 ou c2 trouvé"
Else
MsgBox "aucun caractere trouvé"
End If

merci pour votre aide, parce que je n'y arrive plus je suis bloqué