sélection de colonne

Bonjour le forum

Je suis en train de faire une macro qui doit me sélectionner une colonne d'une feuille (qui s'appelle "Donnees") en fonction d'une lettre qui est rentrée dans une cellule d'une autre feuille (qui s'appelle "test").
Par exemple, si dans la cellule, la lettre "a" est rentrée, le programme doit sélectionner la colonne A de l'autre feuille.

J'ai tapé le code suivant :

Code:

---

1 2 3 4 5 6 7

Sub test() Dim numColonne As String   numColonne = ThisWorkbook.Worksheets("test").Range("A1").Value ThisWorkbook.Worksheets("Donnees").Range(numColonne & ":" & numColonne).Select   End Sub

---

mais une erreur ("Erreur définie par l'application ou par l'objet") se produit au niveau de la dernière ligne de code.
Hors, si je reprends cette dernière ligne, mais que je ne note que :

Code:

---

Range(numColonne & ":" & numColonne).Select

---

le code fonctionne (mais il ne me sélectionne pas forcement la colonne de la bonne feuille selon quelle feuille est active)

est-ce que quelqu'un saurait d'où vient l'erreur de mon code?

merci d'avance

Bonjour,

pour pouvoir sélectionner, il faut d'abord activer la feuille …

Mais sélectionner n'est pas nécessaire pour opérer sur des données et donc, de facto, pas besoin d'activer !
A proscrire donc, travailler en direct sur les Range …


_____________________________________________________________________________________________________
Je suis Charlie - Je suis Bardo

Merci Marc-L pour ta réponse

En fait ce que je voudrais, c'est masquer la colonne renseigné avec le code

Code:

---

Worksheets("Donnees").Columns(numColonne & ":" & numColonne).EntireColumn.Hidden = True

---

mais celui-ci ne fonctionne pas non plus (la même erreur se produit)

est-ce que je suis obligé d'activé ma feuille "Donnees" pour que ce code fonctionne?

Ta ligne de code fonctionne depuis une feuille active pour cacher la colonne d'une autre feuille (inactive) du même classeur (actif) :
donc activer et sélectionner s'avèrent bien inutiles …

Simplification : Worksheets("Donnees").Columns(numColonne).Hidden = True …

Je viens de faire un test sur un autre classeur, et effectivement le code fonctionne (merci pour la simplification d'ailleurs)

Donc c'est le fichier sur lequel je travaille qui pose problème

Je vais essayer de voir d'où est-ce que ça provient

merci beaucoup

Feuille protégée, cellules fusionnées, …



_____________________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

Je viens de vérifier, il n'y a pas de cellules fusionnées, et la feuille n'est pas non plus protégée