visualiser une selection VBa

[wrndid]

bonjour
je voudrais en click sur un bp visualiser
de b1 a ag1 j usqu a la ligne 34 sur une feuille
et
ce b50 a k50 j usqu a ligne 82 sur 2 feuille diferente en plein ecran
merci
j ai sa mai marche pas

With ActiveSheet.PageSetup
.PrintArea = "$B$1:$AG$34" And PrintArea = "$B$50:$AG$82"
.PrintQuality = 600
.CenterHorizontally = True
.CenterVertically = True
.Orientation = xlLandscape
.PaperSize = xlPaperA4
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

ActiveWindow.SelectedSheets.PrintPreview

 

[Compte Supprimé 979]

Re : visualiser une selection VBa

Bonjour wrndid,

En VBA la sélection de 2 plages ne se fait pas avec "AND" 😕

Essaye :

.PrintArea = "$B$1:$AG$34;$B$50:$AG$82"

A+

 

[wrndid]

Re : visualiser une selection VBa

merci ca marche avec : a la place de ;