Comprendre ecriture MsgBox

Bonjour,

ma fonction examine la cellule active de mon tableau et affiche un message décrivant le contenu.

Sub VérifCellule()
Dim Msg As String
Select Case IsEmpty(ActiveCell)
Case True
Msg = "est vide"
Case Else
Select Case ActiveCell.HasFormula
Case True
Msg = "contient une formule"
Case False
Select Case IsNumeric(ActiveCell)
Case True
Msg = "contient un nombre"
Case Else
Msg = "contient du texte"
End Select
End Select
End Select
MsgBox "La cellule " & ActiveCell.Address & " " & Msg
End Sub

Je ne comprend pas pourquoi dans le MsgBox, la partie active cell entre guillement, pour moi j aurai mis,
MsgBox "La cellule" & Msg

Je maitrise mal l ecriture vba encore, merci d'avance.

3 réponses

  1. Bonjour,

    & ActiveCell.Address &

    Indique quelle cellule est active, si pas besoin vous enlevez.
    0
    1. Contributeur
      Bonjour,

      C'est simple cela donne

      MsgBox "La cellule " & ActiveCell.Address & " " & Msg 

      La cellule A1 contient du texte

      et avec toi:

      MsgBox "La cellule" & Msg 

      La cellule contient du texte

      salut f894009, suis un peu en retard sur ce coup là!!

      @+ Le Pivert
      0
      1. Bonjour cs_Le Pivert,
        Y a pas d'lezard. Ca roule
        0