Télécharger le zip
oui , va pour l'aspect didactique de la chose , peut être aurais-tu pu mettre le code directement sur le site :'Renvoie le nom de fichier et cherche le 1er point à partir de la droitePnt = InStrRev(nomFichier, ".")'Retourne la chaîne en conservant le nom à gauche du 1er pointFichier1$ = Left$(nomFichier, Pnt - 1)'Affiche le nom de fichier sans extensionText1.Text = Fichier1
C'est vrai c'est plus rapide.Mais c'est mes débuts sur ce site.N'oublions pas de déclarer la variableDim Fichier1 As String
Deja sur le site7/10 a cause que c deja sur le site...
Merci yoman64Voilà ma source : http://forum.vbfrance.com/article.aspx?Val=8012
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 873 857 membres 140 nouveaux aujourd'hui 16 151 membres club