Ir para conteúdo

BABOO e KTS 2018 no YouTube Loja online do BABOO

spielmann

Participante
  • Postagens

    2.459
  • Desde

  • Última visita

Sobre spielmann

  • Data de Nascimento 05/09/1965

Últimos Visitantes

5.718 visualizações
  1. Caro Amigo Spielmann, em 2006 respondeu a um colega resolvendo a sua dificuldade. 

    ALT F11- em Plan1 copie e cole as linhas abaixo.

     

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = Range("a1").Address Then

     

    Sheets("Plan1").Cells(1, "B") = Sheets("Plan1").Cells(1, "A") + Sheets("Plan1").Cells(1, "B")
    End If
    End Sub

    Pergunto: É possível fazer essa soma em uma coluna inteira?

×