en el parametro mensajeej: "Este es un ejemplo", le pones 2 comillas dobles a la parte del texto que quieras mostrar con comillas dobles->"Este es un ""ejemplo"" " ->MsgBox "Este es un ""ejemplo"""y mostrara -> Este es un "ejemplo"
Dale a una variable el valor Ascii de las comillas asi:CODE Private Sub Main()On Error Resume NextDim x As Stringx = Chr(34)MsgBox (x &"RadicalEd & [SoloCodigo]" & x)End Sub
pero le falto..CODE Private Sub Main()On Error Resume NextDim x As Stringx = Chr(34)MsgBox (x &"RadicalEd" & " [SoloCodigo]" & x)End Sub para que no muestre el operador de concatenacion...
OK,por cierto ve a ver el mensaje sobre el archivo PELICANO.XLS, si todavia te sirve