Affichage d'un endroit en fonction d'un choix

BadRaf

XLDnaute Nouveau
Bonjour

Je cherche a afficher une partie de mon document en fonction d'un choix dans une liste de choix déroulant.
Pour la partie liste de choix pas de soucis mais je n'arrive pas à trouver comment associer la partie du document qui m'intéresse en fonction de ce choix.

étant au travail je ne peut pas poster de document excel car je suis sur un poste internet.

le BUT en haut de mon document une cellule avec comme choix tout les mois de l'année et en fonction du choix affiché le tableau (les mois sont les un en-dessous des autres) qui correspond.

Merci d'avance de vos réponse
 

excfl

XLDnaute Barbatruc
Re : Affichage d'un endroit en fonction d'un choix

Bonjour,

En A1 : liste déroulante : choix du mois à imprimer.

Puis clic sur " Aperçu avant impression".

Travail réalisé pour les trois premiers mois de l'année.

Tu n'as plus qu'à compléter.

excfl
 

Pièces jointes

  • zone d'impression variable.xls
    21.5 KB · Affichages: 33
Dernière édition:

job75

XLDnaute Barbatruc
Re : Affichage d'un endroit en fonction d'un choix

Bonjour BadRaf, bienvenue sur XLD, salut excfl,

Voyez le fichier joint avec la liste de validation en B1.

Regardez attentivement les noms définis Janvier Février Mars.

La macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [B1]) Is Nothing Then
  Dim i As Byte
  If [B1] = "Tous" Or [B1] = "" Then Rows.Hidden = False: Exit Sub
  On Error Resume Next 'si des mois n'existent pas
  For i = 1 To 12
    Evaluate(Format("1/" & i, "mmmm")).EntireRow.Hidden = True
  Next
  Evaluate([B1].Text).EntireRow.Hidden = False
End If
End Sub
A+
 

Pièces jointes

  • Mois(1).xls
    36.5 KB · Affichages: 33
  • Mois(1).xls
    36.5 KB · Affichages: 34
  • Mois(1).xls
    36.5 KB · Affichages: 41

Discussions similaires

Réponses
8
Affichages
467

Statistiques des forums

Discussions
312 400
Messages
2 088 085
Membres
103 710
dernier inscrit
amin Saadaoui