Visualiser avant impression d'une zone sélectionnée au préalable sur la feu
Bonjour,
sur une feuille Excel (planning), je sélectionne à l'aide de la souris une zone (plusieurs cellules) que je souhaite imprimer
en cliquant sur un bouton présent sur la feuille.
Ce bouton lance une macro.
Je souhaite que cette macro me permette
- de pré-visualiser la zone choisie
- de demander la confirmation ou non de l'impression
- de lancer l'impression si confirmation
pourquoi cela se complique:
voici un exemple:
je souhaite imprimer les cellules de A31 à F... (selon la selection) et de AK(selon la selection)31 à BD....(selon la selection)
Mais en excluant toute les cellules qui sont "cachées" de G31 à AJ....
là je bloque
Je ne trouve pas la solution même après plusieurs essais.
Avez-vous une solution ?
merci à vous
jb
re,
j'ai trouver ce code qui permet d'imprimer sur une même feuille, plusieurs sélections non contiguës :
Sub PrintOutRange()
'Update 20150528
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
xRng2.Copy
Set xRng1 = xNewWs.Cells(xIndex, 1)
xRng1.PasteSpecial xlPasteValues
xRng1.PasteSpecial xlPasteFormats
xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
mais hélas il bug
merci pour votre aide
jb
bonjour,
une idée
merci à vous
jb