MSGBOX

[DAMIEN]

BONJOUR

je voudrai a l'aide d'un bouton faire apparaitre dans un msgbox toutes les infos de la ligne active

heures:1250
mouvement: transit
nom:le contenu de la cellule des collones E, F, ET G
callsign:
....

merci
damien

 

[Valérie]

Salut Damien et le forum,

Tu peuc afficher des informations sous cette forme, mais je met un bémol à la clé, je ne sais pas combien de caractères sont affichables dans une msgbox (et je n'ai pas l'aide installée de suite)

Sub AficheMsg()
Dim LIGNE As Integer, MSG As String
LIGNE = ActiveCell.Row

MSG = "Heures : " & Range("A" & LIGNE) & vbCrLf
MSG = MSG & "Mouvement : " & Range("B" & LIGNE) & vbCrLf
MSG = MSG & "Nom : " & Range("e" & LIGNE) & " " & Range("f" & LIGNE) & " " & Range("g" & LIGNE) & vbCrLf

MsgBox MSG
End Sub

Sinon en créant un UserForm tu n'aura aucun soucis de longueur de texte

@+
Valérie

 

[DAMIEN]

merci c'est super plus qu'a agrandir la police pas facile