Bonjour
SI vous connaissez le nombre total de lignes et de colonnes, mettons que la dernière colonne est la Z et la dernière ligne la 700
Alors vous pouvez peut être faire comme suit :
Columns("L:Z").Select
Selection.EntireColumn.Hidden = True
Rows("601:700").Select
Selection.EntireColumn.Hidden = True
Pour les sauts de page je maîtrise pas super, je sais qu'il faut utiliser la fonction HPageBreaks(i).Location = .Location = une "range" (pour les sauts horizontaux) (VPageBreaks(i).Location = ... pour les verticaux)