marianapd , Bom dia! Impossível! Você todos os arquivos da coluna "J" estão sendo anexados a um só corpo de e-mail e apenas a um endereço ...

lrweschen, Bom dia! Veja se é assim. Controle Roupas.zip

Neto, Sua necessidade, para desenvolvimento, exige um considerável esforço de trabalho de média complexidade. Fora isso, tem ainda o fato de você já ...

LEANDRO P, Boa Tarde! Faça assim: Private Sub Workbook_BeforeSave(ByVal SaveAsUi As Boolean, Cancel As Boolean) If Application.CountA(She...

Dai86, Boa tarde! Veja se é assim. teste.zip

Não entendi...

SidneyM, Veja: se a quantidade de colunas entre o número procurado (da Plan1) e o número a procurar (na Plan2) forem diferentes, somente acrescentar ...

SidneyM, Bom dia! Veja se é assim. Procurando Range dentro de outro.zip

cajcorrea, Bom dia! Desculpe... mas não consegui entender o que você quer... mesmo baixando e examinado seu arquivo.

msc, Para interromper a execução da macro, você pode, simplesmente, pressionar CTRL + BREAK. Da forma que você está tentando não é possível. Para ma...

msc, Bom dia! Por gentileza, leia as regras do fórum. Para melhor respostas a sua demanda, estou transferindo seu tópico para o sub fórum apropria...

EULESSI, Bom dia! Não sei se entendi corretamente. Quando tiver uma necessidade específica como esta, anexe um arquivo exemplo compactado aqui mesmo...

Cesar, Bom dia! Você deve alterar nas linjhas do código onde se refere ao número 20: Sub mais() 'Nesta Linha If [N1] + 20 < Applicati...

Não sei se entendi bem... Todavia, até onde entendi, troque a linha: .Body = Sheets(nome).Range("A27").Value Por: ....

Desculpe... mas assim não dá pra ajudar! Esse arquivo também é um arquivo xlsx, SEM MACROS e sem nenhuma relação com o primiero arquivo que você envio...