Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    janvier 2020
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 27
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Transports

    Informations forums :
    Inscription : janvier 2020
    Messages : 1
    Points : 1
    Points
    1
    Par défaut Supprimer noms en doublons lors de copie d'une worksheet d'un Workbook à un autre
    Bonjour à tous,

    J'aimerais créer dans ma macro VBScript un sub qui me permette de supprimer les noms en doublons suite à la copie de plusieurs feuilles excel vers un autre classeur. Les doublons ont la particularités d'avoir pour parents une feuille. J'ai donc trouvé un bout de code qui me permettrait de faire ça mais VBScript m'empechant de déclarer des variable "Name" cela m'est impossible. auriez vous une idée de la façon faire cette action?
    Merci d'avance,
    Misterart

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub deleteNames()
        Dim theName as Name
        For Each theName In Names
            If TypeOf theName.Parent Is Worksheet Then
                theName.Delete
            End If
        Next
    End Sub

  2. #2
    Rédacteur/Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    décembre 2004
    Messages
    5 019
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : décembre 2004
    Messages : 5 019
    Points : 11 761
    Points
    11 761
    Par défaut
    Salut

    En VBScript on ne type pas les variables, si tu fait Dim theName theName va automatiquement être typé Objet par VBScript, d’où vient Names et Worksheet , il faut que ces variables soient globales pour être utilisée dans ta Sub deleteNames.
    ProgElecT
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.

Discussions similaires

  1. Problème lors de copie d'une fonction V2.0
    Par cegehi dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 07/08/2013, 16h11
  2. [XL-2007] Problème lors de copie d'une fonction
    Par cegehi dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 04/08/2013, 00h15
  3. Pb lors de la copie d'une worksheet depuis MA
    Par Pifton dans le forum Excel
    Réponses: 1
    Dernier message: 08/09/2012, 05h09
  4. [WD-2003] Copie d'une sélection d'un fichier à un autre
    Par naunau31 dans le forum VBA Word
    Réponses: 1
    Dernier message: 22/04/2012, 19h19
  5. [OpenOffice][Tableur] [Source] Copie d'une feuille d'un classeur à un autre
    Par Caro-Line dans le forum OpenOffice & LibreOffice
    Réponses: 0
    Dernier message: 07/08/2009, 19h25

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo