Notifications
Clear all

Add in calculando errado com dragging

2 Posts
2 Usuários
0 Reactions
563 Visualizações
(@lucasvital)
Posts: 0
New Member
Topic starter
 

Boa noite a todos!
Meu add in executa uma função VBA que utiliza o valor acumulado da célula da linha anterior (se eu fizer célula por célula funciona perfeitamente), porém quando eu faço o dragging, ou seja, selecionar a primeira célula com a fórmula já inserida, e arrastar até a última linha, ele calcula errado, utilizando como referência o número da linha e da coluna da primeira célula.. Ele me retorna ActiveCell.Row e ActiveCell.Column da primeira que eu selecionei. O certo seria a cada linha do dragging a função VBA capturasse o número da linha e da coluna da respectiva célula.

Não sei se ficou muito confuso ou deu pra entender, no anexo tem uma foto de parte do código... Alguém pode me ajudar a contornar este problema?

 
Postado : 17/02/2016 12:19 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Apenas pelo exposta não é possível identificar a real necessidade/demanda.
Utilizar uma seleção de range seria algo +/- assim:

Sub tt()
Dim rng As Excel.Range

Set rng = Selection
MsgBox rng.Address
For Each cel In rng
    MsgBox cel.Row & " / " & cel.Column
Next
End Sub
 
Postado : 17/02/2016 9:15 am