Erreur 1004 sur un clearcontents
Résolu/Fermé1 réponse
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
Modifié le 11 déc. 2019 à 16:55
Modifié le 11 déc. 2019 à 16:55
Bonjour Flanneux, bonjour le forum,
Il te faut spécifier le nom de l'onglet systématiquement. Même pour .Cells... Avec une variable c'est plus lisible :
À plus,
ThauTheme
Il te faut spécifier le nom de l'onglet systématiquement. Même pour .Cells... Avec une variable c'est plus lisible :
Dim OAL As Worksheet
Dim OP As Worksheet
Dim dern As Integer
Dim dern1 As Integer
Set OAL = Worksheets("OF à lancer")
Set AP = Worksheets("OF précédent")
dern = OAL.Range("b" & Rows.Count).End(xlUp).Row
OAL.Range(OAL.Cells(2, 1), OAL.Cells(dern, 13)).ClearContents
dern1 = OP.Range("b" & Rows.Count).End(xlUp).Row
OP.Range(OP.Cells(2, 1), OP.Cells(dern1, 13)).ClearContents
À plus,
ThauTheme
11 déc. 2019 à 16:54
Merci beaucoup pour l'aide,
Bonne fin d'après midi,