Bonjour à tous.
Je me suis servi de l'enregistreur de macro pour exécuter un filtre:
Private Sub BtnConjoint_Click()
Application.ScreenUpdating = False
RAZ
Selection.AutoFilter Field:=17, Criteria1:="C"
Application.ScreenUpdating = True
End Sub
J'ai nommé la colonne 17 par "statut".
Comment faire dans la macro pour remplacer le numéro de la colonne "17" par son nom "statut" ?
Gil
Re : VBA Remplacer le numéro de colonne par son nom
Bonjour Gil_se, bonjour le forum,
Ça m'étonne pas. Regarde ce que dis l'aide de VBA sur Autofilter et Fied : Field Argument de type Variant facultatif. Il s'agit du décalage de type entier du champ que vous souhaitez utiliser comme référence pour définir le filtre (à partir de la gauche de la liste ; le champ situé le plus à gauche est le champ un).
Je ne comprends pas pourquoi tu veux remplacer 17 ???
Re : VBA Remplacer le numéro de colonne par son nom
Bonjour Gil_se, bonjour le forum,
Ben à la place de 17, non... ? (non testé)
Code:
Private Sub BtnConjoint_Click()
Application.ScreenUpdating = False
RAZ
Selection.AutoFilter Field:=[COLOR=red]Range("statut").Column[/COLOR], Criteria1:="C"
Application.ScreenUpdating = True
End Sub
Re : VBA Remplacer le numéro de colonne par son nom
J'ai remplacé la ligne
Selection.AutoFilter Field:=Range("statut").Column, Criteria1:="C"
La macro fonctionne mais, de nouveau, si j'insère une colonne, la macro ne fonctionne plus:
"Erreur définie par l'application ou par l'objet"