Copier un extrait de tableau VBA dans Excel

Merci de ta réponse michel_m mais ce n'est pas exactement ce que je cherche
Pour être plus clair voici le code que je souhaite optimiser
Cette macro consiste à trier ma feuille 2 en fonction de ma feuille 1. les plages trié sont alors copié dans la feuille 3.

Sub test_optimise2()
Dim k As Long
Dim j As Long
Dim l As Integer
Dim t As Long
Dim Tableau_j() As Variant

t = Timer

l = 0
k = 1
j = 21
i = 21

'Renvoie le nombre de plage de données (une plage correspond à 13 lignes)
Do While Feuil2.Range("C" & j).Value > 0
j = j + 13
l = l + 1
Loop

ReDim Tableau_j(l)

'Rentre dans un tableau vba les lignes qui sont balayé dans la feuille 2
For k = 0 To l - 1
Tableau_j(k) = 21 + (k * 13)
Next k

'La macro cherche la cellule "Ci" de la feuille 1 dans la feuille 2 en balayant les lignes donnés par le tableau vba (tableau_j)
'Une fois trouvé la ligne est supprimé dans mon tableau VBA et donc elle n'est plus balayé par la suite
'De plus lorsque la ligne est trouvé je recopie les valeurs de la feuille2 au niveau de la ligne trouvé dans la feuille trois
'Au niveau de la cellule recherché de la feuille 1
Do While Feuil1.Range("C" & i).Value > 0
For k = 0 To l - 1
h = Tableau_j(k)
Set cellule = Feuil2.Range(Feuil2.Cells(h + 2, 2), Feuil2.Cells(h + 2, 6)).Find(What:=Feuil1.Range("C" & i).Value, lookat:=xlWhole, SearchDirection:=xlPrevious)
If Not cellule Is Nothing Then
Tableau_j(k) = Tableau_j(l - 1)
l = l - 1
ReDim Preserve Tableau_j(l)
Feuil3.Range("A" & i & ":K" & i + 12).Value = Feuil2.Range("A" & cellule.Row - 2 & ":K" & cellule.Row + 10).Value
Exit For
Else
End If
Next k
i = i + 13
Loop

Feuil3.Range("Q2") = Application.Round((Timer - t), 1) & " Sec"

End Sub

Mon idée est de rentrer les tableau de la feuille 1 et 2 dans un tableau VBA pour gagner en temps de calcul mais je ne sais pas comment faire des recherche dans des tableau VBA ni comment copier des plages de données à partir d'un tableau VBA.

Il faut bien te rendre compte que ce que tu demandes n'est pas forcément facile et que personne ne veut passer parfois plusieurs heures à essayer de résoudre un problème bénévolement pour se voir dire après coup « non vous n'avez pas compris mon problème (rarement, je n'ai pas bien expliqué, excuses moi) il faut en plus que.... »

Je suis d'accord avec vous je me suis certainement mal exprimé. Ce que je cherche n'est pas forcément simple et n'existe peut être pas comme je le pense. Je m'excuse si cela a été mal compris.
Je veux juste copier une plage d'une variable tableau dans une feuille excel sans passer par une boucle.
Merci beaucoup de votre aide et d'avoir pris du temps pour me répondre