Donner le même nom a un label que la cellule

bonjour a tous et toutes

dans workbook open j'ai un userform qui s'ouvre pour faire un choix devis où facture

si le bouton 1 est choisi alors d1 prendre la valeur devis et l'userform se fermer pour laisser place a un autre qui lui devrai capter aussi la valeur du bouton où de la cellule et c'est ce que je n'arrive pas a faire

voici l'exemple pour mieux comprendre

Private Sub CmB_dev_Click()
Range("A1").Value = "DEVIS"
UserForm2.Show
UserForm2.Label2.Caption = Range("A1").Value ' ne fonctionne pas
Unload Me
End Sub

ca le fait a la 2ème ouverture mais c'est dans la foulée qu''il le faudrait

ce post a un rapport avec celui-ci https://forum.excel-pratique.com/excel/option-button-ok-mais-la-validation-t79916.html

Bonjour,

sans aller plus loin , pour éviter les problèmes , n'utilise pas range sans préciser la feuille/classeur concerné..

ThisWorkbook.sheets("MaFeuille").range("A1") = "DEVIS"

[Edit]

et ensuite met les lignes dans le bon ordre

UserForm2.Label2.Caption = ThisWorkbook.sheets("MaFeuille").range("A1").Value ' fonctionne
UserForm2.Show

Bonjour

Un essai à tester. Te convient-il ?

Bye !

Bonsoir GMB , Pierre-jy et le forum

merci a vous 2 j'ai réussi a adapter vos solutions a mon classeur et même résoudre un autre problème par la même occasion

bon fin de weekend a vous