Veja o tuto no link abaixo. https://msdn.microsoft.com/pt-br/library/office/ff839746.aspx

Obrigado por portar a resposta. Abraço! Pois é, Leandro, só o interessado é que não se lembrou de agradecer aos que tentaram ajudar.

Para excluir na planilha os registros correspondentes a todas as linhas selecionadas na TextBox é preciso um Loop pelos itens da TextBox para verifica...

No primeiro arquivo que você disponibilizou a macro funciona somente na planilha "PAGAMENTOS", pois o código está instalado no módulo daquel...

Experimente: Sub cria_NOVA_PLAN_FORNECEDOR() Dim a As String a = InputBox("INFORME NOVO FORNECEDOR") Application.ScreenUpdating =...

Experimente: CDbl(TextBox1.Text)

Experimente: [A1] = Day(DATA) [A2] = Month(DATA) [A3] = Year(DATA)

substitua esta linha ' Set rg = ActiveSheet.[A:G].Select ' errando aqui por esta Set rg = Range("A" & ActiveCe...

Porém gostaria apenas de alguns toques finais. Alguns toques finais ? Tá de brincadeira, né. Será necessário um outro código muito mais trabalhoso do...

Experimente manter a tecla Shift pressionada ao clicar para abrir o arquivo.

Sub ReplicaDados() Dim WSo As Worksheet, WSd As Worksheet, LR As Long Set WSo = Workbooks("Acompanhamento orçamentário atual").Sheets...

Sub IntercalaDados() With Range("K:K").SpecialCells(4) .FormulaR1C1 = "=Plan3!RC" .Value = .Value ...

Experimente: Sub InsereNúmeros() Dim k As Long, e As Long, d As Long For k = 13 To Cells(Rows.Count, 3).End(3).Row If InStr(1, C...

Não consegui reproduzir o erro aqui. Protegendo ou não a planilha e a pasta, os códigos funcionam. Segue o arquivo anexado com a planilha e a pasta p...

sugestão - disponibilize uma amostra do seu arquivo Excel, com o resultado desejado e com as explicações na própria planilha do que você deseja .