Automatisme sur feuille

[HRDChris]

Bonjour a tous, je cherche une formule pour automatiser le passage de la case B8 à la case D8 dès saisie en B8. Puis après saisie de D8 impression puis retour à B8. et ainsi de suite. Un passe passe, les autres cases sont protégés dans ma feuille. En gros je désire B8>Ma Saisie>DEPLACEMENT>D8>Ma Saisie>IMPRESSION AUTOMATIQUE>retour automatique en B8. Je précise que je ne veux imprimer qu'une fois la donnée inscrite uniquement en D8. Merci de votre aide et bravo pour ce forum très intéressant et efficace.

 

[pierrejean]

bonjour HRDChris

je ne sais pas si c'est possible par formule

je regarde par macro (si cela te conviens)

voila ce que cela donne par macro

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = '$B$8' Then Range('D8').Select
If Target.Address = '$D$8' Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range('B8').Select
End If
End Sub

si tu n'es pas familier avec les macros je te guiderais pour l'installer

Message édité par: pierrejean, à: 17/02/2006 15:42

 

[HRDChris]

Merci de votre aide, votre code est presque juste c'est super merci, mais il reporte ma donnée de B8 en D8. Je veux entrer une donnée en B8 puis une autre en D8, cette case D8 une fois modifiée est imprimé puis retour immédiat en B8 pour un travail cyclique. Pouvez vous m'aiguillez a nouveau Svp ?

 

[HRDChris]

Après vérification votre formule marche impeccable, j'avais une autre macro qui faisait conflit avec cette dernière. Merci Pierre Jean :woohoo: