Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
#15196
Olá caros colegas

Em meio ao meu inicio com Excel, venho lhes pedir uma pequena ajuda.

Em minha planilha que estou estou deixando em anexo, preciso que ocorra o seguinte caso...
Quero que ela copie um valor e depois cole na célula, e após isso ela passe para a próxima linha de cópia e faça o mesmo processo.

No caso da planilha ficaria como:
Ir na "Sheet2" copiar o primeiro valor e colar na celula "J11" da "Sheet1".
Após esse processo a macro parar ou fazer um loop com todos os números da "Sheet2" até acabar os números.

Porque preciso disso ?
Pois na célula "J11" é um número inicial para que eu possa realizar mais alguns procedimentos automáticos na planilha, como até outras macros como: Salvar a planilha com o nome da célula "F11", fazer a impressão da página e mais algumas pequenas formulas...

Estava tentando imaginar em um Loop ao invés da macro parar a cada número feito, mas não sei se seria possível

Muito obrigado amigos :D
#15206
Bom dia!!

Seria isso?
Código: Selecionar todos
Sub AleVBA_3030()
Dim rngBond As Range
Dim rngCell As Range
Dim ws As Worksheet
Dim LastRow As Long

LastRow = Worksheets("Sheet2").Cells(Worksheets("Sheet2").Rows.Count, "B").End(xlUp).Row
Set ws = Worksheets("Sheet1")
Set rngBond = Worksheets("Sheet2").Range("B2:B" & LastRow)
    For Each rngCell In rngBond
        ws.Range("J11") = rngCell
        'Falta Imprimir
        'Worksheets("Sheet1").Range("A1:K42").PrintOut
        ' --> %%%%%%%%%%%%%%%
        'Chame aqui seu código
        'Call Sava_Planilha <-Caso necessário descomente essa linha para chamar seu código principal
    Next rngCell
End Sub
Att
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord