Notifications
Clear all

Exlcuir linha e evitar erro

5 Posts
1 Usuários
0 Reactions
1,407 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia a todos,

Estou com um problema e preciso de ajuda.

Tenho uma planilha de equalizar cotações.Onde tenho itens em uma coluna e preços em outra. Criei uma macro que excluí linha repetidas com o mesmo item... ai beleza funciona mas, eis o problema:

Essas linhas que são excluídas, em caso de duplicidade do item, são utilizadas para o cálculo do valor total dos preços e quando a macro exclui a linha dá erro na fórmula (#REF). Não sei como ajustar essa macro ou a formula para evitar esse erro... a formula que coloquei no valor total, multiplica o valor unitário (que tenho em uma coluna) pela quantidade q tenho em outra, quando excluo a linha a formula perde a referencia. Essa fórmula está ruim pq também não consigo arrastá-la, tenho de adicionar linha manualmente.

Alguém pode me ajudar?? Eu fui clara na descrição do problema?

Muito obrigada e aguardo!

Ana Laura

 
Postado : 18/11/2010 7:23 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ana se possivel posta a sua planilha pra gente pra ficar mais facil a visualização,

Não sei se é o caso, mais talvez vc possa fazer uma macro que faça as formulas depois que as linha forem excluidas. talvez funcione.

 
Postado : 18/11/2010 9:19 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde Caio, obrigada pela pronta resposta.

Sim, calcular antes depois de excluir as linhas é o ideal, mas nao sei como fazer..

Quanto a postar a planilha, posso te mandar no seu e-mail? Como estou no meu trabalho, algumas coisas são travadas no meu acesso.

Aguardo e obrigada!

 
Postado : 18/11/2010 10:13 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ana Laura,
Sempre que vc tiver dúvida, grave uma macro.
Neste caso eu te aconselho copiar a formula para a memória do windows, inicar uma gravação, abre a célular com o F2 e cola e dê enter.

Deve ficar algo parecido com o abaixo

ActiveCell.FormulaR1C1 = _
"=IF(AND(RC[1]<>"""",R[-1]C=""""),RC[1],IF(AND(R[-1]C<>"""",RC[1]=""""),R[-1]C,RC[1]))"

Então vc adapta para o que vc precisa.

 
Postado : 18/11/2010 2:27 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ana Laura,
Sempre que vc tiver dúvida, grave uma macro.
Neste caso eu te aconselho copiar a formula para a memória do windows, inicar uma gravação, abre a célular com o F2 e cola e dê enter.

Deve ficar algo parecido com o abaixo

ActiveCell.FormulaR1C1 = _
"=IF(AND(RC[1]<>"""",R[-1]C=""""),RC[1],IF(AND(R[-1]C<>"""",RC[1]=""""),R[-1]C,RC[1]))"

Então vc adapta para o que vc precisa.

Bom dia Webert,

Sim, eu já me utilizo de gravar macros pra ver o código, mas nesse caso eu nao tenho nem a lógica, não consigo pensar em uma fórmula que evite esse erro e que se inserir linha a mesma seja somada (e multiplicada) ao total.

Esssa formula do "SE" que voce me passou não serve. Trabalhei com SE + ÉERRO e até funciona mas não adiciona as novas linhas e vai ficando com sujeira (erro #REF) na fórmula.

Obrigada pela atenção e resposta.

Att,
Ana Laura

 
Postado : 19/11/2010 5:12 am