Projet VB Excel , copier le contenu d'un "Label" d'une feuille vers une autre

Question

Bonjour, je cale sur un code dans un projet excel :

Sur ma FEUIL1 j'ai une cellule dans laquelle j'ai mis un Label me renvoyant une date.

J'ai besoin de copier cette date sur ma FEUIL2 j'ai essayé :

    Private Sub Feuil2_Startup() Handles Me.Startup
        Dim NamedRange As Microsoft.Office.Tools.Excel.NamedRange =
            Me.Controls.AddNamedRange(Me.Range("D2"), "NamedRange")
        NamedRange.Value2 = 
    End Sub

et je voudrais donc pouvoir dire que   NamedRange.Value2 =Label1.Text (le Label de ma FEUIL1) mais il n'est pas reconnu

---

JF Collombet ® CreateSpecificCulture

Answer 1

Bonjour, jeffcollombet,

Veuillez consulter cet exemple qui montre comment lister les feuilles dans le classeur. Une fois l’accès à la feuille nécessaire établi, vous pouvez essayer de trouver le Label.
Comment : répertorier toutes les feuilles de calcul d'un classeur par programmation

Cordialement,
Dimitar