NUMEROTATION EXCEL 2010

NININE1953 -  
Bonjour,

J'essaie en vain de faire une macro pour numéroter automatiquement (N°facture + 1) à l'ouverture du modèle.

Les macros ne s'activent pas à l'ouverture du modèle et le numéro reste donc le même.

Je voulais ouvrir le modèle qui a donc le nouveau numero de facture, faire la facture et l'enregistrer sous comme d'habitude avec un autre nom de fichier bien sûr pour ne pas changer le modèle , à chaque fois il me dit que-c je dois enregistrer sous excel acceptant les macros, bon est-ce nécessaire car sinon il ne veut pas. Et après j'ouvre à nouveau mon module et le numéro n'a pas changé.

MERCI pour votre aide

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Mike-31
    Bonsoir,

    En supposant que le numéro facture est en cellule G5
    dans la Thisworkbook colle un de ces deux codes

    Private Sub Workbook_Open()
    [G5] = [G5] + 1
    ActiveWorkbook.Save
    End Sub

    si tu as plusieurs onglets, nomme l'onglet concerné, exemple pour la Feuil3

    Private Sub Workbook_Open()
    Sheets("Feuil3").[G5] = Sheets("Feuil3").[G5] + 1
    ActiveWorkbook.Save
    End Sub

    A+
    Mike-31

    Une période d'échec est un moment rêvé pour semer les graines du savoir.
    1. eriiic Contributeur
      Bonjour,

      Un modèle est protégé. Quand tu l'ouvres c'est un autre fichier qui est créé. Le n° dans le modèle reste donc inchangé et c'est tant mieux puisque c'est le principe.
      Il faudrait que ce n° soit sauvegardé dans un autre fichier (xls ou texte), récupéré, incrémenté pour ton nouveau classeur, et mis à jour dans ce fichier dédié.

      eric