Este fórum está sendo desativado

[Adrian]

Boa tarde pessoal

Este aviso persiste em aparecer quando migro de uma planilha pra outra ele não é prejudicial, mas acaba atrapalhando um pouco. Tudo aconteceu depois dessa macro:

Sub ALTORG()
'verificando se a celula B5 esta vazia...
If Cells(5, 2).Value = "" Then

Plan4.Visible = xlSheetVeryHidden 'caso esteja vazia a planilha 4 será oculta
'se tivesse mais planilhas a serem ocultas era só colocá-las dessa linha pra baixo, mudando apenas o nome da planilha por exemplo:
'Plan3.Visible = xlSheetVeryHidden
'Plan4.Visible = xlSheetVeryHidden
'e assim por diante entendeu
MsgBox "O CPF é obrigatório" 'msg para o usuario preencher B5
Else
Plan4.Visible = xlSheetVisible 'não esteja vazia a planilha fica visivel
'a mesma lógica da parte de cima, na hora de deixar novamente visivel, teria que fazer o mesmo processo caso tivesse mais planilhas
'Plan3.Visible = xlSheetVisible
'Plan4.Visible = xlSheetVisible
'e assim por diante

End If
Sheets("Plan2").Select
Range("A6").Select

End Sub

Criei um botão e o editei como CADASTRAR e atribuir a ele macro acima. Mas quando clico nele o cadastro é efetuado só que me aparece aquele círculo vermelho com X branco dentro e a opção Ok e Ajuda. Fui enviar a imagem anexo só que quando cliquei em enviar me disse isso: Desculpe, o limite de quota de anexos foi alcançado.





Grato

Adriano

[alexandrevba]

Bom dia!!

Qual mensagem?

Os arquivos devem ser compactado!!!

Att

[Adrian]

Alexandre, eu compactei a imagem em Rar. Mas quando vou enviar o anexo me aparece isso: Desculpe, o limite de quota de anexos foi alcançado.

[Adrian]

Posso te passar a imagem pra seu e-mail

[alexandrevba]

Boa tarde!!

Você não consegue reduzir a imagem antes de compactar?
Baixe esse programa
https://www.google.com.br/webhp?sourcei ... 20download

Att

[Adrian]

Alexandre, não conseguir se você puder passar seu e-mail e dar pra enviar.

[alexandrevba]

Boa tarde!!

Caso esteja tentando enviar o arquivo de excel, vá em salvar como, escolha o formato binário, depois compacte e nos mande.


Att

[Adrian]

Não sei o que está acontecendo. Alexandre é dentro do site que acontece isso.

a mensagem é essa ai:

Desculpe, o limite de quota de anexos foi alcançado.

[Adrian]

Fiz o que você mandou

[alexandrevba]

Bom dia!!

Eu não vejo nada, poste a mensagem, escreva ela e nos mostre.

Se é no site, porque que o seu código influenciaria?

Att

[Adrian]

Boa tarde pessoal do Guru!

Queria fazer um pós venda em minha planilha. Na coluna "AJ" da minha Plan 2 estão discriminado as datas de nascimento dos meus clientes. Será gente que existe uma macro que exibe aqueles clientes que completam em suas respectivas datas de vencimento?. Quero que esse evento ocorra sempre quando abrir minha pasta de trabalho (Planilha).

Grato,

Adriano