Discussion :

[InSiderZ]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[mercatog]

Essaies ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub CommandButton9_Click()
Dim Wb As Workbook
Dim MyQte As String
 
Application.ScreenUpdating = False
Set Wb = Workbooks.Open("\\myroot\BaseCommandes.xls")
MyQte = Wb.Worksheets("Commandes").Range("H1").Value
CommandesView.Label2.Caption = MyQte
Wb.Close savechanges:=False
Set Wb = Nothing
CommandesView.Show
End Sub

[zazaraignée]

Cells(row, col) fait référence au contenu de la cellule

Pour accéder à la cellule, puis à sa valeur (ou à tout autre propriété ou méthode), Tu passe par un objet Range Range(Cells(row, col)).Value.

... comme le montre le code de mercatog.

[Didier Gonard]

Cells(row, col) fait référence au contenu de la cellule

Pour accéder à la cellule, puis à sa valeur (ou à tout autre propriété ou méthode), Tu passe par un objet Range Range(Cells(row, col)).Value.

... comme le montre le code de mercatog.

Peux-tu expliquer comment cette écriture

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range(Cells(row, col)).Value

retourne autre chose qu'un message d'erreur ?

cordialement,

Didier

[zazaraignée]

J'illustrais simplement l'idée générale. autrement j'aurais mis ça dans une balise de code. Désolée que ça ait provoqué une telle confusion.

tout aussi cordialement

[Pierre Fauconnier]

Cells(row, col) fait référence au contenu de la cellule
...

Non, Cells(row, col) fait référence à un objet Cellule... La preuve en est que tu as des propriétés et méthodes derrière (dont le .value dont tu parles)...

C'est parce la propriété .value de l'objet Cells(r, c) est la propriété par défaut que l'on peut croire que Cells(r, c) renvoie la valeur de la cellule, mais c'est une confusion (très fréquente) qui m'amène à dire qu'il faut systématiquement utiliser la propriété dans le code.

[InSiderZ]

Essaies ceci

Cela fonctionne avec ta solution mercatog, merci beaucoup !