Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
PMO
Bonjour,
Une piste (mais en VBA) avec le code suivant
1) copiez le code dans un module standard 2) sélectionnez la (les) cellule(s), ligne(s), colonne(s) que vous ne voulez pas imprimer. La multi sélection est permise. 3) lancez la macro "noPrintSelection"
Code à copier ***************** Sub noPrintSelection() Dim S As Worksheet Dim R As Range Dim C As Range ActiveSheet.Copy before:=Sheets(1) Set S = ActiveSheet Set R = Application.Intersect(Selection, S.UsedRange) For Each C In R C.Font.Color = C.Interior.Color Next C '### A quoter ou déquoter selon usage ### '--- Aperçu --- ActiveWindow.SelectedSheets.PrintPreview '--- Impression --- 'ActiveWindow.SelectedSheets.PrintOut '######################################## Application.DisplayAlerts = False S.Delete Application.DisplayAlerts = True End Sub *****************
Cordialement.
PMO Patrick Morange
Bonjour,
Une piste (mais en VBA) avec le code suivant
1) copiez le code dans un module standard
2) sélectionnez la (les) cellule(s), ligne(s), colonne(s) que vous
ne voulez pas imprimer. La multi sélection est permise.
3) lancez la macro "noPrintSelection"
Code à copier
*****************
Sub noPrintSelection()
Dim S As Worksheet
Dim R As Range
Dim C As Range
ActiveSheet.Copy before:=Sheets(1)
Set S = ActiveSheet
Set R = Application.Intersect(Selection, S.UsedRange)
For Each C In R
C.Font.Color = C.Interior.Color
Next C
'### A quoter ou déquoter selon usage ###
'--- Aperçu ---
ActiveWindow.SelectedSheets.PrintPreview
'--- Impression ---
'ActiveWindow.SelectedSheets.PrintOut
'########################################
Application.DisplayAlerts = False
S.Delete
Application.DisplayAlerts = True
End Sub
*****************
1) copiez le code dans un module standard 2) sélectionnez la (les) cellule(s), ligne(s), colonne(s) que vous ne voulez pas imprimer. La multi sélection est permise. 3) lancez la macro "noPrintSelection"
Code à copier ***************** Sub noPrintSelection() Dim S As Worksheet Dim R As Range Dim C As Range ActiveSheet.Copy before:=Sheets(1) Set S = ActiveSheet Set R = Application.Intersect(Selection, S.UsedRange) For Each C In R C.Font.Color = C.Interior.Color Next C '### A quoter ou déquoter selon usage ### '--- Aperçu --- ActiveWindow.SelectedSheets.PrintPreview '--- Impression --- 'ActiveWindow.SelectedSheets.PrintOut '######################################## Application.DisplayAlerts = False S.Delete Application.DisplayAlerts = True End Sub *****************
Cordialement.
PMO Patrick Morange
Jacques ALARDET
Bonjour,
Tu peux utiliser les affichages personnalisés 1. Créer une vue nommée "complète" 2. masquer la colonne C 3. Créer une vue nommée "réduite" 4. Afficher la vue complète pour travailler 5. afficher la vue réduite pour imprimer
J a c q u e s
"NOSPAME" <"jruegsegger(NOSPAME)"@daril-sa.com> a écrit dans le message de news:
bonjour le m.p.f.e.!!!
j'ai une petite colle à vous posez !
j'aimerais imprimer les cellules A1 à G30 sauf toutes les cellules de la colonne C.
Manuellement on y arrive en masquant la colonne puis en enlevant le masque.
Est-ce qu'il existe une option dans un menu pour indiquer qu'on ne veut pas imprimer cellule, colonne, ligne, etc...
dans le cas où l'on ne veut jamais imprimer la même cellule, colonne, etc...
merci des réponses !
Cordialement
JR
Bonjour,
Tu peux utiliser les affichages personnalisés
1. Créer une vue nommée "complète"
2. masquer la colonne C
3. Créer une vue nommée "réduite"
4. Afficher la vue complète pour travailler
5. afficher la vue réduite pour imprimer
J a c q u e s
"NOSPAME" <"jruegsegger(NOSPAME)"@daril-sa.com> a écrit dans le message de
news:evbIiVprIHA.3680@TK2MSFTNGP05.phx.gbl...
bonjour le m.p.f.e.!!!
j'ai une petite colle à vous posez !
j'aimerais imprimer les cellules A1 à G30 sauf toutes les cellules de la
colonne C.
Manuellement on y arrive en masquant la colonne puis en enlevant le
masque.
Est-ce qu'il existe une option dans un menu pour indiquer qu'on ne veut
pas imprimer cellule, colonne, ligne, etc...
dans le cas où l'on ne veut jamais imprimer la même cellule, colonne,
etc...
Tu peux utiliser les affichages personnalisés 1. Créer une vue nommée "complète" 2. masquer la colonne C 3. Créer une vue nommée "réduite" 4. Afficher la vue complète pour travailler 5. afficher la vue réduite pour imprimer
J a c q u e s
"NOSPAME" <"jruegsegger(NOSPAME)"@daril-sa.com> a écrit dans le message de news:
bonjour le m.p.f.e.!!!
j'ai une petite colle à vous posez !
j'aimerais imprimer les cellules A1 à G30 sauf toutes les cellules de la colonne C.
Manuellement on y arrive en masquant la colonne puis en enlevant le masque.
Est-ce qu'il existe une option dans un menu pour indiquer qu'on ne veut pas imprimer cellule, colonne, ligne, etc...
dans le cas où l'on ne veut jamais imprimer la même cellule, colonne, etc...