Bom dia!! Seria isso? Private Sub Worksheet_Change(ByVal Target As Range) Dim AleVBA As Range Set AleVBA = Range("N1") If Not Intersect(T...

Bom dia!! Tente: Application.CommandBars("Worksheet Menu Bar").Controls("File").Enabled = False Ou.... Sub AleVBA_2...

Bom dia!! Eu não tive problema, se é que eu entendi sua dúvida. ID MÊS DIA HISTORICO CODIGO PARCELA VALOR TIPO STATUS 1 01/2017 14/12 RECEITA E DE...

Veja se atende

Bom dia!! Qual domínio você usa(outlook, notes etc)? neste link é demonstrado por do maiores MVP, como enviar email baseado em um valor, caso um valo...

A Macro abaixo funciona perfeitamente, mas sempre que preciso acrescentar uma coluna, tenho que reajustar a Macro TODA (matrizes e células de referênc...

Boa noite!! Primeiramente eu lhe aconselho mover (exportar e importar), seus Userforms para um novo arquivo e rodar novamente as macros e ver o que ...

Boa noite!! Se o arquivo com a macro que vai enviar mensagem ao seu email não estiver aberto, somente com o excel isso não será possível. Att

Conversei com o Wessley ele está usando DAO ... Esse era o problema... No DAO o getrows precisa de parâmetro, número de linhas, e o resultado precisa...

Boa tarde Wessley, faz assim, substitua tudo isso: While Not consulta.EOF With Cadastro.ListBox_Cadastro .AddItem &...

Boa tarde leandromok Copie e cole a formula abaixo na célula Z6 e arraste para as demais células da coluna e copie e cole para as demais colunas. =S...

Bom dia magueta Como você é novato no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo: viewtopic.php...

Se Dados é uma planilha excel não uma tabela access, experimente "select count(NS) as quant from $Dados"

Dependendo da configuração do excel, o calculo não e feito; por isso o uso da função valor.

Veja se atende