Se seguir a dica do Patropi com certeza ele resolve com formulas, mas pelo que entendi, você não tem as datas lançadas na coluna R, e o que não entendi é se o total bater copiar a data da planilha "SAQUE" pois não vi relação com a data e o total, uma vez que o total na planilha PagSeguro é R$ 3.830,32 e na planilha SAQUE é R$ 3.389,28.
Mas supondo que foi erro de digitação e quer utilizar VBA, poderia tentar ajustar a ótima rotina enviada pelo Reinaldo no tópico abaixo:
Referência Absoluta em VBA [Resolvido]
viewtopic.php?f=10&t=17157&start=10
, que acredito se encaixa em sua questão, agora já estou indo deitar que vou enfrentar dois dias de curso, mas só para ter uma base e testar pelo menos no primeiro bloco de "SAQUES" a rotina ficaria mais ou menos assim :
Private Sub SomaSaques()
'Adaptação da rotina do Reinaldo Forum Planilhando
'http://www.planilhando.com.br/forum/viewtopic.php?f=10&t=17157&start=10
Dim nLSA As Integer, iLSA As Integer
iLSA = Application.Match("S A Q U E*", Sheets("PagSeguro").Range("S1:S70"), 0) + 1
nLSA = Application.Match("S A Q U E*", Sheets("PagSeguro").Range("S3:S70"), 0) + 1
sSoma = Application.Sum(Range(Cells(iLSA, 22), Cells(nLSA, 22)))
End Sub
Pode acrescentar linhas entre as linhas 3 e 8 e verá que sempre será somado corretamente, veja se consegue ajustar utilizando do while ou um for next.
[]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 02/09/2015 6:46 pm