Segue conforme pedido: ps. Apenas removi aquela sua declaração String que não vi muita ultilidade

Boa Tarde, veja se isso te atende...

Segue: Private Sub Workbook_BeforeClose(Cancel As Boolean) confirmacao = MsgBox("Atenção! Você está tentando fechar o sistema?", vbYesNo + ...

Acredito que não.. Também não encontrei algo parecido mas , se achar, atualizo o post

O bom seria ter acesso à sua planilha para realizar alguns testes tbm... Qualquer coisa estamos aí.

Tenta mudar esse final para: Sheets("Vvda").Select Sheets("Vvda").Cells(8, 3) = DataRegistroVven Sheets("Vvda"...

Boa noite. Isso provavelmente está acontecendo por um erro ao referenciar a planilha. mas para resolver isso precisaria ver seu arquivo, ou pelo men...

Complementando as palavras do colega Reinaldo, em códigos extensos e com muitas variáveis é muito difícil apenas olhar e já encontrar o erro. Já quand...

claro. Posta sua planilha ai...

Tente Trabalhar com esse evento do Workbook: Private Sub Workbook_WindowResize(ByVal Wn As Window) Msgbox "Teste" End Sub

Boa noite Carlos, segue conforme pedido. Sub distribui_Clientes() On Error Resume Next Dim FBlank, ul, ulj As Long ul = Plan1.Range("A&quo...

como assim? poderia explicar melhor?

São os retornos do teste lógico: 1 = VERDADEIRO na linguagem lógica do excel 0 = FALSO Clique no joinha se gostou da resposta. Para marcar como res...

insira uma formatação condicional baseado em fórmula. Por exemplo: Você quer colorir a B1 toda vez que o valor de A1 for maior que 5, então: Selec...

Quando você oculta células da maneira que fez, você está limitando seu campo de trabalho dentro da planilha, pois suas área de atuação são as células....