Bonjour , 
je vous sollicite car j'ai une problématique ,
sur mon classeur j'ai 2 feuilles , dans la première je doit remplir le nom de certain pays , dans la seconde , il y a le nom de plusieurs pays .
But du programme :
Si le nom des pays que l'on renseigne en feuille 1 est déjà présent en feuille 2 ,la ligne contenant le pays en feuille 1 doit devenir orange
Je parviens a faire cela cependant ma problématique réside dans les lignes vides qui sont également surlignés .
Merci
	
	
	
	
	
		
	
		
			
		
		
	
				
			je vous sollicite car j'ai une problématique ,
sur mon classeur j'ai 2 feuilles , dans la première je doit remplir le nom de certain pays , dans la seconde , il y a le nom de plusieurs pays .
But du programme :
Si le nom des pays que l'on renseigne en feuille 1 est déjà présent en feuille 2 ,la ligne contenant le pays en feuille 1 doit devenir orange
Je parviens a faire cela cependant ma problématique réside dans les lignes vides qui sont également surlignés .
Merci
		VB:
	
	
	Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        Dim i As Integer
         Dim j As Integer
For i = 1 To 20
For j = 1 To 15
If Cells(i, 4) = Worksheets(2).Cells(j, 2) Then
  'If Cells(i, 4) = "Georgie" Or Cells(i, 4) = "France" Or Cells(i, 4) = "Belgique " Or Cells(i, 4) = "Italie"Then
    Range(Cells(i, 1), Cells(i, 11)).Interior.Color = RGB(255, 192, 0)
    Cells(i, 5) = 0
    Cells(i, 7) = 0
    
  End If
Next j
Next i
End Sub