XL 2016 (Résolu)formule numero de recu 1

LABEHAUT · 26 Octobre 2016

Bonjour à tous le forum,

voici un petit fichier pour imprimer un reçu lors du payement de cotisation, je n'arrive pas à trouver une formule qui chaque fois que je fais une copie de l'onglet reçu mon numero de reçu augmente de 1 pour le suivant je joint le fichier
merci d'avance pour explications et réponses que vous pouvez me fournir.

belkacem_64 · 26 Octobre 2016

Bonsoir LABEHAUT

essai

Sub Iprimerecu()

Dim Rc As Worksheet
Set Rc = Sheets("Recu")
With Rc
.PageSetup.PrintArea = "A1:E14"
.Range("E2").Value = .Range("E2").Value + 1
.PrintOut
End With

End Sub

LABEHAUT · 27 Octobre 2016

Bonjour belkacem_64,
j'ai fait un essai cela marche, comme c'est tout ce que je demandé c'est impeccable
encore un grand merci belkacem

XL 2016 (Résolu)formule numero de recu 1

LABEHAUT

Guest

Pièces jointes

belkacem_64

Guest

LABEHAUT

Guest

Discussions similaires

XL 2016 (Résolu)formule numero de recu 1

LABEHAUT

Guest

Pièces jointes

belkacem_64

Guest

LABEHAUT

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency