Bonjour Cappe pierre,
Le résultat devra se faire dans un fichier texte.
Je trouve un problème pour créer une chaîne centrée et encadrée pour la faire écrire dans un fichier texte ensuite.
Les lignes créées seront sauvegardées dans un tableau qui représente le texte complet de la page à transférer (WriteLine) dans le fichier texte résultant.
For i = 0 To 2
.WriteLine TxtTitre(i) & Chr(10)
Next i