![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjtMLde86l-YyZFzAw-fKaKpI6YQfjRYtd7f6QIOjuYKeLKiqXfbS3Ll8VW0SmisoIeFQhaqWn8v4g7rAKoN1u8t_JVbdnFNjvs0p2DZOaWgaTMjTi-CcBjK6Qb3JYEC26oIm6bLhq0phBx/s640/header_VBA_Andre_Luiz_Bernardes_006-721832.jpg)
Existem diversos modos de formatarmos as células. Como sempre lhes disponibilizarei o mais simples para uso imediato.
Public Sub ApplyStyle()' André Bernardes 15/01/2009 09:23 bernardess@gmail.com ' Aplica a formatação especialmente criada.
Let Range("G11:R65000").Select Let Selection.NumberFormat = "##" Range("A1").Select
End Sub
Outro exemplo:Estes exemplos definem o formato de número para a célula A17, a linha um e a coluna C (respectivamente) de Sheet1.Let Worksheets("Sheet1").Range("A17").NumberFormat = "General"Let Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss"Let Worksheets("Sheet1").Columns("C").NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"
Deixe os seus comentários! Envie este artigo, divulgue este link na sua rede social...
Tags: VBA, Excel, cell, format, célula, formatar,
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEigFPdv93tsOaC7vWUYOsPNsGBYMFa8ILCiLJz1XLLarMQ7MZcxN9wzUl8eIGAsH4vWocjPkZCeNHnZfY07d-XAFD-F6QYLPUbwiXkl2ZTA9Sa8JUX7uDxxkgg7nHCrQ3FMyZmHlksLO_2R/s1600/Footer_Andre_Luiz_Bernardes_001_QR_Code.jpg)
Nenhum comentário:
Postar um comentário