Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres trouver l'erreur

chilo27

XLDnaute Occasionnel
Bonsoir le forum

Je souhaite une petite base de travail afin de ne pas toujours recommencer la même chose
se sont les labels qui s'affichent automatiquement en prenant les noms de l'entête de la feuille 6

Ma difficulté est d'affiché la ville et le code postal sur la feuil1

Actuellement, en cliquant sur la combobox code postal le nom de la ville et du code postal
s'affichent dans la feuille 6

Si vous pouvez m'aider à trouver la solution

En vous remerciant par avance
 

Pièces jointes

  • Labelentete (VERSION 2).zip
    55.5 KB · Affichages: 15

Oneida

XLDnaute Impliqué
Re,
je pense que vous avez trouvez kake part le code VBA car farci d'erreur si les on error ne sont pas en commentaire.
Y a pas de Feuil2, la listview ne se rempli et j'en passe
Je suppose que votre soucis est lorsque vous cliquez sur le bouton Feuil6,

Code:
Private Sub CodePostal_Change()
    Set Sh = Sheets("Feuil1")
'vous definissez Sh, mais vous ne l'utilisez pas
VB:
         '------------------------------------------------
          '[A2] = Me.CodePostal.Column(1)       'ecrit dans la cellule de la feuille Active
          '[B2] = Me.CodePostal.Column(0)       'ecrit dans la cellule de la feuille Active
          Sh.Range("A2") = Me.CodePostal.Column(1)
          Sh.Range("B2") = Me.CodePostal.Column(0)
          '------------------------------------------------
 

Pièces jointes

  • Labelentete (VERSION 2).xlsm
    57.1 KB · Affichages: 3

Discussions similaires

Réponses
8
Affichages
474
Réponses
0
Affichages
218
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…