Caption d'un label = valeur d'une cellule

[OL]

Je travaille sur une petite interface de saisie sous exel qui se présente de la façon suivante:
- Feuille 1 --> Juste un compteur en cellule A1
- A l'ouverture du classeur, le userform1 invite, entre autre, à la saisie d'une nouvelle fiche. Le nom de cette fiche est donnée par l'incrémentation du compteur de la feuille 1.
- Le premier Userform se ferme pour faire place au second, la saisie de la fiche à proprement parler.

Ma question: Comment faire pour faire apparaitre sur le Userform 2 le N° de la fiche, ou la valeur de la cellule A1 de la feuille 1 dans un label (ou un autre contrôle qui ne serait pas modifiable parl'utilisateur) ?

Merci de vos réponses
OL

 

[@Christophe@]

Bonjour OL

Ben tous simplement dans le userform initialize de ton userform2 tu ajoutes la ligne suivant:

Label1.caption = sheets("Feuil1").range("A1").value

Bonne journée

@Christophe@

 

[Valérie]

Salut le forum et OL,

Il te faut un label que je nomme Et_MonLabel dans ton USF que je nomme USF_Saisie puis il faut placer cette ligne avant l'ouverture de ton second USF :

USF_Saisie.Et_MonLabel.Caption = Feuil1.Range("A1")
USF_Saisie.Show

J'espère que cela correspond à ce que tu cherches

@+
valérie

 

[Valérie]

Bien Christophe je ne t'avais pas vu , je m'incline

@+
Valérie

 

[@Christophe@]

Re

Pas de prblème Valérie, tu es la bienvenue

Bonne journée à vous

@Christophe@

 

[OL]

Merci bien

 

[benl]

Re : Re: Caption d'un label = valeur d'une cellule

Bonjour,

voila mon petit problème, quand je tape le code suivant il me marque erreur

Voila le code


Private Sub Validerbutton_Click()

Dim i As Integer

For i = 2 To 12

If Sheets("Feuil2").Cells(i, 3) = 1 Then Label3.Caption = Sheets("feuille2").Cells(i, 2).Value


Next i

End Sub
sachant que que la cellule (i,2) contient du texte

un ptit coup de main ne serait pas de refus, merci d'aance 🙂

 

[benl]

Re : Re: Caption d'un label = valeur d'une cellule

ptit up pour relance la discution

 

[Dranreb]

Re : Caption d'un label = valeur d'une cellule

Bonsoir.
Impossible à savoir.
En tout cas ce n'est pas très intelligent d'avoir une feuille nommée "Feuil2" et une autre "feuille2" avec des lignes en rapport l'une avec l'autre. Il vaudrait mieux des noms carrément différent ou tout sur la même feuille.
Cordialement.