Modifier les parametre d'un controles dans une feuille en vba Résolu

Question

Bonjour,

j'aimerais modifier le titre de certain Label contenue dans une feuille a partir du code vba de cette feuille en question mais je ne sais pas comment.

Voici ma tentative echoué :

For i = 4 To 7
    
    Workbooks("class.xlsl").ActiveSheet.OLEObjects("Label" & i).Value = Workbooks("class.xlsl").Worksheets("transfert" & po).Range("A" & i).Value

Next i

sa me donne une erreur propriété ou methode non géré par cette objet

Et j'aimerais aussi que cette action de s'effectue seulement une fois lors de la creation de cette feuille en question

Mais je ne sais pas comment

Merci

PlacageGranby · Answer

Bonjour,

Voir lien ci-dessous
https://forums.commentcamarche.net/forum/affich-15380712-label-et-boucle-vba

Bob0876 · Answer

Me.controls ne marche pas sa me dit membre de methode ou donnée introuvable

j'ai dejas utilisé cette methode avec mais userform mais on dirais que lorsque les controles sont directement sur la feuille il ne les trouve pas

thev · Answer

Tout dépend du type de contrôle inséré dans ta feuille .
La collection "OLEOBJECTS" correspond aux contrôles ActiveX. Pour les contrôles formulaire, il faut utiliser la collection "SHAPES"  
Pour un Userform, la collection est "CONTROLS". 
--

thev · Answer

Je complète ma réponse.
S'il s'agit d'un contrôle ActiveX :
Workbooks("class.xlsl").ActiveSheet.OLEObjects("Label" & i).Object.Caption = Workbooks("class.xlsl").Worksheets("transfert" & po).Range("A" & i).Value

S'il s'agit d'un contrôle formulaire :
Workbooks("class.xlsl").ActiveSheet.Shapes("Label" & i).AlternativeText = Workbooks("class.xlsl").Worksheets("transfert" & po).Range("A" & i).Value
  
--

Bob0876 · Answer

Je teste sa dès demain.

Merci bcp,

Modifier les parametre d'un controles dans une feuille en vba

5 réponses

Discussions similaires

Newsletters