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 -- com SaberExcel
|