Déclarer un tout petit code en variable

Fermé
duduleray - 7 déc. 2013 à 11:47
 duduleray - 7 déc. 2013 à 14:56
Bonjour a toutes et tous, forum bonjour



sous Excel 2007 VBA

Je n'arrive pas a déclarer le code ci-dessous correctement

sous une variable (normale)

et sous une variable Public

et afficher dans mon Label43 le résultat de la variable devrai etre "2013"

Format(DateSerial(ComboBox1, i, 1), "yyyy")

Merci a vous et de votre temps

Bon W-end

Cdlt Ray
A voir également:

6 réponses

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
7 déc. 2013 à 11:56
Bonjour,



Label43.Caption =  Format(ComboBox1.Text, "yyyy")

0
Salut Polux31

Merci pour ta réponse

je souhaite déclarer "Format(ComboBox1.Text, "yyyy")"

sous une variable exploitable Exemple

Dim X As String

X= Format(ComboBox1.Text, "yyyy")

Label43.Caption = X

Mais ca marche pas

Bon app

Ray
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
7 déc. 2013 à 12:25
Ta variable est déclarée où ?

Si je fais :

Sub Test
Dim x As String

      x = Format(ComboBox1.Text, "yyyy")
      Label43.Caption = x

End Sub


Chez moi ça fonctionne.
0
Re

declarer dans initialize userform

moi j'ai comme réponse X= 2182

ray
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
Modifié par Polux31 le 7/12/2013 à 12:51
Tu connais la portée des variables ?

Ca peut peut être t'aider
0
Salut

Non je ne connais pas

par contre j'ai lu de la doc sur les variables sur un forum bien connu mais a comprendre comme ça ce n'ai pas forcément évident

parfois un prof ne serai pas de trop, mais bon les profs a 62 ans LOL quoique

Ray
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
7 déc. 2013 à 13:58
Là, tel que tu exposes le problème, il semblerai que la variable ne soit pas déclarée au bon endroit.

Pour faire vite :

- Variable globale déclarée au début d'un module

Option Explicit

Public maVarpublic As String 'Visible par tous les modules du code
Private maVarPrivee As String 'Visible uniquement dans le module


- Variable locale déclarée dans une méthode, procédure, fonction.

Function Test()
Dim maVar As String 'Visible que dans cette fonction

     maVar = "Coucou"
     MsgBox maVar

End Function

0
Re Salut

J'ai réussi a adapter a mon programme et là cela a l'air de fonctionner

je verrai bien dans le temps et a l'usage.

Passe un bon W-end et je remercie pour ton aide ainsi que pour les infos
qui sont toujours bonnes a prendre.

Bye bye encore merci

Cordialement Ray
0