Este fórum está sendo desativado

Bom dia, Sandrinha.
O seu print é uma gracinha, porém não serve.
Releia a minha sugestão, lá está "arquivo Excel", então print da planilha é inútil.

sugestão - disponibilize uma amostra do seu arquivo Excel com alguns dados e explique na própria planilha o que você quer. Informe qual o campo que será preenchido na máscara para servir de base na busca para completar os demais campos. Inclua no arquivo os códigos e a máscara.

No segundo arquivo que você disponibilizou a macro funciona somente na planilha "PAGAMENTOS", pois o código está instalado no módulo daquela planilha. Se você quiser que funcione também na outra planilha é preciso instalar o código no módulo da outra também.

Você abriu 2 tópicos com um só assunto, não retornou para responder no outro tópico, agora deu up neste.
Me parece meio atrapalhado

viewtopic.php?f=12&t=5026

Experimente: Destinatário= Sheets("E-mail").Range("M9").Value Corpo do e-mail= Sheets("E-mail").Range("A1").Value Se não conseguir, sugiro que você disponibilize uma amostra do seu arquivo com o código instalado e informe na própria planilha o resultado deseja...

... minha duvida é o seguinte é possível selecionar mais de 2 linha no listbox para excluir os dados? Para excluir na planilha os registros correspondentes a todas as linhas selecionadas na TextBox é preciso um Loop pelos itens da TextBox para verificar quais estão selecionados. O exemplo abaixo ir...

Sub LimpaOrdenaCélulas() Application.ScreenUpdating = False ActiveSheet.AutoFilterMode = False Range("B5:K5").AutoFilter 8, "OK" Range("B6:K" & Cells(Rows.Count, 9).End(3).Row).Value = "" ActiveSheet.AutoFilterMode = False If Application.CountA([B6:B48]) ...

selecione o intervalo / menu Dados / Texto para colunas / Concluir

Este código seleciona a planilha ativa e mais a primeira planilha à direita dela Sub SelecionaPlanilhasV1() Sheets(Array(ActiveSheet.Name, ActiveSheet.Next.Name)).Select End Sub Este abaixo seleciona a planilha ativa e mais as duas primeiras à direita dela. Para selecionar mais ou menos planilhas al...

Experimente esta fórmula matricial em 'E2'.

=SE(C2="";SOMA(D2:ÍNDICE(D2:$D$100;CORRESP(VERDADEIRO;(C3:$C$100="");0)));"")

Experimente o código abaixo. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("B4:B" & Cells(Rows.Count, 2).End(3).Row)) Is Nothing Then MsgBox "você aplicou duplo clique em uma célula da coluna 'B' da tabela" 's...

Resumindo: Queria adicionar minhas macros como atalhos padrão no Excel, para qualquer planilha que for utilizada, se isso for possível vai facilitar muita coisa automática. Talvez o arquivo PERSONAL seja útil para o seu objetivo. Veja o tuto no link abaixo. https://support.office.com/pt-br/article/...

Cole em 'B4' e arraste para baixo:

=DESLOC(D$4;INT((LIN()-4)/4);MOD(LIN(A4);4))

Experimente sem as aspas:

=SE(B2=5;VERDADEIRO;FALSO)

Instalei um código em VBA em um módulo comum e vinculei o seu disparo ao botão colocado na planilha. Se você quiser instalar essa funcionalidade em outro arquivo Excel: 1. abra o arquivo e aperte Alt+F11 para acessar o editor de VBA 2. no editor, caso o código não esteja visível, dê duplo clique em ...

Se for viável utilizar uma solução via macro, veja o arquivo anexado.

F5 / Especial ... / Objetos / OK A seleção do objeto será indicada por um pequeno círculo no centro do intervalo 'G52:H53'. Paire com o cursor sobre o círculo até o cursor assumir a forma de seta dupla (<-->), clique com o esquerdo e arraste. Após deletar o objeto repita F5 / Especial ... / Objetos ...

valor da venda = (preço + lucro) / 0,9
seu exemplo ~~~> (100 + 20) / 0,9 = 133,33 ~~~> valor da venda = 133,33

valor da comissão = (preço + lucro) / 9
seu exemplo ~~~> (100 + 20) / 9 = 13,33 ~~~> valor da comissão = 13,33

Por exemplo em 'B1', a célula exibe MAR, mas o conteúdo dela é espaçoMARespaço.

Ou você remove os espaços ou digita MAR novamente mas sem espaços ~~~> selecione aquela célula / digite somente MAR, sem espaços, e aperte a tecla Enter.