Este fórum está sendo desativado

[Feberlim]

Boa tarde a todos.

Pode parecer ser algo simples mas estou um pouco perdido.

Gostaria de, por exemplo, mesclar uma coluna e ela me dar, como resultado final, uma somatória. Ex.: célula A1 tem valor 4, A2 tem 3, A3 tem 5, A4 tem 7. Aí mesclo todas, fica uma só e o valor total fica 19.

Não estou conseguindo fazer isso aqui. Se alguém souber um vídeo de como fazer isso ou um outro tópico, fico agradecido.

Minha primeira vez na comunidade.

Abs.

[osvaldomp]

Olá, @Feberlim .

Se você quiser experimentar uma solução via macro, seguem duas opções.

A primeira mescla A1:A4, seguindo o seu exemplo .

A segunda mescla as células selecionadas manualmente, ou seja, selecione manualmente células adjacentes (aceita múltiplas linhas e ou múltiplas colunas) e rode a macro.

Código: Selecionar todos

Sub SomaEMesclaA1A4()
 Dim s As Double
  Application.DisplayAlerts = False
  With Range("A1:A4")
   s = Application.Sum(.Value)
   .Merge
   .VerticalAlignment = xlCenter
   .HorizontalAlignment = xlCenter
   .Value = s
  End With
End Sub

#

Código: Selecionar todos

Sub SomaEMesclaSeleção()
 Dim s As Double
  Application.DisplayAlerts = False
  With Selection
   s = Application.Sum(.Value)
   .Merge
   .VerticalAlignment = xlCenter
   .HorizontalAlignment = xlCenter
   .Value = s
  End With
End Sub