Masqués les 3 premieres colonnes visibles

Fermé
timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008 - 22 avril 2008 à 10:57
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 - 22 avril 2008 à 13:04
Bonjour,
Bonjour,
j aimerais savoir comment masquer les 3 premieres colonnes visibles apres la colonne A?
car quand les colonnes B C et D sont masquées ,les trois premieres colonnes deviennent E F et G ,etc.....
merci d'avance pour vos reponses

cordialement
A voir également:

1 réponse

zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
22 avril 2008 à 11:00
quel est le probleme le comportement que tu decris est normal (si on parle bien d'excel)
0
timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008
22 avril 2008 à 11:04
j aimerais un macro qui me masque les 3 premieres colonnes visibles apres la colonne A
0
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161 > timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008
22 avril 2008 à 11:07
donc tu voudrais faire une macro qui cache les 3 premieres colonnes non cachées apres la colonne A?
C'est cela?
0
timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008 > zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012
22 avril 2008 à 11:09
oui exactement
0
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161 > timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008
22 avril 2008 à 11:34
cela devrait le faire

a = 0
b = 2
While a < 3
Columns(b).Select
If Selection.EntireColumn.Hidden = False Then
Selection.EntireColumn.Hidden = True
a = a + 1
End If
b = b + 1
Wend
Range("A1").Select
0
timy2007 Messages postés 8 Date d'inscription mardi 22 avril 2008 Statut Membre Dernière intervention 22 avril 2008 > zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012
22 avril 2008 à 11:55
Merci pour tout

bonne journée et merci encore
0