Isso é básico: Formatar as células.
Deveríamos gastar a maior parte do nosso tempo desenvolvendo as funcionalidades das aplicações, mas sempre nos será exigido o cuidado estético. Por isso, talvez deseje automatizar essa pecualiaridade na sua aplicação.
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.Range("G11:R65000").SelectLet Selection.NumberFormat = "##"Range("A1").SelectEnd 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.
Worksheets("Sheet1").Range("A17").NumberFormat = "General"
Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss"
Worksheets("Sheet1").Columns("C").NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"
Nenhum comentário:
Postar um comentário