Alimentando tabela referenciada com formulario VBA

Text Box, Form's, rotinas, etc.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

Alimentando tabela referenciada com formulario VBA

Mensagempor spiders » Sex Out 11, 2019 1:44 pm

Boa tarde prezados

Eu fiz um formulário para alimentar uma tabela que será a base de dados. Eu vi na internet a fórmula para a macro sempre selecionar a ultima linha para inserir as proximas informações, seria esse o código:
Código: Selecionar todos
linha = Sheets(“BASE”).Cells(Rows.Count, “E”).End(xlUp).Offset(1, 0).Row
Sheet3.Cells(linha, 5).Value = Me.txtData.Value
Sheet3.Cells(linha, 6).Value = Me.txtHorario.Value
Sheet3.Cells(linha, 7).Value = Me.txtNome.Value
Sheet3.Cells(linha, 8).Value = Me.txtRamal.Value
Sheet3.Cells(linha, 9).Value = Me.txtAssunto.Value

Mas o formulário não preenche a tabela que já existe na planilha. Ele pega a primeira célula que não possui informações e seleciona ela. Eu gostaria que ele selecionasse dentro da tabela, mas essa linha esta selecionando a primeira célula depois da tabela criada.
O cadastro está ficando abaixo da planilha como mostra o print:
Imagem
Qual seria o código para usar a minha tabela de nome AgendadordeEventos como a base de dados do formulário?
spiders
Membro
Membro
 
Mensagens: 2
Registrado em: Sex Out 11, 2019 1:38 pm
Has thanked: 0 time
Have thanks: 0 time

{ SO_SELECT }

Re: Alimentando tabela referenciada com formulario VBA

Mensagempor srobles » Sex Out 11, 2019 2:53 pm

spiders,

Altere a seguinte linha
Código: Selecionar todos
linha = Sheets(“BASE”).Cells(Rows.Count, “E”).End(xlUp).Offset(1, 0).Row

Para :
Código: Selecionar todos
linha = ThisWorkBook.Sheets(“AgendadordeEventos”).Cells(Rows.Count, “E”).End(xlUp).Row + 1
Espero ter ajudado.

Abs.

Saulo Robles

Remember when you were young?
You shone like the sun.
Shine On You Crazy Diamond
srobles
Membro
Membro
 
Mensagens: 353
Registrado em: Sáb Mai 09, 2015 10:35 pm
Has thanked: 118 times
Have thanks: 149 times

Re: Alimentando tabela referenciada com formulario VBA

Mensagempor spiders » Sex Out 11, 2019 4:18 pm

Boa tarde, eu fiz a alteração na linha, porém retornou o seguinte erro

Erro em tempo de execução '9':
Subscrito fora do intervalo
spiders
Membro
Membro
 
Mensagens: 2
Registrado em: Sex Out 11, 2019 1:38 pm
Has thanked: 0 time
Have thanks: 0 time

Re: Alimentando tabela referenciada com formulario VBA

Mensagempor srobles » Sex Out 11, 2019 4:48 pm

spiders,

Na sua pasta de trabalho, qual o nome da guia que serve como Base de dados? AgendadordeEventos ou BASE?

Apenas altere isso na linha que faz referência á guia que é sua base de dados.
Espero ter ajudado.

Abs.

Saulo Robles

Remember when you were young?
You shone like the sun.
Shine On You Crazy Diamond
srobles
Membro
Membro
 
Mensagens: 353
Registrado em: Sáb Mai 09, 2015 10:35 pm
Has thanked: 118 times
Have thanks: 149 times


Voltar para Formulários

Quem está online

Usuários navegando neste fórum: Nenhum usuário registrado e 2 visitantes