Puede ver de un vistazo qué fuentes están disponibles en Excel
Puede seleccionar fácilmente la fuente de una celda. Pero la lista de fuentes instaladas es larga. Si está buscando la fuente adecuada para una pantalla o si desea experimentar un poco con las fuentes, una macro le ayudará.
Utilice la siguiente macro si desea enumerar todas las fuentes disponibles en la columna A de un nuevo libro de trabajo:
Subfuentes Enter ()
Dim lista de fuentes como CommandBarControl, contador como entero
Application.ScreenUpdating = Falso
Cuadernos de trabajo Agregar
Establecer lista de fuentes = Application.CommandBars.FindControl (ID: = 1728)
Para contador = 1 A la lista de fuentes.
Con celdas (contador, 1)
.Value = Lista de fuentes Lista (contador)
.Font.Name = Lista de fuentes.Lista (contador)
Terminar con
Siguiente contador
Columnas (1) .AutoFit
Application.ScreenUpdating = True
End Sub
Excel ingresa el nombre de cada fuente en las celdas e inmediatamente formatea la celda en la fuente apropiada. La siguiente ilustración muestra cómo puede verse esto: