☰

Copiando e colando no Excel 2013

tag-icon • tag-icon copy-paste
Copiando e colando no Excel 2013

Como copio a célula H47 da Planilha 2 para a Planilha 500 e depois colo na Planilha 1, onde A2 para Planilha2 H47; A3 para Folha3 H47; A4 para Folha4 H47; A5 para Folha5 H47.... A500 para Folha500 H47

Responder1

Se entendi sua pergunta, em VBA, você poderia fazer:

Sub CopyToManySheets
Dim copyRng as Range
Set copyRng = Range ("Sheet2!$H$47")
copyRng.select
Selection.copy
Dim index as integer
For index = 1 to 500
If Not (IsError (Range ("Sheet" & index & "!A" & index))) Then
Range ("Sheet" & index & "!A" & index).Select
Selection.Paste
Else
End if
Next
Set copyRng = Nothing
Exit Sub

informação relacionada