Character
07.11.2023 07:03:12
Schwalbe
Ich wollte mir eine Tabelle des verwendeten Fonts ausgeben:
Sub Char()
For zl = 1 To 16
For sp = 1 To 15
Cells(zl, sp) = Chr(zl + sp)
Next sp
Next zl
End Sub
Ich bekomme aber nur Mini-Rechtecke. Was muss ich tun?
Dieter