Notifications
Clear all

Editar fonte no vba

2 Posts
2 Usuários
0 Reactions
963 Visualizações
(@jayder)
Posts: 0
New Member
Topic starter
 

Bom dia, estou há algumas HORAS para fazer algo que julgo simples, pelo menos ao meu ver, pois bem:
Tenho um rodapé "variável" feito no vba, já está todo certinho, preciso apenas que ele fique no tamanho e na fonte que quero.
abaixo segue toda linha de código da macro.

Sub SomaRodape()
With Plan2.PageSetup
.CenterFooter = "Total: " & Format(Application.WorksheetFunction.Sum(Plan1.Columns(10)), "currency") _
& vbCrLf + "Quantidade de Cartões: " & Format(Application.WorksheetFunction.Count(Plan1.Columns(10)))
End With
End Sub

:arrow: PRECISO QUE ISSO FIQUE EM FONTE "ARIAL" E TAMANHO "06"... :oops:

 
Postado : 28/07/2015 9:18 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Veja se é isto:

Sub SomaRodape()

    With Plan2.PageSetup
        .CenterFooter = "Total:&B&""Arial Size 6&B& " & Format(Application.WorksheetFunction.Sum(Plan1.Columns(10)), "currency") _
        & vbCrLf + "Quantidade de Cartões:&B&""Arial Size 6&B& " & Format(Application.WorksheetFunction.Count(Plan1.Columns(10)))
    End With
    
End Sub

Outros parametros você pode dar uma olhada nos links abaixo:
Headers And Footers
http://www.cpearson.com/excel/headfoot.htm
e
Formatting and VBA Codes for Headers and Footers
https://msdn.microsoft.com/en-us/librar ... 12%29.aspx
[]s

 
Postado : 28/07/2015 10:34 am