bonjour
j ai besoin d'aide!!!!!!!!!!!!
je desire remplacer dans un fichier part (piece catia) le nom de ma part (les proprietes)
pour cela j ai trouver le moyen d ouvrir ma part,et d enregistre manuellement mes modifs grace a notepad2
ce pendant je desire automotise cela grace a vba (excel)
en creant un programme qui remplace un mots 'ex:test' par 'totox' passant par notepad2
 
please help me  
 
j ai essaye avec ca  
mais mon fichier corronpue
 
Const forreading = 1
Const forwriting = 2
Set objfso = CreateObject("scripting.filesystemobject" )
Set objfile = objfso.opentextfile("C:\Documents and Settings\GUS007\Bureau\test.catpart", forreading)
 
strtext = objfile.readall
objfile.Close
strnewtext = Replace(strtext, "tests", "totox" )
 
Set objfile = objfso.opentextfile("C:\Documents and Settings\GUS007\Bureau\test.catpart", forwriting)
objfile.writeline strnewtext
objfile.Close
End Sub