Variable dans un label?

Résolu
Bonjour,
Je ne comprend pas pourquoi ce code ne fonctionne pas
 Option Explicit
Dim Money As Integer
Private Sub UserForm3_Initialize()
 Set Money = 5000
 Z.Caption = Money 


Sachant que Z est un label
On ne peut pas mettre de variable dans un label??

5 réponses

  1. Contributeur
    Bonjour,

    quelque soit le nom du userform c'est :
    Private Sub UserForm_Initialize()
    eric

    1
    1. Modérateur
      "Set" ne s'applique qu'aux objets, pas aux type simples (numériques, string)
      Retires-le.
      0
      1. Ok c'est fait, mais ca marche toujours pas x(
        0
        1. Modérateur
          "ca marche toujours pas" ne veut rien dire.
          Pas le résultat attendu ? Erreur ? Autre ?

          As-tu essayé en pas à pas en regardant le contenu des variables ?
          Y-a-t-il du code qui peut interférer ?
          0
        2. @NHenryCest a dire qu'il ne se passe tout simplement rien, pas de rapport de debogage, juste le label n'a rien d'ecrit dedans une fois le userform lancé.
          Ca marche si je le met dans une procédure tel que le click d'un bouton de commande, mais pas dans le userform initialize.
          Le code que jai envoyé est tout ce qu'il y a dans le classeur, donc pas d'interference
          0
        3. Modérateur
          ok, as-tu essayé de faire un :
          MsgBox "test"
          dans userform initialize ?
          Si il ne s'affiche pas, c'est que l'event n'est pas appelé.
          0
        4. En effet la msgbox ne s'affiche pas non plus dans le initialize.
          Comment je fais pour l'appeler donc?
          0
        5. Modérateur
          Il y a d'autres événements qui sont disponible, normalement.
          0
      2. Donc je ne peux rien faire dans mon initialize alors :/ Le probleme c que si je dois attribuer une valeur a une variable dans la procédure ou elle est utilisée les changements de valeur par differentes fonctions ne seront pas gardé en memoire et tout repart de zero a chaque fois...
        Par ex
        Variable = 5000
        Des if font que la variable perd 100
        elle vaut 4900
        Quand je relance la procedure ca repart donc de 5000
        Il faudrait que je puisse affecter une valeur avant afin d'eviter ce pb
        (jai aussi essaye de mettre dans userform mousemove mais meme probleme)
        0
        1. OMG MERCI CETAIT CA

          Javais du le changer en pensant que c'etait la cause d'un bug je retiens la lecon merci bcp
          0