L'ajout de feuilles à la fin du classeur dans Excel (méthode normale ne fonctionne pas?)

C'est le code VBA im en utilisant d'essayer d'ajouter une nouvelle feuille à la dernière place dans le classeur

mainWB.Sheets.Add(After:=Sheets(Sheets.Count)).Name = new_sheet_name

J'ai vu cela dans une question similaire sur ce site. Sa ne fonctionne pas.

- Je faire cela dans une boucle et chaque feuille est ajoutée à la deuxième position dans les feuilles. Il y a 2 feuilles qui sont de façon permanente (info et le résumé) et je puis précéder à ajouter les 5 plus appelé "test" de 1 à 5. Je finis toujours avec les feuilles dans cet ordre:

Info, sheet5, sheet4, sheet3, sheet2, sheet1, Summary

Mais ce que je veux/m'attendais a:

Info, Summary, sheet1, sheet2, sheet3, sheet4, sheet5

(la boucle ne se produisent dans l'ordre attendu donc, le problème n'est pas là.)

Si je swap le résumé et les fiches d'info avant de me lancer alors qu'ils sont à l'opposé des endroits quand je suis fait.

Ce que je fais mal?

OriginalL'auteur Jacxel | 2012-07-12

  1. 31

    Essayer cette

    mainWB.Sheets.Add(After:=mainWB.Sheets(mainWB.Sheets.Count)).Name = new_sheet_name
    ok, ça marche....mais j'étais en utilisant l'un classeur, en premier lieu, alors pourquoi était-ce l'origine du problème?
    Si je ne me trompe pas, vous avez au moins 2 WBs ouvrir. Pouvez-vous vérifiez? Qui WB est mainWB référence?
    oh wait...tant pis, j'forgor les fichiers CSV de la macro a été l'ouverture. Merci...encore une fois...vous semblez avoir répondu à 50% de mes questions XD
    qui d'autres à 50% restant? 🙂
    Désolé, vous m'avez mal compris, je parlais de vous, vous AVEZ répondu à environ 50% de mes questionS sur SOI.

    OriginalL'auteur Siddharth Rout

  2. 7
    mainWB.Sheets.Add(After:=Sheets(Sheets.Count)).Name = new_sheet_name

    devrait probablement être

    mainWB.Sheets.Add(After:=mainWB.Sheets(mainWB.Sheets.Count)).Name = new_sheet_name
    me battre!
    + 1 n'en est pas moins pour l'affichage en même temps 🙂
    J'étais 55 secondes trop lent.

    OriginalL'auteur Tim Williams

  3. 2

    Une erreur commune est 

    mainWB.Sheets.Add(After:=Sheets.Count)

    qui conduit à l'Erreur 1004. Bien qu'il n'est pas clair à tous à partir de la documentation officielle, il s'avère que le "Après" paramètre ne peut pas être un nombre entier, il doit être une référence à une feuille du même classeur.

    OriginalL'auteur CodeKid

  4. 1

    Assurez-vous d'obtenir vos fiches avec lequel classeur ils sont la référence!

     mainWB.Sheets.Add(After:=mainWB.Sheets(mainWB.Sheets.Count)).Name = new_sheet_name

    OriginalL'auteur danielpiestrak