Salvar Dados de Formulário Excel VBA para OUTRA Planilha

Procedimento para Salvar registros para outro arquivo através de códigos VBA do Microsoft Excel. Neste exemplo temos a planilha principal que contem o formulário vba e planilha base, que vai receber os dados enviados do formulário vba. Dados são salvos de formulário automaticamente ao clicar no botão salvar, enviando os dados para outra planilha Excel.

Link da Vídeo aula para Fazer o Módulo1:

Lista Completa de Vídeo Aulas:

✅Site SGP: Venda de Coleção de Planilhas Excel VBA Prontas:
==================

[AlbertoChitime]

Bom dia. Gostei do video mas gostaria de saber se existe um código VBA Excel para fazer backup ao fechar um formulário e planilhas da pasta para posterior recuperação em caso de o arquivo danificar-se.

[hebertalmeida]

Professor tem como fazer um filtro mais não quero com listbox gostaria de saber se existe fazer no formulário só com as caixas de texto e um botão tipo gera relatório e salva em outra guia pesquisa da plan 1 e salva na plan 2....???? Grato Deus continue te abençoando

[hernanysantos]

Ola boa noite gostaria de saber como faco para localizar a informação alterar e e salvar na mesma linha no seu video ensina inserir na linha abaixo...

[JeffersonLima-wqlu]

Set Guia = Planilha.Worksheets(NomeGuia)

Esta dando erro de Tempo de execução "13"

Tipos incompativeis, me ajuda kk

[angelicaestevam]

Ola. Teria como compartilhar o arquivo dados para que outras pessoas pudessem alimentar(adicionar, editar e excluir)?
Usaria varios arquivos com os userforms mas todos salvando dados no arquivo banco de dados. Onde todos pudessem ter acesso.
É possível? Colocar ele em rede ou em nuvem.
Esrou com um projeto que nao consegui resolver isto ainda.
Obrigada!

[jonatasvelozo]

Funciona se a planilha de destino tmb estiver aberta?

[raquelcoelho]

Olá, boa noite
É possível enviar para outra aba ao invés de enviar para outra planilha?

[viniciusferreira]

Option Explicit
Public Planilha As Workbook
Public guia As Worksheet
Const NomeGuia As String = BasedeDados

Private Sub CommandButton1_Click()
Módulo1.iniciar

Dim data As Date
data = TextBox1.Value




Boa noite, sua aula foi ótima me ajudou em grande parte, porém no final de tudo quando fui executar o macro deu erro no (variavel não definida) na linha: "Const NomeGuia As String = BasedeDados"
se puder ajudar, agradeço!

[hernanysantos]

If Guia.Cells(linha, 1).Value = textbox4.text

teria como fazer a busca personalizada

exemplo:

Private Sub PesquisaPersonalizada(ByVal Pesquisado As String)

Dim Pesquisa As Range
Dim Primeira As String
Dim Resultado As String

Set Pesquisa = Plan1.Cells.Find(What:=Pesquisado, After:=Range("A3"), LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)