Discussion :

[Maxou 10]

Bonjour,

j'aimerais étendre la couleur a la colonne 3 quand je fait ma recherche textbox
Et que si ma colonne 1 est fusionné sur 2 lignes, les 2 même lignes de ma colonne 3 passe bleu aussi malgré que elles ne soient pas fusionnées

voila une partie de mon code VBA textbox1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
For ligne = 7 To 228
      If Cells(ligne, 1) Like "*" & textbox1 & "*" Then
          Cells(ligne, 1).Interior.ColorIndex = 44
          If rechercheTrouvee = False Then
              ActiveSheet.Cells(ligne, 1).Select
              ActiveWindow.ScrollRow = Selection.Row
              Worksheets("feuille1").textbox1.Verb
               rechercheTrouvee = True
           End If
       End If

Merci et bonne soirée

[Gfacro]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
For ligne = 7 To 228
      If Cells(ligne, 1) Like "*" & textbox1 & "*" Then
          Cells(ligne, 1).Interior.ColorIndex = 44
          Cells(ligne, 1).mergearea.offset(0,2).Interior.ColorIndex = 44
          If rechercheTrouvee = False Then
              ActiveWindow.ScrollRow = Selection.Row
              Worksheets("feuille1").textbox1.Verb
               rechercheTrouvee = True
           End If
       End If