VBA truc et astuce si problème d'impression avec les titres de ligne et colonnes

[Guy_M]

Bonjour,

J'ai fais une macro qui pour chaque classeur d'un répertoire y copie une feuille provenant d'un autre classeur puis l'imprime.

Malheureusement, alors que tous les fichier sont sensé être identique, certains me provoquait l'erreur : "les titres à imprimer doivent être adjacents et constitués de lignes ou de colonnes entières"

Je n'ai pas réussi, dans les fichiers concerné à isoler le problème.

Pour contourner, j'ai ajouté ce code avant la copie de la feuille de calcul :

Dim Feuille As Worksheet 'A placer au début de la procédure

For Each Feuille In ThisWorkbook.Sheets
  With Feuille.PageSetup
    .PrintTitleRows = ""
    .PrintTitleColumns = ""
    .PrintArea = ""
    End With
Next

Évitez de sauvegarder le fichier ensuite, car vous perdriez les titres de ligne et colonnes et zones d'impression.

En espérant que cela sera utile à quelqu'un.

Salutations
Guy