un soucis pour macroteur ! (Aïe, pas sur la tête les AMIS) ;-)
Quel est la sainte axe pour ouvrir un fichier texte sans avoir la demande de
conversion si le fichier n'est pas reconnu et donc forcer sa reconnaissance
en texte non codé ?
Pour avancer j'ai trouvé ça
Documents.Open FileName:="C:\texte.txt", Format:= ???
C'est les "???" que je ne sais pas remplir.
Merci d'avance
--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr
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
Modeste
Salutatoa® JièL Goubert wrote:
Pour avancer j'ai trouvé ça Documents.Open FileName:="C:texte.txt", Format:= ??? C'est les "???" que je ne sais pas remplir.
l'aide indique : Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(YYY).OpenFormat ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
un test comme ceci pourrai te tirer d'affaire :
For NFC= 1 to fileconverters.count If FileConverters(NFC).CanOpen = True Then MsgBox FileConverters(NFC).FormatName & " can open files"
Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(NFC).OpenFormat End If Next
Paf !!! Rapé ... marre tôt
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Salutatoa®
JièL Goubert wrote:
Pour avancer j'ai trouvé ça
Documents.Open FileName:="C:texte.txt", Format:= ???
C'est les "???" que je ne sais pas remplir.
l'aide indique :
Documents.Open FileName:="C:Data.xxx", _
Format:=FileConverters(YYY).OpenFormat
ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
un test comme ceci pourrai te tirer d'affaire :
For NFC= 1 to fileconverters.count
If FileConverters(NFC).CanOpen = True Then
MsgBox FileConverters(NFC).FormatName & " can open files"
Documents.Open FileName:="C:Data.xxx", _
Format:=FileConverters(NFC).OpenFormat
End If
Next
Paf !!! Rapé ... marre tôt
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042
Pour avancer j'ai trouvé ça Documents.Open FileName:="C:texte.txt", Format:= ??? C'est les "???" que je ne sais pas remplir.
l'aide indique : Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(YYY).OpenFormat ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
un test comme ceci pourrai te tirer d'affaire :
For NFC= 1 to fileconverters.count If FileConverters(NFC).CanOpen = True Then MsgBox FileConverters(NFC).FormatName & " can open files"
Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(NFC).OpenFormat End If Next
Paf !!! Rapé ... marre tôt
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Geo
Salutatoa® JièL Goubert wrote:
Pour avancer j'ai trouvé ça Documents.Open FileName:="C:texte.txt", Format:= ??? C'est les "???" que je ne sais pas remplir.
l'aide indique : Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(YYY).OpenFormat ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
en te lisant, j'ai l'impression que nous n'avons pas lu la même question, ce qui d'ailleurs est matériellement exact :-) Et je trouve ta réponse fort intéressante.
Merci
-- A+
Salutatoa®
JièL Goubert wrote:
Pour avancer j'ai trouvé ça
Documents.Open FileName:="C:texte.txt", Format:= ???
C'est les "???" que je ne sais pas remplir.
l'aide indique :
Documents.Open FileName:="C:Data.xxx", _
Format:=FileConverters(YYY).OpenFormat
ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
en te lisant, j'ai l'impression que nous n'avons pas lu la même
question, ce qui d'ailleurs est matériellement exact :-)
Et je trouve ta réponse fort intéressante.
Pour avancer j'ai trouvé ça Documents.Open FileName:="C:texte.txt", Format:= ??? C'est les "???" que je ne sais pas remplir.
l'aide indique : Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(YYY).OpenFormat ou YYY represente le numéro d'un filtre parmi la liste de ceux installés
en te lisant, j'ai l'impression que nous n'avons pas lu la même question, ce qui d'ailleurs est matériellement exact :-) Et je trouve ta réponse fort intéressante.
Merci
-- A+
JièL Goubert
Bonjoir(c) Modeste
Salutatoa®
:-))))))
For NFC= 1 to fileconverters.count If FileConverters(NFC).CanOpen = True Then MsgBox FileConverters(NFC).FormatName & " can open files"
Documents.Open FileName:="C:Data.xxx", _ Format:=FileConverters(NFC).OpenFormat End If Next
Parfait, merci je vais tester ça
Paf !!! Rapé ... marre tôt
pas si tôt que ça quand même ;-)
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est la : http://faq.outlook.free.fr
Bonjoir(c) Modeste
Salutatoa®
:-))))))
For NFC= 1 to fileconverters.count
If FileConverters(NFC).CanOpen = True Then
MsgBox FileConverters(NFC).FormatName & " can open files"
Documents.Open FileName:="C:Data.xxx", _
Format:=FileConverters(NFC).OpenFormat
End If
Next
Parfait, merci je vais tester ça
Paf !!! Rapé ... marre tôt
pas si tôt que ça quand même ;-)
--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr
