Bonjour

J'ai créé un code qui permet
> Atteindre une colonne nommée "Colonne_Nom"
> Rechercher la cellule contenant le libellé "Nom3"
> Selectionner la ligne entière
> Appliquer le format "Standard" à toute la ligne

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub Macro3()
'Atteindre Colonne
    Application.Goto Reference:="Colonne_Nom"
'Recherche Nom
        Cells.Find(What:="Nom3", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        True, SearchFormat:=False).Activate
'Selection Ligne
    ActiveCell.EntireRow.Select
'Format Cellule
    Selection.NumberFormat = "General"
End Sub
Tout fonctionne bien sauf que selon le tableau que j'importe, la cellule contenant le libellé "Nom3" n'existe pas forcément.
Et alors dans ce cas ma macro est interrompue.

Je suppose qu'il faut placer un "if" dans le code mais j'avoue ne pas connaître la procédure.
D'avance merci pour votre aide.
Cordialement.
StSym