CHAMANDO E TROCANDO A FONTE.
Caros colgas de labuta.
Preciso chamar aquela janelinha de fontes...
Não sei se aquilo é uma cpl ou o q...
Pois é...
Preciso chamalá e trocar a fonte de uma label para a fonte selecionada na tal janelinha.
Se alguém puder me ajudar....
Desde já agradeço.
Obrigado!
Adriano D. Mà ¼ller.
Preciso chamar aquela janelinha de fontes...
Não sei se aquilo é uma cpl ou o q...
Pois é...
Preciso chamalá e trocar a fonte de uma label para a fonte selecionada na tal janelinha.
Se alguém puder me ajudar....
Desde já agradeço.
Obrigado!
Adriano D. Mà ¼ller.
OU ENTÃO
Dim C As Variant
Licenses.Add "MSCOMDLG.COMMONDIALOG.1"
Set C = CreateObject("MSCOMDLG.COMMONDIALOG.1")
C.Flags = 3
C.ShowFont
MsgBox C.FontName
Dim C As Variant
Licenses.Add "MSCOMDLG.COMMONDIALOG.1"
Set C = CreateObject("MSCOMDLG.COMMONDIALOG.1")
C.Flags = 3
C.ShowFont
MsgBox C.FontName
Tópico encerrado , respostas não são mais permitidas