Selection de feuille

Bonjour à tous je suis nouveau sur ce forum et également débutant en VBA
et après avoir regarde plusieurs dizaines de post pour essayé de résoudre mon problème sans succès je me retourne vers vous.

Voici mon problème :

je creer une nouvelle feuille (essai000) avec variable.
dans cette nouvelle feuille je veux y mettre des information qui sont dans l ancienne (avant_macro). mais je n arrive pas a selectionner cette nouvelle feuille variable.

Merci d avance.....
Dim derno As Integer
Dim nouv As Integer
Dim man As Integer
Dim nouvelle_feuille As String

Sheets.Add

derno = 0
For nouv = 1 To Sheets.Count
If Left(Sheets(nouv).Name, 5) = "Essai" Then
For man = 1 To Len(Sheets(nouv).Name)
If IsNumeric(Mid(Sheets(nouv).Name, man, 1)) Then
nouvelle_feuille = nouvelle_feuille & Mid(Sheets(nouv).Name, man, 1)
End If
Next man
If CInt(nouvelle_feuille) > derno Then derno = nouvelle_feuille
End If
nouvelle_feuille = ""
Next nouv
ActiveSheet.Name = "Essai" & Format(derno + 1, "000")

col1 = 1
Sheets("Avant_macro").Select
For b = 21 To 32 Step 2
ligne1 = 21 'attention il faut reporter cette valeur dans le "nom de la ligne ajoutee"

Sheets("nouvelle_feuille").Cells(ligne1, col1) = Sheets("Avant_macro").Cells(b, 1)