Discussion :

[yachris]

Bonjour,
Je souhaite masquer ou afficher des colonnes en fonction d'un nombre dans une cellule.
Si A1=1
alors afficher colonne B à D
Si A1=2
alors afficher colonne B à G
Si A1=3
alors afficher colonne B à J etc...
A1 est compris entre 1 et 30

A1 étant le nombre de pièce de mon batiment, j'ajoute 3 colonnes (correspondant au calcul des déperditions de chaque pièce) à chaque fois que j'ajoute une pièce.
Je suis un neuneu en macro et en VB.
Je ne suis peut être pas sur un forum adapté pour les neuneus mais il faut bien se lancer !!
Merci.

[gFZT82]

Bonjour et bienvenue sur le forum DVP,

Voici un code à placer dans le module de la feuille concernée.
Ce code utilise l’évènement Worksheet.Change qui permet de détecter un changement de valeur dans la cellule A1.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" And [A1] > 0 Then
        Application.ScreenUpdating = False
        Columns("B:AD").Hidden = True
        Cells(1, 2).Resize(1, 3 * Range("A1").Value).EntireColumn.Hidden = False
        Application.ScreenUpdating = True
    End If
End Sub

Cordialement.

[yachris]

Bonjour,
Je tarde à vous remercier car j'attendais un mail du forum pour me spécifier que quelqu'un avait répondu à mon message mais manifestement ce n'est pas le cas j'ai pas du cocher la bonne case.

Donc merci pour la réponse et pour la solution, c'est exactement ce que je voulais.
J'ai juste cherché un peu car j'avais collé le code dans module 1 de modules plutot que dans la feuille 1 de Microsoft Excel Objets, c'est pour dire ma méconnaissance !!!

Bref, pouvez vous m'indiquer un ouvrage ou un site qui me permettrai de m'initier au macro excel genre "macro excel pour les neuneu " ?
Encore merci.
Cordialement.

[gFZT82]

Bonjour,

Je peux te conseiller ce document
https://bidou.developpez.com/article/VBA/
Pour la suite, tout est affaire de curiosité... et de motivation .
Un bon nombre de sujets sont traités dans les forums, FAQ ou tutoriels, sans oublier les livres à foison.

Cordialement.