VBA Excel obtenez le nom de fichier à partir de la récupération de fichiers retournés par GetFolder.Fichiers

Je vais essayer d'obtenir le premier fichier d'un répertoire. Je n'aime pas le "premier" n'est pas bien défini dans ce cas, et je ne me soucie pas si je vais obtenir un fichier différent à chaque fois que j'appel mes sous.

J'essaie d'utiliser:

Dim FSO As Object
Dim SourceFolder As Object

Dim FileItem As Object

Set FSO = CreateObject("Scripting.FileSystemObject")
Set SourceFolder = FSO.GetFolder(SourceFolderName)

Set FileItem = SourceFolder.Files.Item(0)

mais cela renvoie une erreur du compilateur ("Invalid argument ou appel de procédure")
Pourriez-vous me dire comment faire ce travail?

Grâce,
Li

Avez-vous essayé avec l'article 1? Je pense que dans une collection, le premier indice est de 1 et pas 0
Oui je l'ai fait, eu la même erreur
GetFolder Méthode accepte une chaîne de caractères où, comme SourceFolder est défini en tant qu'objet.
Voir le code ci-dessus, GetFolder obtient "sourceFolderName" qui est une chaîne... désolé, j'ai oublié d'ajouter à sa déclaration. J'ai débogué et vu que l'erreur est donnée sur la dernière ligne de code
Ah! J'ai oublié le nom de la variable.

OriginalL'auteur user429400 | 2013-10-22