Bienvenue! Identification Créer un nouveau profil

Recherche avancée

Récupération Nom Onglet classeur Excel

11/07/13 12:40
Bonjour à tous et merci d'avance pour votre aide

Je souhaite permettre à l'utilisateur de lier à la base access des fichiers excel dont le nom de l'onglet change.
J'ai récupéré du code me permettant d'aller jusqu'à la récupération du chemin et nom du fichier, création de la liaison de la table en partant du principe que le nom de l'onglet était toujours le même.
Comment est il possible de récupérer le nom de l'onglet en même temps que le nom du chemin ?

Ci après le code (la fonction XLLink étant du code récupéré par ailleurs) :

Private Sub TypeImport_AfterUpdate()
Dim strFichier As String
Dim oFD As FileDialog
'Paramètre la fenêtre Ouvrir
Set oFD = Application.FileDialog(msoFileDialogOpen)
With oFD
'Renseignement du titre
.Title = "Sélectionner le fichier à importer"
'Interdit la multi sélection
.AllowMultiSelect = False
'Permet de personnaliser le bouton.
.ButtonName = "Sélectionner"
'Affiche la fenêtre
If .Show Then
'Récupère le chemin d'accès au fichier
Me.Cheminfichier = .SelectedItems(1)
Me.refresh
'Lie le fichier à la base
XLLink Me.NomLiaison, Me.Cheminfichier, Me.NomOnglet, True
End If
End With
End Sub
SujetAuteurEnvoyé le

Récupération Nom Onglet classeur Excel

Cairis11/07/13 12:40

Re: Récupération Nom Onglet classeur Excel

Hervé Inisan12/07/13 08:16

Re: Récupération Nom Onglet classeur Excel

Cairis12/07/13 13:37

Seuls les utilisateurs enregistrés peuvent poster des messages dans ce forum.

Cliquez ici pour vous connecter