Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel erreur vba excel

erreur vba excel

7 réponses
Avatar
testou
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pounet95
Bonjour Test tout,
......... les 3 lignes après Case fonctionnent.
Le pb est ailleurs .... dans ce que tu ne nous montre pas !

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"testou" a écrit dans le message de news:

bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide


Avatar
Pierre Fauconnier
Salut

1. Pour CASE, le Is n'est pas obligatoire, tu peux utiliser directement
case "mars"

2. Pour la sélection, utilise UNION comme ceci
Union(Range("selection1"), Range("selection2"), Range("selection3")).Select

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide


Avatar
Pierre Fauconnier
Sans utiliser Union, tu peux utiliser ta syntaxe, à ceci près que tu dois
fermer les guillemets

range("selection1","selection2","selection3").select

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide


Avatar
Pierre Fauconnier
Et je compléterai en disant que tu n'est pas obligé de travailler avec les
cellules sélectionnées, tu peux de suite faire ceci
range("selection1","selection2","selection3").EntireColumn.Hidden=true

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide


Avatar
Pounet95
Bonjour Pierre,
A la lecture du pb de Testou, j'ai aussi pensé à la syntaxe du Range.
J'ai donc testé les 3 lignes de code en ayant défini sur une feuille 3
plages
rectangulaires nommées selection1, selection2 et selection3.
Elles se chevauchent et aucune ne comporte une colonne entière.

Et ça marche tel qu'écrit ! D'où ma réponse
XL2000 XP Pro

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"Pierre Fauconnier" a écrit dans le
message de news:
Et je compléterai en disant que tu n'est pas obligé de travailler avec les
cellules sélectionnées, tu peux de suite faire ceci
range("selection1","selection2","selection3").EntireColumn.Hidden=true

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide






Avatar
testou
je pense que mon probleme venez de la
car j'ecriivait selection.entirecolumn...............

et donc c'etait toutes les cellules de la feuille active

donc merci


Et je compléterai en disant que tu n'est pas obligé de travailler avec les
cellules sélectionnées, tu peux de suite faire ceci
range("selection1","selection2","selection3").EntireColumn.Hidden=true

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide







Avatar
Pierre Fauconnier
Bonjour Pounet,

En effet, cela fonctionne aussi sans les guillemets...

Testou, tu viens de nous apprendre quelque chose... ;-)

Pierre


"Pounet95" a écrit dans le message de
news:%
Bonjour Pierre,
A la lecture du pb de Testou, j'ai aussi pensé à la syntaxe du Range.
J'ai donc testé les 3 lignes de code en ayant défini sur une feuille 3
plages
rectangulaires nommées selection1, selection2 et selection3.
Elles se chevauchent et aucune ne comporte une colonne entière.

Et ça marche tel qu'écrit ! D'où ma réponse
XL2000 XP Pro

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"Pierre Fauconnier" a écrit dans le
message de news:
Et je compléterai en disant que tu n'est pas obligé de travailler avec
les


cellules sélectionnées, tu peux de suite faire ceci
range("selection1","selection2","selection3").EntireColumn.Hidden=true

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"testou" a écrit dans le message de
news:
bjr

Case Is = "mars"
Selection.EntireColumn.Hidden = False
Range("selection1,selection2,selection3").Select
Selection.EntireColumn.Hidden = True

ce code me genere l'erreur d'execution 1004
en indiquant la methode select de la classe range à échoué.

pourtant la syntaxe est bonne, je comprend pas trop

merci de votre aide