Objeto Styles (Excel)
Uma coleção de todos os objetos Style na pasta de trabalho especificada ou ativa.
Cada objeto Style representa uma descrição de estilo para um intervalo. O objeto Style contém todos os atributos de estilo (fonte, formato de número, alinhamento, etc.) como propriedades. Há vários estilos internos, incluindo Normal, Conversor de Moedas e Percent.
Use a propriedade Styles para retornar a coleção Styles . O exemplo a seguir cria uma lista de nomes de estilo na planilha um da pasta de trabalho ativa.
For i = 1 To ActiveWorkbook.Styles.Count
Worksheets(1).Cells(i, 1) = ActiveWorkbook.Styles(i).Name
Next
Use o método Add para criar um novo estilo e adicioná-lo à coleção. O exemplo a seguir cria um novo estilo com base no estilo Normal, modifica a borda e a fonte e aplica o novo estilo às células A25:A30.
With ActiveWorkbook.Styles.Add(Name:="Bookman Top Border")
.Borders(xlTop).LineStyle = xlDouble
.Font.Bold = True
.Font.Name = "Bookman"
End With
Worksheets(1).Range("A25:A30").Style = "Bookman Top Border"
Use Styles (index), em que index é o número ou o nome do índice de estilo, para retornar um único objeto Style da coleção Estilos da pasta de trabalho. O exemplo a seguir altera o estilo Normal da pasta de trabalho ativa definindo sua propriedade Bold.
ActiveWorkbook.Styles("Normal").Font.Bold = True
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.