les labels VBA Fermé

Question

bonjour, 

j'ai une question à propos des noms des labels dynamique : 

je créer mes labels dynamiquement, mon problème est que ceux ci doivent recevoir un "id" venant d'une requête faite sur un autre userform et que je ne sais pas comment faire pour récupérer cet "id" dans le bouton créé dans le premier userform. 

cet "id" doit devenir son .caption, mais le fait que ce soit sur un autre userform cela me pose des problème de variables. 

est ce que quelqu'un aurait un truc à me proposer ? 

merci beaucoup

Polux31 · Answer

Bonjour,

Il suffit pour cela de stocker la donnée correspondante du recordset dans une variable, et ensuite de récupérer cette variable pour la mettre dans la propriété Caption du label.

Admettons que ta variable (monLabel déclarée en public) qui récupère le nom du label soit sur UserForm1 et le label1 sur UserForm2, ça donne :

UserForm2.Label1.Caption = UserForm1.monLabel

;o)

polux

Polux31 · Answer

Ton label est donc la concaténation de 2 champs de ta requête ... Tu as bien déclaré ta variable comme ça :

Public monLabel As String

Mais un point d'arrêt sur monlabel = RSCONSO2!Install & " , cal " & RSCONSO2!Cal et regarde ce que contient la variable.

Dans ton autre userform, label_dyna est créé avec la méthode que je t'ai passé ?

Polux31 · Answer

C'est étrange ... ton label_dyna se créait-il bien ? fait un test en mettant .caption = "toto" par exemple ...

niny@ · Answer

oui mon label se créer bien pour chaque bouton que je créer j'associe un label différent.

public monlabel as string me donne l'erreur "attribut incorrect dans une procédure sub ou function"

quand je le sort de là , ca me dit que seul les commentaires peuvent etre en dehors d'une fonction ou procédure.

et du coup pour l'instant je ne vois pas si monlabel récupére bien les données de la requête

Polux31 · Answer

ok

dans les champs du resordset n'aurais-tu pas une apostrophe ?

Polux31 · Answer

Dans quelle partie as-tu déclaré monLabel ??? il faut la déclarer en variable globale ... en tout début de code avant toute procédure ou fonction ....

Polux31 · Answer

lol ... et oui ça une variable globale qui peut être lu de n'importe quel module

;o)

polux

niny@ · Answer

par curiosité ca fait combien de temps que tu codes le VBA ? parce que pour debugger de loin c'est aps évident!!! surtout quand tu tombes sur des gens comme moi lol !

bon "monlabel" récupére bien les données du recorset mais ne le renvois pas sur l'autre userform. car quand je fais un msgbox pour vérifier le  .caption de mon label créé dynamiquement recoit rien.

faut pas re déclarer monlabel vu que cette variable est dans l'autre en public ? c'est ca non ?

Polux31 · Answer

lol je ne code pas en VBA ... je fais du VB de temps en temps ... mais le principe est le même.

Fait juste un msgbox userform1.monLabel dans le load de l'userform2 (userform_initialize je crois sur VBA)...

niny@ · Answer

c'est ce que j'ai fait mais du coup ca me montre bien que la var ne transite pas vers l'autre userform.
ca me fait comme si elle était déclarée en locale. c'est bizarre pourtant il me semble que tout y est .

*chapeau pour la prog, j'ai encore du boulot mais pti à pti on apprend

Polux31 · Answer

peux-tu mettre ton fichier ici : https://www.cjoint.com/ et ensuite tu mets le lien ici ...

niny@ · Answer

https://www.cjoint.com/?dsvsUolN5U

ca bugger dsl

Polux31 · Answer

ça marche pas ... tu peux refaire la manip ?

niny@ · Answer

https://www.cjoint.com/?dsvFOM5OgI

niny@ · Answer

je sais pas les liens ne sont pas actifs 

bon c'est aps grave je peux te faire un résumé de code pi etre que tu trouveras mon pb non ?

Polux31 · Answer

bon ça marche pas :-s
je te donne mon mail en message privé ... tu me le passes par là ...

Les labels VBA

16 réponses

Discussions similaires