none
Formula acompanhar atualização / acréscimo de dados da planilha RRS feed

  • Pergunta

  • Prezados,

    tenho uma planilha por exemplo com dados de A2 até E50, na coluna F2 em diante até a F50 tenho uma formula para cálculo de valores.

    A questão quando eu acrescento na minha planilha alguns valores alem da linha 50 eu tenho que arrastar a linha F50 todas as vezes até a linha prenchida.

    Existe algum modo que quando eu acrescentar valores, a formula acompanhe automaticamente até a última linha preenchida usando como base a linha da coluna "A".

    Exe.:

    Atualizei até de A2 até A500. Queria que a formula da coluna F seje puchada até a última linha preenchida da coluna A automaticamente.

    Att,

    Estanislau Frade


    Att, Estanislau Frade msn: lauedele@hotmail.com email: estanislaufrade@yahoo.com.br estanislau.frade@vale.com

    segunda-feira, 4 de fevereiro de 2013 13:34

Respostas

  • Use algo como:

    Sub Exemplo()
        Dim lLast As Long
        Dim ws As Worksheet
        
        Set ws = ActiveSheet
        
        With ws
            lLast = .Cells(.Rows.Count, "A").End(xlUp).Row
            .Range("F2:F" & lLast).Formula = Range("F1").Formula
        End With
    End Sub

    Se preferir que isso execute automaticamente, coloque o código na classe da planilha em que deseja obter o efeito, no evento Worksheet_Change.


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    quarta-feira, 6 de fevereiro de 2013 22:50
    Moderador

Todas as Respostas

  • Se usa o Excel 2007 ou superior, experimente utilizar o recurso de Tabela.

    Experimente clicar no menu Página Inicial >> grupo Estilo >> Formatar como Tabela.

    Povoa alguns dados e experimente algumas fórmulas. As Tabelas tem outras grandes utilidades além de auto expandir fórmulas.


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    • Sugerido como Resposta MLRamos quarta-feira, 6 de fevereiro de 2013 13:15
    terça-feira, 5 de fevereiro de 2013 20:12
    Moderador
  • Para excel 2003 existe algum código em VBA quem possa fazer essa atividade ?


    Att, Estanislau Frade msn: lauedele@hotmail.com email: estanislaufrade@yahoo.com.br estanislau.frade@vale.com

    quarta-feira, 6 de fevereiro de 2013 02:05
  • Use algo como:

    Sub Exemplo()
        Dim lLast As Long
        Dim ws As Worksheet
        
        Set ws = ActiveSheet
        
        With ws
            lLast = .Cells(.Rows.Count, "A").End(xlUp).Row
            .Range("F2:F" & lLast).Formula = Range("F1").Formula
        End With
    End Sub

    Se preferir que isso execute automaticamente, coloque o código na classe da planilha em que deseja obter o efeito, no evento Worksheet_Change.


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    quarta-feira, 6 de fevereiro de 2013 22:50
    Moderador