Méthode 'Range' de l'objet'_Global' a échoué
Bonjour à tous,
J'ai un bout de code que j'ai retiré (coupé) de ma Macro et que j'ai placé (collé) en sous-macro. Le code s'exécute correctement lorsqu'il est dans la macro mais donne le message d'erreur 1004 tel que cité dans le sujet lorsque le code est dans la sous-macro. Le code a pour but de placé un numéro séquentielle devant chaque ligne de la colonne 'A' Qu'est ce que j'ai oublié pour que cela fonctionne? Merci pour votre aide.
Voici le code:
Private Sub Numerotation_lignes()
Range("A3").Select
ActiveCell.FormulaR1C1 = "1"
Range("A4").Select
ActiveCell.FormulaR1C1 = "2"
Range("A3:A4").Select
Selection.AutoFill Destination:=Range("A3:A" & lnFin), Type:=xlFillDefault
Range("A3:A" & lnFin).Select
ActiveWindow.SmallScroll Down:=-132
End Sub
bonjour,
très probablement infin ne contient rien.
recopier dans cette macro, les instructions qui mettent une valeur dans infin ou passer infin comme paramètre à cette macro.
Effectivement les cellules sont vides. Mais sa fonctionne dans la macro. Je dois faire quoi pour corriger le problème?
re-bonjour,
pour corriger
recopier dans cette macro, les instructions de l'autre macro qui mettent une valeur dans infin ou passer la valeur deinfin comme paramètre à cette macro, ou déclarer infin comme variable globale.