Valor de una celda en un text box excel 2007

Lo que quieres es que te aparezca en un textbox así:

Sub MacroUsuario()
    '
    'tu código
    '
    ActiveSheet.TextBox1 = [B3]
End Sub

O quieres un mensaje en una ventana así:

Sub MacroUsuario()
    '
    'tu código
    '
    MsgBox "Dato de la celda: " & [B3], vbInformation, "Ventana de Mensaje"
End Sub

Al final de tu código escribe algo parecido a lo siguiente

MsgBox "Acá va el texto, " & Sheets("Hoja1").Range("A1"), vbOkOnly, "Información"

Ajusta el nombre de la hoja y la celda a tu necesidad