Saberexcel - o site das macros

Essa macro do Aplicativo Microsoft Excel VBA, imprime negrito três primeiras linhas, observe que a macro afeta todas as folhas de planilhas, instrução For..Each Next

Sub Imprime_negrito_tres_primeiras_linhas()
Dim Wsh As Worksheet

For Each Wsh In Application.Worksheets

With Wsh.PageSetup
.PrintTitleRows = "$1:$3"
End With

Sheets(Wsh.Name).Rows("1:3").Font.Bold = True
Next Wsh
End Sub

Sub limpar_formatos()
[A1:L10].Font.Bold = False
End Sub





Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, 
praticando com os produtos didáticos Saberexcel




     Baixe o exemplo de planilha contendo as macros acima
vba impressao imprime tres primeiras linhas em negrito (16.98 kB 2010-11-21 19:55:05)

Publicidade
Compre com segurança, garantia e ótimos preços