Excel VBA

Résolu/Fermé
petit240 Messages postés 5 Date d'inscription samedi 12 mars 2011 Statut Membre Dernière intervention 23 décembre 2016 - 12 mars 2011 à 22:16
petit240 Messages postés 5 Date d'inscription samedi 12 mars 2011 Statut Membre Dernière intervention 23 décembre 2016 - 13 mars 2011 à 11:51
Bonjour,
Je vous écris car je ne suis pas très fort en VBA.
Voilà ma situation:
Dans une cellule il y' a un nombre (le numéro du ticket).
Et je veux qu'à chaque impression le nombre augmente de un en un.
Dans la mise en page:
"TICKET N°-" "1" puis en suite "TICKET N°-" "2"
sachant que "TICKET N°-" est dans la cellule adjacente.
Y a-t-il une solution?
Merci d'avance.

2 réponses

Réponse 1 / 2
Mike-31 Messages postés 18384 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 9 avril 2025 5 127
13 mars 2011 à 10:45
Salut,

Avec le peu d'information il est difficile d'écrire un code.

En supposant que Ticket n° : est en A1 et en B1 le numéro

crée un bouton activeX et colle ce code qui déclanchera l'impression en ajoutera 1 en B1

Private Sub CommandButton1_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
[B1] = [B1] + 1
End Sub
1
Réponse 2 / 2
petit240 Messages postés 5 Date d'inscription samedi 12 mars 2011 Statut Membre Dernière intervention 23 décembre 2016
Modifié par petit240 le 13/03/2011 à 12:23
Merci pour ton aide.
Mais comment faire pour créer un bouton activeX?
C'est bon j'ai compris tout seul comment affecter une macro ca a bien marché.
0