Macro para crear tabla en excel vba

La presente porque quisiera solicitar el favor de aclarar una inquietud con respecto a una macro que estoy realizando. La macro consiste en tomar los datos de otra hoja de cálculo y conformar un informe en una segunda hoja de cálculo con los valores introducidos manualmente en la primera hoja. Para ésto debe considerar la extensión de cada conjunto de datos en términos de filas y continuar copiando los valores en una celda en blanco. A continuación incluyo el código:

Sub Testchicuadradomúltiple_Button2_Click()

'Calcula cuántos datos se han incluido en la hoja de cálculo Test chi cuadrado sencillo
Total_datos = (Worksheets("Test chi cuadrado sencillo").Range("A11").End(xlDown).Row) - 10

'Calcula hasta qué fila hay registros escritos en la hoja Test chi cuadrado sencillo
Filas = Worksheets("Test chi cuadrado sencillo").Range("A11").End(xlDown).Row

'Calcula cuántos datos se han incluido en la hoja de cálculo Test chi cuadrado múltiple
Total_datos_informe = (Worksheets("Test chi cuadrado múltiple").Range("A11").End(xlDown).Row) - 10

'Calcula hasta qué fila hay registros escritos en la hoja Test chi cuadrado múltiple
Filas_informe = Worksheets("Test chi cuadrado múltiple").Range("A11").End(xlDown).Row

For i = 11 To Filas
         For j = 1 To 3
             Worksheets("Test chi cuadrado múltiple").Cells(i, j).Value = Worksheets("Test chi cuadrado sencillo").Cells(i, j).Value
        Next
Next

'Bucle para generar las partes siguientes del informe
For i = (Filas_informe + 1) To (Filas_informe + Total_datos)
           For j = 1 To 3
                   Worksheets("Test chi cuadrado múltiple").Cells(i, j).Value = Worksheets("Test chi cuadrado sencillo").Cells(i, j).Value
         Next
Next

End Sub

He puesto a funcionar la macro pero no continua copiando los valores de un segundo, tercero, cuarto... Conjunto de datos. Quisiera saber en qué está fallando el código pues me parece que las referencias están bien especificadas.