Notifications
Clear all

Selection.ClearContents

10 Posts
4 Usuários
0 Reactions
2,093 Visualizações
(@bicudo69)
Posts: 6
Active Member
Topic starter
 

Boa noite, preciso de uma ajuda como fazer para que o Selection.ClearContents não apague formulas de somas em determinadas células em uma planilha de cadastro, mas apague o seu conteúdo para uma nova digitação.
Por exemplo: células R14, R16 e R18 apresentem as somas das células F14+N14, F16+N16 e F18+N18 e na célula R12 apresente a soma total R12 = R14+R16+R18 e estes valores se apaguem a clicar no botão cadastrar mas que ainda conserve as formulas de somas.

 
Postado : 21/08/2017 9:37 pm
gfranco
(@wzxnet7)
Posts: 653
Honorable Member
 

Bom dia.
Pela descrição da sua duvida, me parece que um loop for each daria conta do recado.
Sugiro postar um modelo de sua planilha (pode ser com dados fictícios MAS MESMA ESTRUTURA) para facilitar ajudar.

Resposta útil? Clique na mãozinha ao lado do botão Citar.

 
Postado : 22/08/2017 3:18 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

bicudo69,

Bom dia!

Basta você apagar somente os valores e não as fórmulas. Veja no pequeno exemplo que fiz. Nos locais destacados em amarelo é onde você pode digitar os números. Ao pressionar em apagar, o código apaga somente os valores e não as fórmulas.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 22/08/2017 5:45 am
(@bicudo69)
Posts: 6
Active Member
Topic starter
 

wagner

É isso mesmo que eu preciso vou postar a planilha.

wzxnet7

Vou postar a planilha aqui.

 
Postado : 23/08/2017 6:48 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

bicudo69,

Bom dia!

Aonde é que está sendo apagado fórmula que não é para apagar? Qual a aba, quais as células?

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 24/08/2017 6:38 am
(@bicudo69)
Posts: 6
Active Member
Topic starter
 

Nas células R14, R16 e R18 apresentem as somas das células F14+N14, F16+N16 e F18+N18 e na célula R12 apresente a soma total R12 = R14+R16+R18

 
Postado : 27/08/2017 7:54 am
(@bicudo69)
Posts: 6
Active Member
Topic starter
 

wagner

BOM DIA!
Nas células R14, R16 e R18 apresentem as somas das células F14+N14, F16+N16 e F18+N18 e na célula R12 apresente a soma total R12 = R14+R16+R18

 
Postado : 27/08/2017 8:08 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde bicudo69

Percebi que você desconhece as regras e demais instruções do fórum, pois em vez de utilizar a janela de resposta que fica logo abaixo da janela onde te responderam, você fica usando citação em todas as tuas respostas, sem necessidade, poluindo o fórum.

Outro detalhe, sempre crie um novo tópico para as tuas dúvidas, pois não e permitido postar em tópicos dos outros.
Se quiser fazer referência a outro tópico é só colar o endereço do tópico.
Apaguei a mensagem que você postou naquele outro tópico de terceiros.

Como você é novato, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo:
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s
Patropi - Moderador

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/08/2017 1:05 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

bicudo69,

Boa tarde!

Perguntei aonde deveria ser apagado porque não achei fórmula nenhuma em célula nenhuma desse arquivo que você enviou... Agora entendi e inseri as fórmulas nas células que você se referiu.

Também consertei seu código de modo a não apagar mais as fórmulas dessas células citadas.

Veja se é assim.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 27/08/2017 1:18 pm
(@bicudo69)
Posts: 6
Active Member
Topic starter
 

Brigado Wagner Morel, foi muito útil a sua ajuda.

 
Postado : 28/08/2017 9:05 am