Bonjour a tous !
Voila je viens vers vous aujourd’hui : je m'explique je possède un code qui fonctionne très bien :
Donc j'ai mon Userform je met mon numéro de téléphone dans la textbox10, je clike su un bouton ANNULER et ca me lance ce macro qui recherche le numero ou dans x:x ou dans y:y et met donc annuler dans les collones voulue et qui met aussi en grise, date d'annulation enfin bref...
Le seul souci c'est que si j'ai plusieurs numéro de téléphone sur mon fichier, il n'y a que le premier de mon tableau (ACTIF) qui se met en annuler les autres ne changent pas.... je voudrais en fait que toutes les lignes qui comporte le même numéro de téléphone (colonne x:x ou y:y ) subissent le même changement !
Merci a tous pour votre aide ..
Voila je viens vers vous aujourd’hui : je m'explique je possède un code qui fonctionne très bien :
Code:
Sub annuleractif()
If Userform1.TextBox10 = "" Then MsgBox ("Vous n'avez pas mis de numero de TELEPHONE"): Exit Sub
With Sheets("ACTIF")
Set I = .[x:x].Find(What:=Userform1.TextBox10, LookIn:=xlValues, LookAt:=xlWhole)
If I Is Nothing Then Set I = .[y:y].Find(What:=Userform1.TextBox10, LookIn:=xlValues, LookAt:=xlWhole)
If I Is Nothing Then MsgBox ("TELEPHONE INTROUVABLE"): Exit Sub
.Cells(I.Row, 2) = CDate(Date)
.Cells(I.Row, 2).Interior.ColorIndex = 15
.Cells(I.Row, 2).Font.ColorIndex = 1
.Cells(I.Row, 20) = "ANNULER"
.Cells(I.Row, 21) = "ANNULER"
.Cells(I.Row, 20).Interior.ColorIndex = 15
.Cells(I.Row, 21).Interior.ColorIndex = 15
.Cells(I.Row, 22).Interior.ColorIndex = 15
Userform1.TextBox10 = ""
End With
Set I = Nothing
End Sub
Donc j'ai mon Userform je met mon numéro de téléphone dans la textbox10, je clike su un bouton ANNULER et ca me lance ce macro qui recherche le numero ou dans x:x ou dans y:y et met donc annuler dans les collones voulue et qui met aussi en grise, date d'annulation enfin bref...
Le seul souci c'est que si j'ai plusieurs numéro de téléphone sur mon fichier, il n'y a que le premier de mon tableau (ACTIF) qui se met en annuler les autres ne changent pas.... je voudrais en fait que toutes les lignes qui comporte le même numéro de téléphone (colonne x:x ou y:y ) subissent le même changement !
Merci a tous pour votre aide ..