Contenu récent par Poisss

Problème résolu ! Voici le code ci ça peut en aider certains ! La résolution est en ligne 103, un reset de la variable newlines entre chaque fichier texte. Merci Patrick d'avoir pris du temps, et je m'expliquerais mieux la prochaine fois ! Promis ! :) Sub UnzipFilesAndModifyBlocksXML()...

Autant pour moi (première conversation à laquelle je participe sur le forum). Je reprends tout depuis le début : J'ai un dossier rempli de fichier .zip, chaque .zip contient 4 fichiers textes dont le fichier Blocks.xml que je souhaite modifier. Disons que le chemin du dossier rempli de zip...

Bonjour patricktoulon, Merci pour ton aide. Je suis encore novice en VBA, je ne sais pas si cela a un impact mais mon fichier XML ne contient pas que des lignes <Rack>... (Tu trouveras un exemple en PJ.) Il y en a d'autre, ton code permet d'incrémenter seulement où sont présente les lignes ...

Sub UnzipFilesAndModifyBlocksXML() Dim FSO As Object Dim objShell As Object Dim zipPath As String Dim unzipFolder As String Dim folderName As String Dim blocksFilePath As String Dim blocksContent As String Dim racksPattern As String Dim racksMatches As Object...

Bonjour à tous, après plusieurs recherches, je n'ai pas trouvé de solution à mon problème. Voici le sujet : Je dois faire une modification de masse sur une centaine de fichiers textes (Nom des fichiers : Blocks.xml, il se trouve chacun dans un dossier que j'ai dézippé auparavant, le répertoire...