Re : Impression certaines cellules dans un autre onglet
Bonjour Yaloo,
j'ai adapté mon fichier avec ta macro: Super c'est ce que je voulais. Merci pour le coup de pouce.
Ci dessous je te mets la macro en question, juste pour que tu comprenne l'histoire de la date et du double-clic.
J'ai enlevé la condition date: il peut arriver que nous n'ayons jamais fait encore d'opération de maintenance.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveSheet.Unprotect Password:="Ok"
ActiveCell.Value = Date
Selection.Font.ColorIndex = 42
With Selection.Interior
.ColorIndex = 42
.Pattern = xlSolid
End With
Cancel = True
ActiveSheet.EnableSelection = xlUnlockedCells
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="ok"
'Impression feuille maintenance
'If IsDate(Target) Then
With Feuil10
.[C8] = [D8]
.[G8] = Cells(Target.Row, 4)
.[G9] = Target
.[E15] = Cells(8, Target.Column)
'.PrintPreview 'Pour essai
.PrintOut 'Pour impression réelle
Cancel = -1
End With
'End If
End Sub
Merci et peut être à bientôt.
Didier