Página 1 de 1

[RESOLVIDO] Auto Selecionar na Lista e Auto Salvar

Enviado: 25 Ago 2022 às 08:50
por AndreSpecker
Olá pessoal, alguém poderia me ajudar, estou precisando de uma macro que selecione automaticamente cada valor do AK e execute automaticamente a macro que tenho de salvar, executando um por um até o final.
Seleciona -> Salvar -> Pula pro de baixo -> Seleciona -> Salvar -> Pula pro de baixo..... até o final

Imagem

Re: Auto Selecionar na Lista e Auto Salvar

Enviado: 26 Ago 2022 às 17:00
por osvaldomp
Vincule o botão existente Salvar ao código abaixo.
Código: Selecionar todos
Sub ReplicaNúmerosESalva()
 Dim c As Range
  For Each c In Range("AK1:AK" & Cells(Rows.Count, "AK").End(3).Row)
   [AI1] = c.Value
   SalvarFichaProduto
  Next c
End Sub

Re: Auto Selecionar na Lista e Auto Salvar

Enviado: 06 Set 2022 às 14:21
por AndreSpecker
Perfeito, muito obrigado :D