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

Statistiques des forums

Discussions
312 047
Messages
2 084 864
Membres
102 690
dernier inscrit
souleymaane