Copiar rangos y celdas no contiguas a la vez
Les envío esta pregunta para ver si me pueden ayudar. Tengo una macro que se encarga de copiar datos (rango de celdas) de una hoja a otra de forma iterativa. La duda que tengo es la siguiente:
Me gustaría poder copiar además de este rango de celdas, el valor de un par de celdas no contiguas a este rango y todo a la misma vez. En mi caso, serían las celdas D6 y F50. ¿Podríais decirme si esto es posible?
Dejo aquí una parte del código para aportar más información:
Dim rango As Range
Set rango = Sheets("estado").Range("A22")
Range("B4:B8").Copy
Application.Goto Sheets("estado").Range("A22")
If ActiveCell.Value = "" Then
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
1 Respuesta
Respuesta de Aneudys Martinez
1