Sujet Précédent Sujet Suivant

SOS renommer feuille excel

Fermé
tyouba - 13 sept. 2012 à 17:01
UsulArrakis Messages postés 7405 Date d'inscription vendredi 28 mars 2003 Statut Contributeur Dernière intervention 27 janvier 2022 - 14 sept. 2012 à 09:01
Bonjour,



j'arrive pas a renommer les feuilles de fichiers
excel.

s'il vous plait je veut que chaque feuille prend
automatiquement le nom de fichier.

N.B: chaque fichier comporte une seule feuille.


j'ai une centaine des fichiers.


merci bien...
A voir également:

2 réponses

Réponse 1 / 2
Raymond PENTIER Messages postés 58398 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 28 avril 2024 17 094
14 sept. 2012 à 03:38
"je veut que chaque feuille prend automatiquement le nom de fichier"
C'est quoi, cette nouvelle invention ? quel est l'intérêt d'une telle manipulation ?
si tu expliques ton problème, on pourra peut-être te proposer une solution bien meilleure que de donner à une feuille le nom de son fichier, opération qu'on ne peut faire qu'avec VBA, et fichier par fichier, de toutes façons ...
0
Réponse 2 / 2
Mytå Messages postés 2973 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 942
14 sept. 2012 à 04:16
Salut le forum

Un bout de code pour sélectionner une Liste de Fichiers 
Sub ChoisirFichiers()
    Dim Fichiers As Variant
    Dim i As Integer

    Fichiers = Application.GetOpenFilename _
               ("Fichiers Excel (*.xls;*.xlsx;*.xslm), *.xls;*.xlsx;*.xslm", , , , True)

    If IsArray(Fichiers) Then
        For i = 1 To UBound(Fichiers)
            MsgBox Fichiers(i)
        Next
    End If

End Sub

Mytå
0
UsulArrakis Messages postés 7405 Date d'inscription vendredi 28 mars 2003 Statut Contributeur Dernière intervention 27 janvier 2022 3 182
14 sept. 2012 à 09:01
bonjour Myta
pour compléter ta signature je dirai que c'est Moïse qui a reçu le 1er ipad
;-)
0