Problème Autofill VBA [Résolu]
Résolu
linkcr15
Messages postés
362
Date d'inscription
Statut
Membre
Dernière intervention
-
linkcr15 Messages postés 362 Date d'inscription Statut Membre Dernière intervention -
linkcr15 Messages postés 362 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Voici mon problème : J'utilise une feuille Excel dans lequel je souhaiterais construire automatiquement un tableau.
J'ai entré toutes mes formules dans la plage "A2:H2"
Pour construire mon tableau, j'insère 200 lignes après la ligne 2, je tire mes formules et je supprime les lignes vides.
J'insère donc bien mes 200 lignes mais je n'arrive pas à tirer les formules de mon tableau. Une erreur s'affiche à cette ligne :
Le range de mon tableau est bon, la dernière ligne est bien la ligne 201 après insertion.
Voici le bout de code utilisé :
Quelqu'un pourrait m'aider à tirer ces maudites formules svp?
Merci d'avance pour vos réponses!
EDIT : J'obtiens l'erreur 1004 : "La méthode Autofill de la classe Range a échoué"
Après recherches, j'ai vu que cette erreur venait du fait qu'Autofill n'était pas "installée" sur Microsoft Office (Je suis sous Office 2003) ou que cela venait d'un problème de sécurité des macros (Je suis en sécurité faible donc je ne pense pas que ça vienne de là).
Est-ce que quelqu'un sait comment palier à cette erreur?
Sinon savez-vous comment tirer des formules sans Autofill?
Voici mon problème : J'utilise une feuille Excel dans lequel je souhaiterais construire automatiquement un tableau.
J'ai entré toutes mes formules dans la plage "A2:H2"
Pour construire mon tableau, j'insère 200 lignes après la ligne 2, je tire mes formules et je supprime les lignes vides.
J'insère donc bien mes 200 lignes mais je n'arrive pas à tirer les formules de mon tableau. Une erreur s'affiche à cette ligne :
feuilExcel.Range("A2:H2").AutoFill Destination:=feuilExcel.Range("A3:H201"), Type:=xlFillDefault
Le range de mon tableau est bon, la dernière ligne est bien la ligne 201 après insertion.
Voici le bout de code utilisé :
For ligne = 3 To 200 'Début de la boucle For feuilProcesExcel.Rows(ligne).Insert 'On insére 200 lignes dans le tableau Next ligne 'Fin de la boucle For feuilProcesExcel.Range("A2:H2").AutoFill Destination:=feuilProcesExcel.Range("A3:H201"), Type:=xlFillDefault
Quelqu'un pourrait m'aider à tirer ces maudites formules svp?
Merci d'avance pour vos réponses!
EDIT : J'obtiens l'erreur 1004 : "La méthode Autofill de la classe Range a échoué"
Après recherches, j'ai vu que cette erreur venait du fait qu'Autofill n'était pas "installée" sur Microsoft Office (Je suis sous Office 2003) ou que cela venait d'un problème de sécurité des macros (Je suis en sécurité faible donc je ne pense pas que ça vienne de là).
Est-ce que quelqu'un sait comment palier à cette erreur?
Sinon savez-vous comment tirer des formules sans Autofill?
A voir également:
- Problème Autofill VBA [Résolu]
- Excel compter cellule couleur sans vba - Guide
- Vba attendre 1 seconde ✓ - Forum VB / VBA
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum VB / VBA