Erreur 1004

Bonjour,

Novice dans VBA, je sollicite votre aide concernant l'erreur sur ma petite macro :

Option Explicit

Sub mise_en_forme()

Dim derniereLigne As Integer

Dim derniereLigneBis As Integer

Dim phase As Integer

'DETERMINER LA DERNIERE LIGNE DU TABLEAU

derniereLigne = Feuil1.Range("A" & Rows.Count).End(xlUp).Row

'COPIER LES DONNEES DANS LA DEUXIEME FEUILLE ET PHASAGE DU DEBIT

Feuil1.Range("A2", "E" & derniereLigne).Copy

Feuil2.Range("A2").PasteSpecial xlPasteAll

'Prise en compte du déphasage du débit

phase = Feuil4.Cells(2, 3).Value

'Copier/coller le débit dans la deuxième feuille

Feuil1.Range("F" & phase + 2, "F" & derniereLigne).Select

Selection.Copy

Feuil2.Range("F2").PasteSpecial xlPasteAll

'Effacer les dernière lignes où le débit est inconnu

derniereLigne = Feuil2.Range("F" & Rows.Count).End(xlUp).Row + 1

derniereLigneBis = Feuil2.Range("E" & Rows.Count).End(xlUp).Row

Feuil2.Range("A" & derniereLigne, "E" & derniereLigneBis).Select

End Sub

L'erreur est sur la dernière ligne : Feuil2.Range("A" & derniereLigne, "E" & derniereLigneBis).Select

De plus, quand je fais des essais de ma macro et que je ne nettoie pas mes feuilles avant ou que je ne déselectionne pas des cellules, j'ai également des erreurs dans les lignes du dessus.

Pouvez-vous m'aider ?

Bonjour et bienvenu sur le forum,

Le code sans le support ne sert pas à grand chose. Merci de joindre le fichier qui va avec pour qu'on puisse tester et ainsi t'aider.

En fait, j'ai remarqué qu'il y a une erreur de syntaxe sur cette ligne. Tu peux nous dire littéralement ce que tu essaies de faire par cette ligne de code.

Bonjour,

Désolé, j'ai inséré le fichier dans mon message.

Re,

Remplace cette partie du code :

If phase <> 0 Then
    Feuil2.Activate
    derniereLigne = Feuil2.Range("F" & Rows.Count).End(xlUp).Row + 1
    derniereLigneBis = Feuil2.Range("E" & Rows.Count).End(xlUp).Row
    Feuil2.Range("A" & derniereLigne & ":E" & derniereLigneBis).Select
End If

OK Merci.

En fait, il fallait que j'active la feuille avant ^^

Re,

Il n'y pas que ça. Regarde le syntaxe du code surligné qui n'est pas le même.

OK, Merci. C'est noté.