Afficher une variable en string

Bonjour,

Je souhaite afficher une variable textuelle à partir d'une feuille "Profil/Calendrier" dans la cellule B2, mais cela m'affiche une fenêtre sans aucun texte !

j'ai mis .text ou .Value lors de l'affectation de la variable "pj", cela ne change rien

le code ci dessous

Sub CreationOnglet()
     Dim pj As String

 Windows("Profils.xlsx").Activate
 Sheets("Calendrier").Select
 pj = Cells(2, 2).Text

MsgBox pj

End sub 

Bonjour,

Ecriture plus conforme à un bon usage de VBA :

Sub CreationOnglet()
    Dim pj As String
    pj = Workbooks("Profils.xlsx").Worksheets("Calendrier").Cells(2, 2).Text
    MsgBox pj
End Sub

(Abandonner une bonne fois l'enregistreur ! )

Si le message n'affiche rien, c'est que la cellule B2 n'affiche rien !

fausse alerte

pj = Application.Workbooks("Profils.xlsx").Worksheets("Calandrier").Cells(2,2)

MsgBox pj

Le respect de l'orthographe (dans tes noms de feuilles) n'est pas forcément nuisible !

Tu peux te dispenser de mentionner Application (implicite dans de nombreux cas, ce qui raccourcit l'écriture...)

Rechercher des sujets similaires à "afficher variable string"