Rango de VBA de la cadena
Esto es un poco tonto, pero he estado estancado por un tiempo en esta simple declaración:
<code> Dim range1 as Range Dim mysheet as String Dim myrange as String mysheet = "Sheet1" range = "A1:A10" range1 = Worksheets(mysheet).Range(myrange) </code>
He probado todas las soluciones que he encontrado en internet como por ejemploesta, esta yesta, pero nada.
Todo el tiempo me da errores: 1004 "Error definido por la aplicación" o "variable de objeto o sin establecer".
He probado lo siguiente:
<code>range1 = ThisWorkbook.Worksheets(mysheet).Range(myrange) range1 = ActiveWorkbook.Worksheets(mysheet).Range(myrange) range1 = Sheets(mysheet).Range(myrange) (and the combinations above) range1 = Worksheets(mysheet).Range(Cells(1,1), Cells(1,10)) (and the combinations with This/Active workbook) </code>
y
<code>with This/ActiveWorkbook range1 = .Worksheets(mysheet).Range(myrange) end with </code>
Ninguno ha trabajado.
Esto es una cosa REALMENTE tonta, pero me he quedado estancado por un tiempo: s
¿Alguien puede ayudarme?
Realmente gracias de antemano.
Atentamente,