Columns vba
Résolu
clemencon
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
clemencon Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
clemencon Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je cherche a selectionner des colonnes pour les masquer apres, mais je n'ai dans les mains que les numeros des colonnes a masquer.
Je doit donc trouver un supterfuge pour transformer le num de la colonne en lettre.
J'ai trouve :
- Split(Columns(Numero).Address(ColumnAbsolute:=False), ":")(1)
Avec ca c cool, je peu bien recupere la lettre, mais quand je l'inscrit dans la fonction columns(), ca chie...
Ca me met : "Type mismatch"
Columns("& b : & c &").EntireColumn.Hidden = True
(b et c etant des variables contenant le split(.....) avec deux num de colonne different)
Comment faire ??
Quel type de donnee faut il mettre dans la fonction columns()
Je cherche a selectionner des colonnes pour les masquer apres, mais je n'ai dans les mains que les numeros des colonnes a masquer.
Je doit donc trouver un supterfuge pour transformer le num de la colonne en lettre.
J'ai trouve :
- Split(Columns(Numero).Address(ColumnAbsolute:=False), ":")(1)
Avec ca c cool, je peu bien recupere la lettre, mais quand je l'inscrit dans la fonction columns(), ca chie...
Ca me met : "Type mismatch"
Columns("& b : & c &").EntireColumn.Hidden = True
(b et c etant des variables contenant le split(.....) avec deux num de colonne different)
Comment faire ??
Quel type de donnee faut il mettre dans la fonction columns()
2 réponses
bonjour,
il faut mettre un variable string, (alphanumérique)
transformer le N° de ta colonne en lettre
NomVariable$=asc(NumeroCol+64)
Si la colonne est 1 la variable NomVariable="a"
ou
Columns("& b : & c &").EntireColumn.Hidden = True
remplacer par
Columns( b & ":" & c).EntireColumn.Hidden = True
pas de guillemet pour les variables mais bien pour les valeur alpha.
louis
il faut mettre un variable string, (alphanumérique)
transformer le N° de ta colonne en lettre
NomVariable$=asc(NumeroCol+64)
Si la colonne est 1 la variable NomVariable="a"
ou
Columns("& b : & c &").EntireColumn.Hidden = True
remplacer par
Columns( b & ":" & c).EntireColumn.Hidden = True
pas de guillemet pour les variables mais bien pour les valeur alpha.
louis