supprimer le nom du fichier dans le chemin complet
4 réponses
modus57
Bonsoir à tous,
Dans la chaîne de carcatère :
C:\Documents and Settings\MonDossier.xls
Je voudrais extraire seulement :
C:\Documents and Settings\
Ou supprimer MonDossier.xls
Comment écrire l'instruction.
Merci d'avance
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
FL
Utilise en VBA Left("C:Documents and SettingsMonDossier.xls",1,26) en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+ FL
"modus57" a écrit dans le message de news: %
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
Utilise
en VBA Left("C:Documents and SettingsMonDossier.xls",1,26)
en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+
FL
"modus57" <modus57@wnadoo.fr> a écrit dans le message de news:
%23jr8xiGzGHA.3656@TK2MSFTNGP04.phx.gbl...
Bonsoir à tous,
Dans la chaîne de carcatère :
C:Documents and SettingsMonDossier.xls
Je voudrais extraire seulement :
C:Documents and Settings
Ou supprimer MonDossier.xls
Comment écrire l'instruction.
Merci d'avance
Utilise en VBA Left("C:Documents and SettingsMonDossier.xls",1,26) en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+ FL
"modus57" a écrit dans le message de news: %
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
JB
Bonsoir,
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
Bonsoir,
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls"
y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous,
Dans la chaîne de carcatère :
C:Documents and SettingsMonDossier.xls
Je voudrais extraire seulement :
C:Documents and Settings
Ou supprimer MonDossier.xls
Comment écrire l'instruction.
Merci d'avance
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
modus57
Bonsoir JB ok j'ai compris, petite correction x doit être remplacer par chaîne Sub test() chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(chaine, InStrRev(chaine, "")) MsgBox y End Sub Merci pour ta réponse hyper rapide, @ +
"JB" a écrit dans le message de news:
Bonsoir,
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
Bonsoir JB
ok j'ai compris, petite correction x doit être remplacer par chaîne
Sub test()
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls"
y = Left(chaine, InStrRev(chaine, ""))
MsgBox y
End Sub
Merci pour ta réponse hyper rapide, @ +
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1156967744.579653.238650@m73g2000cwd.googlegroups.com...
Bonsoir,
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls"
y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous,
Dans la chaîne de carcatère :
C:Documents and SettingsMonDossier.xls
Je voudrais extraire seulement :
C:Documents and Settings
Ou supprimer MonDossier.xls
Comment écrire l'instruction.
Merci d'avance
Bonsoir JB ok j'ai compris, petite correction x doit être remplacer par chaîne Sub test() chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(chaine, InStrRev(chaine, "")) MsgBox y End Sub Merci pour ta réponse hyper rapide, @ +
"JB" a écrit dans le message de news:
Bonsoir,
chaine = "c:mesdocexcelmacronouveau1001exemplesclasseur1.xls" y = Left(x, InStrRev(chaine, ""))
JB
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
FL
----- Original Message ----- From: "FL" Newsgroups: microsoft.public.fr.excel Sent: Wednesday, August 30, 2006 9:41 PM Subject: Re: supprimer le nom du fichier dans le chemin complet
Utilise en VBA Left("C:Documents and SettingsMonDossier.xls",1,26) en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+ FL
"modus57" a écrit dans le message de news: %
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance
----- Original Message -----
From: "FL" <nospam@nospam.fr>
Newsgroups: microsoft.public.fr.excel
Sent: Wednesday, August 30, 2006 9:41 PM
Subject: Re: supprimer le nom du fichier dans le chemin complet
Utilise
en VBA Left("C:Documents and SettingsMonDossier.xls",1,26)
en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+
FL
"modus57" <modus57@wnadoo.fr> a écrit dans le message de news:
%23jr8xiGzGHA.3656@TK2MSFTNGP04.phx.gbl...
Bonsoir à tous,
Dans la chaîne de carcatère :
C:Documents and SettingsMonDossier.xls
Je voudrais extraire seulement :
C:Documents and Settings
Ou supprimer MonDossier.xls
Comment écrire l'instruction.
Merci d'avance
----- Original Message ----- From: "FL" Newsgroups: microsoft.public.fr.excel Sent: Wednesday, August 30, 2006 9:41 PM Subject: Re: supprimer le nom du fichier dans le chemin complet
Utilise en VBA Left("C:Documents and SettingsMonDossier.xls",1,26) en Fonction GAUCHE("C:Documents and SettingsMonDossier.xls";1;26)
à+ FL
"modus57" a écrit dans le message de news: %
Bonsoir à tous, Dans la chaîne de carcatère : C:Documents and SettingsMonDossier.xls Je voudrais extraire seulement : C:Documents and Settings Ou supprimer MonDossier.xls Comment écrire l'instruction. Merci d'avance