Impression certaines cellules dans un autre onglet

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

didier09

XLDnaute Occasionnel
Bonjour,

Nous nous servons depuis plusieurs années d'un fichier qui nous permet de suivre la maintenance de nos équipements.
Il nous faudrait un suivi "papier" pour plus de traçabilité.
A ce jour nous double-cliquons sur une cellule pour redéfinir la date de notre intervention. En fonction de cette date nous programmons l'intervention suivante.
Il faudrait qu'en fonction de ce double-click nous éditions l'opération réalisée. Je joins un fichier pour plus de clarté...

Sur l'onglet 1 nous retrouvons nos opérations de maintenance, et l'onglet 2 sera imprimé à chaque double-click.
Je souhaiterais que l'on récupère la date, la valeur A1, qui concerne l'atelier, la valeur A3 qui concerne l'équipement, La valeur C1 qui décrit l'opération, tout ça dans les cellules de l'onglet 2 impression.

Par avance merci de vos retour.

Didier
 

Pièces jointes

Re : Impression certaines cellules dans un autre onglet

Bonsoir Yaloo,

Désolé,en formation (Pas Excel...) toute la journée et pas moyen de se connecter à internet...
Merci pour ton aide. j essais d'adapter à mon fichier et je te fais un retour.

Le double-clic est utilisé dans mon fichier pour mettre à jour la date de l'opération de maintenance. Je m'en sers du coup pour lancer aussi l'impression.

A+++
Didier
 
Re : Impression certaines cellules dans un autre onglet

Bonsoir Didier,

Le double-clic te permet de rentrer dans la cellule mais pas de mettre à jour la date.
Tu pourrais très bien sélectionner la cellule puis taper la nouvelle date directement.
Dis-moi si la macro fonctionne correctement pour toi.

A+

Martial
 
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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour