Home Excel - Dicas Microsoft Excel VBA Excel VBA - Celulas Excel planilha vba celulas recuo iniciais

Excel planilha vba celulas recuo iniciais

E-mail Imprimir PDF

Saberexcel - o site de quem precisa aprender macros ms excel vba

Esse macro do Aplicativo Microsoft Excel VBA, insere um espaço inicial em determinada célula, neste caso escolhemos a célula(E18). O macro vai inserir 14 espaços vazios a frente do valor na célula.
O Caderno(1)/31 do nosso curso Completo Microsoft Excel VBA, abordamos o assunto sobre o Gravador de Macros e a importancia de dominar esse assunto para prosseguir com curso de programação, é um assunto muito importante para quem esta iniciando com macros ms excel vba,
muito simples gravar um macros, mas existem técnicas para depuração de códigos, melhorar a performance.
Abaixo temo um macro, onde retiramos uma linha de código de um macro gravado, observe que (12) doze linhas códigos, usaremos apenas uma e fará o que determinamos.

Retorna ou define um valor Variant que representa o nível de recuo para a célula ou o intervalo. Pode ser um inteiro de 0 a 15.
Sintaxe
expressão.IndentLevel
expressão   Uma variável que representa um objeto Range.
Comentários
O uso desta propriedade para definir o nível de recuo para um número menor do que 0 (zero) ou maior do que 15 causará um erro.
Exemplo
Este exemplo aumenta o nível de recuo para 15 na célula A10.

Visual Basic for Applications
With Range("A10")
    .IndentLevel = 15
End With

'- - - - - - - - - - - - - - - - -
Sub recuo_inical_celula()
 
   Range("E18").IndentLevel = 14
End Sub
'- - - - - - - - - - - - - - - - -
Agora observe um macro gravado, o macro grava todo o contexto do membro, para voce servir do código desejado, neste caso usaremos somente uma linha(veja acima)
Sub Macro2()
'
' Macro2 Macro
'

'
    Range("E18").Select
    With Selection
        .HorizontalAlignment = xlLeft
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 15 
'- neste caso usaremos somente esse código
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
End Sub



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.



Última atualização em Qui, 24 de Novembro de 2011 17:49  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Expedito ,gostaria de parabenizar ,pelo bom atendimento e pela atenção que você teve comigo. As suas planilhas são mesmos fantásticas. Obrigado,e que Deus te abençoes....

Cirano Bispo
22 December 2012
Estou muito satisfeito com minha aquisição, posso confirmar que é um excelente produto, como também seu DVD de exemplo que muito bom, tem de tudo, parabéns! São Paulo/SP - 20/10/2010 - 15:57:01...

Bruno G. K. Alencar - Contabilista São Paulo.
20 October 2010

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

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


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA