Configurar el tipo de letra de un MsgBox

4 envíos / 0 nuevos
Último envío
Jose Luis Casla...
Imagen de Jose Luis Casla Araiz
Offline
última acción: Hace 1 año 1 mes
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntos
alta: 11/05/2012 - 15:15
Puntos: 1785
Configurar el tipo de letra de un MsgBox

Es posible configurar el tipo de letra que utiliza un MsgBox, por ejemplo con el Courier New, para conseguir que el contenido que tiene varias lineas, pueda ser debidamente alineado?

La idea es utilizar un tipo de letra en los que cada carácter ocupa la misma anchura, para de esa manera añadir espacios a fin de alinear las columnas...

Tengo el siguiente MsgBox:

 

MsgBox (cPrimero & "     : " & _
 Application.WorksheetFunction.Text(nPrimero, "0.00#,##") & _
 Chr(13) & cSegundo& "     : " & _
 Application.WorksheetFunction.Text(nSegundo, "0.00#,##") & _
 Chr(13) & cTercero & "     : " & _
 Application.WorksheetFunction.Text(nTercero, "0.00#,##") & _
 Chr(13) & cCuarto & "     : " & _
 Application.WorksheetFunction.Text(nCuarto, "0.00#,##") & _
 Chr(13) & cQuinto & "     : " & _
 Application.WorksheetFunction.Text(nQuinto, "0.00#,##") & _
 Chr(13) & cSexto & "     : " & _
 Application.WorksheetFunction.Text(nSexto, "0.00#,##") ), vbOKOnly, "Primeros seis clasificados"

 

Lo utilizo para mostrar una vista rápida de los seis primeros clasificados en un determinado proceso... Pero dependiendo de los nombres de cada participante, cPrimero, cSegundo, etc. resultan totalmente desalineados los resultados numéricos.

He tratado incluso, deiniendo los nombres así:

Dim cPrimero as String * 30

Dim cSegundo as String * 30

etc. para tratar de que tengan todos la misma longitud... pero no funciona con la letra Tahoma que es la que utiliza el MsgBox por defecto...

Una manera de conseguirlo, sería si el tipo de letra fuera "monoespacio", pero no veo la manera de configurar el tipo de letra del MsgBox.

Alguna idea...?

 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 9 horas 52 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
no... Re: Configurar el tipo de letra de un MsgBox

tanto msgbox como inputbox no son configurables para cambiar el tipo de letra, lo toma de la configuración del sistema.

 

Tendrás que crear un formulario, un UserForm, con una etiqueta o cuadro de texto para tus mensajes, ahí si puedes cambiar la fuente, el tamaño, etc.

 

 

------
Ya sé Excel, pero necesito más.

Jose Luis Casla...
Imagen de Jose Luis Casla Araiz
Offline
última acción: Hace 1 año 1 mes
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntos
alta: 11/05/2012 - 15:15
Puntos: 1785
Re: no... Re: Configurar el tipo de letra de un MsgBox

Gracias Paco, por la respuesta, como siempre.

Ya me "esperaba" esa infiormación acerca de la utilización de la letra en los MsgBox.

Y en previsión de ello, eché mano de un formulario...  aunque me gustaba más la solución del MsgBox en el programa en concreto... si no fuera por el tema de la alineación de las columnas en el MsgBox...

Muy agradecido, como siempre, y como se suele decir, "perdiendo también se aprende"... Perdiendo en el intento de quere algo que no es posible...

 

qpidoneuro (no verificado)
Imagen de qpidoneuro
Cambiar color MsgBox

https://www.youtube.com/watch?v=aAU7Z2CAl1w

Esta es la forma de hacerlo Risa