Masquer des colonnes en vba

Fred0o

XLDnaute Barbatruc

• 2 Novembre 2012

• #2

Re : Masquer des colonnes en vba

Bonsoir FQ67,

35 lectures de ta question sans réponse, c'est donc que comme moi, 34 autres personnes on lu, pas compris et laissé tomber.

En ouvrant ton fichier, on s'aperçoit qu'il y a des valeurs dans toutes les colonnes (excepté A;K:V;AE:AQ;AX:BO;...) Est-ce ces colonnes que tu veux masquer ?

Merci de préciser ta question.

A+

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 2 Novembre 2012

• #3

Re : Masquer des colonnes en vba

Bonjour à tous,
Salut Fred,

Sans avoir besoin de masquer les vides :

• les noms dans un liste
• une liste de validation pour le choix
• une table pour les équivalences
• une simplification des formules

Cette proposition ne répond pas à la demande mais je me suis amusé...

A + à tous

 

Pièces jointes

• JC Numérologie.xlsx

  14 KB · Affichages: 81

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 3 Novembre 2012

• #4

Re : Masquer des colonnes en vba

salut

Si... tu veux cacher, essaie la première macro et pour remettre les choses en place, la seconde :

Code:

Sub pasvu()
  Dim c As Range
  Application.ScreenUpdating = False
  For Each c In Range(Cells(6, 1), Cells(6, Cells(6, Columns.Count).End(xlToLeft).Column))
    If c = "" Then c.EntireColumn.Hidden = c = ""
  Next
End Sub

Sub vu()
  Cells.Columns.Hidden = False
End Sub

 

Vote positif 0 Vote négatif

F

FQ67

Guest

• 3 Novembre 2012

• #5

Re : Masquer des colonnes en vba

Bonjour à vous trois.

Excusez moi si je ne me suis pas bien fait comprendre....Merci à JC j'adore ta formule...
Merci à SI.... pour la macro! malheureusement lorsque je la lance j'obtiens un message d'erreur. False apparait en rouge après application.screenupdating.

Pour repondre à Fred0o j'ai besoin d'une macro qui puisse cacher toutes les colonnes vides laissées après le decoupage des prenoms et noms. Donc le masquage des colonnes sera aléatoire en fonction de la longueur des prenoms et nom.

Voila j'espere avoir ete plus clair.

Encore un grand merci pour votre aide

Francois

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 3 Novembre 2012

• #6

Re : Masquer des colonnes en vba

salut

FQ67 à dit:

Merci à SI.... pour la macro! malheureusement lorsque je la lance j'obtiens un message d'erreur. False apparait en rouge après application.screenupdating.

Cliquez pour agrandir...

????
Testée avec le fichier joint sans problème.
Regarde s'il ne te manque pas une référence (dans l'éditeur : Outils, Références...).
Si... oui, décoche sinon supprime cette ligne (qui a pour effet d'éviter la réactualisation de l'écran donc cofort visuel et gain de temps).

 

Vote positif 0 Vote négatif

F

FQ67

Guest

• 3 Novembre 2012

• #7

Re : Masquer des colonnes en vba

Merci effectivement la macro fonctionne....
Si tu reprends le fichier original, tu veras qu'il y a trois prenoms et un nom. ce que je voudrais c'est masquer automatiquement les A,B dans l'exemple du fichier de K a W puis de AE a AR puis de AX à DX. Ceci est vrai pour cet exemple mais la macro devra varier et s'adapter en fonction du nombre de lettre du prenom ou nom qui sera decoupé.... J'espere etre clair dans ma demande.
D'avance merci pour ton aide,

Francois

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 3 Novembre 2012

• #8

Re : Masquer des colonnes en vba

salut,

Si... j'ai bien compris tu veux aussi masquer le texte de référence (B, W, AR ...) alors corrige la ligne comme cela :

Code:

Sub pasvu()
 ...
    c.EntireColumn.Hidden = (c = "" Or Not c.HasFormula)
 ...
End Sub

 

Vote positif 0 Vote négatif

F

FQ67

Guest

• 5 Novembre 2012

• #9

Re : Masquer des colonnes en vba

Bonjour Si...

Super, merci de ton aide

 

Vote positif 0 Vote négatif