Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
DADOS SENDO SALVOS ...
 
Notifications
Clear all

DADOS SENDO SALVOS NO FIM DA PLANILHA

 
2024 - VBA & Macros
Post Recente por darliane7l 8 anos atrás
3 Posts
2 Usuários
0 Reactions
813 Visualizações
RSS
 darliane7l
(@darliane7l)
Posts: 13
Active Member
Topic starter
 

PESSOAL,

É seguinte criei uma macro e o botão de salvar estava funcionando normalmente mas não sei que eu fiz que agora está salvando no final da planilha

Dim LastRow As Long
LastRow = Worksheets("Cadastro").Cells(Workheets("Cadastro").Rows.Count, 1).End(xlUp).Row + 1

Worksheets("Cadastro").Cells(LastRow, 1).Value = Me.Cod_
Worksheets("Cadastro").Cells(LastRow, 2).Value = Me.Nome_
Worksheets("Cadastro").Cells(LastRow, 3).Value = Me.Curso_
Worksheets("Cadastro").Cells(LastRow, 4).Value = Me.Empresa_
Worksheets("Cadastro").Cells(LastRow, 5).Value = Me.Bolsa_
Worksheets("Cadastro").Cells(LastRow, 6).Value = Me.Valor_
Worksheets("Cadastro").Cells(LastRow, 7).Value = Me.Funcoes_
Worksheets("Cadastro").Cells(LastRow, 8).Value = Me.Periodo_
Worksheets("Cadastro").Cells(LastRow, 9).Value = Me.Prorrogacoes_1
Worksheets("Cadastro").Cells(LastRow, 10).Value = Me.Prorrogacoes_2
Worksheets("Cadastro").Cells(LastRow, 11).Value = Me.Prorrogacoes_3
Worksheets("Cadastro").Cells(LastRow, 12).Value = Me.Declaracao_
Worksheets("Cadastro").Cells(LastRow, 13).Value = Me.Status_

 
Postado : 18/01/2017 2:36 pm
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

darliane7l,

Boa tarde!

Não entendi bem o que você quer dizer com "criei uma macro e o botão de salvar estava funcionando normalmente". O código que você colou em seu post faz exatamente isso: Salva tudo na primeira linha em branco da planilha. Ou seja, no final da planilha. A instrução que faz isso é essa:

LastRow = Worksheets("Cadastro").Cells(Workheets("Cadastro").Rows.Count, 1).End(xlUp).Row + 1

Após definir a última linha com dados, pela coluna A, e armazenar o número dessa linha (adicionando 1) na variável LastRow, suas outras linhas de comando estão salvando os dados em LastRow. Ou seja, na primeira linha em branco.

A menos que sua coluna A não tenha dados nenhum. Aí o VBA está pegando, realmente, a última linha da planilha mesmo. Ou seja, no Excel 2007 a linha número 1.048.576.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 18/01/2017 3:25 pm
 darliane7l
(@darliane7l)
Posts: 13
Active Member
Topic starter
 

verdade, arrumei deu certo, obrigada!!!

 
Postado : 20/01/2017 7:27 am
Forum Jump:
  Tópico Anterior
Próximo Tópico