VBA utilisation de Cells.Value
Bonjour,
J'ai besoin de récupérer via une macro le contenu d'une cellule d'une autre feuille pour l'afficher comme valeur d'un label sur une popup. C'est pas très clair mais en gros voici mon bout de code :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
Private Sub CommandButton9_Click()
Workbooks.Open("\\myroot\BaseCommandes.xls").Worksheets("Commandes").Unprotect Password:="mypass"
MyQte = Application.Worksheets("Commandes").Cells(8, 1).Value
CommandesView.Label2.Caption = MyQte
Worksheets("Commandes").Protect Password:="mypass"
For Each w In Workbooks
If w.Name <> ThisWorkbook.Name Then
w.Close savechanges:=False
End If
Next w
CommandesView.Show
End Sub |
Et grossomodo, si je remplace le contenu de la variable MyQte par "toto", le texte "toto" apparaît bien dans mon label2. Par contre, si je laisse le chemin vers cette cellule, je n'ai rien qui s'affiche dans mon label2.
La cellule est sous format nombre, et se situe en H1 de la feuille "Commandes".
L'affichage se fait sur le panneau "CommandesView" de la feuille "Accueil"
Merci pour votre aide :ccool: