OVH Cloud OVH Cloud

Erreur de compilation????

6 réponses
Avatar
LeSurCitaire
Bonjour,

J'ai cette macro

Sub MacFev()
'
Range("$A2:$A416").Select
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"
Range("A1").Select
End Sub

Mais quand je l'execute j'ai le message erreur de compilation membre de
methode ou de donnee introuvable, et .AutoFilter qui est surligne
Je ne comprend pas pourquoi?

6 réponses

Avatar
Philippe
Bonjour,

Je viens de copier ton code dans un module de classeur. Je n'ai pas de
problème quand je fais : Débogagecompiler Vba Project (je ne lance pas le
programme mais cherche les erreurs de syntaxe).

Evidemment, j'ai un problème lors de l'exécution (j'ai une feuille vierge
!). Peux-tu faire ma manipulation. Ainsi, on pourra déteminer si c'est
vraiment la syntaxe ou le code qui a un problème.

Philippe.




Bonjour,

J'ai cette macro

Sub MacFev()
'
Range("$A2:$A416").Select
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"
Range("A1").Select
End Sub

Mais quand je l'execute j'ai le message erreur de compilation membre de
methode ou de donnee introuvable, et .AutoFilter qui est surligne
Je ne comprend pas pourquoi?




Avatar
MPi
Salut,
Si la formule est écrite comme je la vois, il manque le caractère souligné à
la fin de la ligne après xlOr,

Il faudrait donc la réécrire comme ceci
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr, _
Criteria2:="=b"
ou encore sur une seule ligne
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"

Michel

"LeSurCitaire" a écrit dans le message
de news:
Bonjour,

J'ai cette macro

Sub MacFev()
'
Range("$A2:$A416").Select
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"
Range("A1").Select
End Sub

Mais quand je l'execute j'ai le message erreur de compilation membre de
methode ou de donnee introuvable, et .AutoFilter qui est surligne
Je ne comprend pas pourquoi?



Avatar
LeSurCitaire
J'ai fais la manip et j'ai toujours le meme message, je l'ai egalement
avec cette macro
Sub Horr3()
'

Selection.Interior.ColorIndex = 8
ActiveCell.Value = Sheets("index").Range("F4")
ActiveCell.Offset(0, 1).Select
Selection.Interior.ColorIndex = 8
ActiveCell.Value = Sheets("index").Range("G4")
ActiveCell.Offset(1, -1).Select
Avatar
Philippe
Une idée : si rien ne passe, c'est sans doute que les références ne sont pas
cochées.
Manip : OutilReferences..., cocher au minimum ces options :

Visual Basic for Application
Microsoft Excel 11.0 Object Library
Microsoft Office 11.0 Object Library
Microsoft forms 2.0 Object Library

Peu importe les chiffres de version.

Merci de me donner des nouvelles. Je trouve ton cas interessant.

Philippe.



Salut,
Si la formule est écrite comme je la vois, il manque le caractère souligné à
la fin de la ligne après xlOr,

Il faudrait donc la réécrire comme ceci
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr, _
Criteria2:="=b"
ou encore sur une seule ligne
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"

Michel

"LeSurCitaire" a écrit dans le message
de news:
Bonjour,

J'ai cette macro

Sub MacFev()
'
Range("$A2:$A416").Select
Selection.AutoFilter Field:=1, Criteria1:="2", Operator:=xlOr,
Criteria2:="=b"
Range("A1").Select
End Sub

Mais quand je l'execute j'ai le message erreur de compilation membre de
methode ou de donnee introuvable, et .AutoFilter qui est surligne
Je ne comprend pas pourquoi?








Avatar
LeSurCitaire
Cela n'a rien changé
Avatar
Philippe
Peux-tu m'envoyer ton fichier sur ?

J'essaie de te répondre dans la foulée.



Cela n'a rien changé