Compression grave docteur ?

Le
milloche
Bonjour
Peut-on écrire ceci sur une ligne ?
J'ai éssayé avec différents séparateurs et je donne ma langue au chat. ( [ ; , : espace
rien ne marche

Columns("G:T").EntireColumn.Hidden = True
Columns("B:D").EntireColumn.Hidden = False
Columns("E").EntireColumn.Hidden = False
Columns("G").EntireColumn.Hidden = False
Columns("J").EntireColumn.Hidden = False
Columns("P:Q").EntireColumn.Hidden = False
Columns("S").EntireColumn.Hidden = False
Columns("U:V").EntireColumn.Hidden = False

Est-ce que ma maladie de vouloir toujours tout raccourcir est grave docteur ?
Cordialement
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #18480251
With Feuil1 'adapte le nom de la feuille
.Range("G:T").EntireColumn.Hidden = True
.Range("B:E,G:G,J:J,P:Q,S:S,U:V").EntireColumn.Hidden = False
End With




"milloche"
Bonjour
Peut-on écrire ceci sur une ligne ?
J'ai éssayé avec différents séparateurs et je donne ma langue au chat. ( [ ; , : espace
rien ne marche

Columns("G:T").EntireColumn.Hidden = True
Columns("B:D").EntireColumn.Hidden = False
Columns("E").EntireColumn.Hidden = False
Columns("G").EntireColumn.Hidden = False
Columns("J").EntireColumn.Hidden = False
Columns("P:Q").EntireColumn.Hidden = False
Columns("S").EntireColumn.Hidden = False
Columns("U:V").EntireColumn.Hidden = False

Est-ce que ma maladie de vouloir toujours tout raccourcir est grave docteur ?
Cordialement
milloche
Le #18480591
Evident ! (;o ))

Range mais pas column, et j'ai même sucré le With/End With.
Et comme ma pathologie n'a pas l'air de t'inquiéter outre mesure, c'est que tout va bien
pour moi encore.
Joyeux WE
JMM

"michdenis"
With Feuil1 'adapte le nom de la feuille
.Range("G:T").EntireColumn.Hidden = True
.Range("B:E,G:G,J:J,P:Q,S:S,U:V").EntireColumn.Hidden = False
End With




"milloche" :

Bonjour
Peut-on écrire ceci sur une ligne ?
J'ai éssayé avec différents séparateurs et je donne ma langue au chat. ( [ ; , : espace
rien ne marche

Columns("G:T").EntireColumn.Hidden = True
Columns("B:D").EntireColumn.Hidden = False
Columns("E").EntireColumn.Hidden = False
Columns("G").EntireColumn.Hidden = False
Columns("J").EntireColumn.Hidden = False
Columns("P:Q").EntireColumn.Hidden = False
Columns("S").EntireColumn.Hidden = False
Columns("U:V").EntireColumn.Hidden = False

Est-ce que ma maladie de vouloir toujours tout raccourcir est grave docteur ?
Cordialement



Publicité
Poster une réponse
Anonyme