Foramatege MsgBox

[egman]

Bonjour à tous,

Je reviens vers vous pour une petite question sur le formatage d'une MsgBox.

Je m'explique :

Feuil1 = base de données avec plusieurs colonnes
Feuil2 = différentes shapes

je récupère dans une MsgBox des données de la Feuil1 en cliquant sur une shape
Mon souci est que mes données n'ont pas toutes la même longueur et je n'arrive pas à gérer les intervalles entre chaque mot de façon correcte ( je voudrais les voir s'afficher dans mon MsgBox alignées comme dans une ListBox)
Ex:
Toto Manger Dormir
Titi Va au travail Dormir

Voici mon bout de code pour vous aider à mieux comprendre

Sub Rack()

Dim TheObjectName As String
Dim Plage As Range, Cell As Range
Dim Info As String

TheObjectName = Application.Caller

Set Plage = Sheets("liste complete").Range("A3:A300")

    For Each Cell In Plage
        If Cell = TheObjectName Then
        Info = Info & Cell.Offset(0, 4) & vbTab & Cell.Offset(0, 5) & vbTab & Cell.Offset(0, 1) & vbTab & Cell.Offset(0, 3) & vbCrLf
        End If
    Next

MsgBox "Produits sur ce rack" & vbCrLf & vbCrLf & "Code" & vbTab & "Produit" & vbTab & vbTab & "Niveau" & vbTab & "Encombrement" & vbCrLf & vbCrLf & Info, vbInformation, "Magasin " & TheObjectName
End Sub

Ma question est donc : peut formater du texte dans un MasgBox ?

D'avance MERCI à tous

 

[James007]

Re : Foramatege MsgBox

Bonjour,

Le plus simple est de créér ta propre UserForm qui te servira de MsgBox ...
Dans ta UserForm, tu as toutes les libertés de mise en forme ...

A +

 

[egman]

Re : Foramatege MsgBox

Bonjour James007

merci pour ta réponse, effectivement j'y ai pensé.
En fait il faudrait que je récupère mes données dans des Labels sur le Userform, c'est çà ?
Et comment fait on pour récupérer des données d'un tableau dans des Labels ?

Merci

 

[egman]

Re : Foramatege MsgBox

Bonjour carcharodon-carcharias

merci pour ta réponse.
je vais essayer tout çà.

A+