Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
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...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.