Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Dim i as integer
dim J as string
j = Range("b" & d.Row).Value
Me.Controls("Plant_j" & i).Caption = Range("a" & d.Row).Text
Quelqu'un sait-il comment corriger la syntaxe ("Plant_j" & i) car je crois que dans mon code c'est cette partie qui ne fonctionne pas?
A+
Quelqu'un pourrait il me conseiller sur le code qui, lorsque je clique sur "effacer tout" permet de remettre tout les label = "" de manière groupé (sans écrire pour chaque label : label1 = "" label2 = "" etc...)
Faut-il de creer un groupe de controles?
si oui comment fait on?
thanks...
Bonjour le forum,
Je réalise un userform.
Dans une frame je placé cinq OptionButton. Lorsque je coche un de ces OptionButton je souhaite lire dans la cellule A1 la valeur de OptionButton.caption qui est coché. Comment faire?
Je souhaite également faire l'opération dans le sens inverse...
Salut à tous,
J'ai un petit soucis dans l'écriture de mon code vb.
Mon but est d'ajouter des produits dans un panier.
Je souhaite réalisé ceci :
Dans une ComboBox je dispose d'une liste où je choisi un produit. J'ai créé un bouton qui me permet, lorsque je click sur dessus, d'attribuer...
Bonjour le forum,
je souhaite remplir des labels nommés plant1.caption, plant2.caption etc... dès lors que ceux ci sont <> "" via un système d'ajout au panier. En effet, l'info serai inscrit dans mes labels de la façon suivante :
Dans une ComboBox_GEV je choisi une plante.
Lorsque je...
Salut salut, j'ai une boucle qui doit tester les cellules d'une colonne que voici
La colonne >>
Range(Cells(5, Cbo_RefMassif.ListIndex + 10), Cells(fin_de_ligne, Cbo_RefMassif.ListIndex + 10)).
Si dans ma colonne, la cellule testée est vide alors rien ne se passe
Et Si la cellule...
Salut salut,
Comme beaucoup, je me suis lancé a coeur perdu dans le vba et comme beaucoup je me suis perdu, lalala...
Résultat je traine ma peau sur les forums à la recherche de quelques fragments de code! Je commence à savoir lire c'est déjà pas mal.
Je cherche désormais un code me...
Bonjour
Quelqu'un pourrait-il valider la syntaxe de la macro suivante?
Sub test()
Dim Z As String
Z = Application.VLookup(plant1lect.Caption, Sheets("Feuil1").Range("A5:A18"), 6, FAUX) & ".jpg"
MsgBox Z 'lit la valeur de Z
End Sub
merci
Salut à tous,
A partir d'une Combobox1 qui récupère des données dans la ligne 4 de mon tableau via :
Private Sub UserForm_Initialize()
Combobox1.List = Application.Transpose(Range([j4], [IV4].End(xlToLeft)))
End Sub
je cherche à obtenir la "Lettre" de la colonne correspondant au...
Bonsoir, petit problème de synthaxe..
ComboBox1.ListIndex ==> me renvoit au numéro de la ligne de ma selection dans la combobox
ex : si je selectionne ds ma combo : Pruno, il me donne le numéro de ligne suivant : 4. Jusque là tt va bien.
..........A..............B...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.