Comment augmenter automatiquement un nombre lorsque le classeur est ouvert?

Si vous souhaitez augmenter automatiquement une cellule numérique de 1 lorsque vous ouvrez le classeur à chaque fois, vous pouvez bien sûr en ajouter 1 manuellement. Mais, existe-t-il une meilleure méthode pour ajouter automatiquement 1 pour le nombre lors de l'ouverture du document Excel?

Augmenter automatiquement un nombre lorsque le classeur est ouvert avec le code VBA

Augmenter automatiquement un nombre lorsque le classeur est ouvert avec le code VBA

Le code VBA simple suivant peut vous aider à ajouter automatiquement 1 pour la cellule numérique lorsque le classeur est ouvert à chaque fois, procédez comme suit:

1. Maintenez le ALT + F11 clés, et il ouvre le Microsoft Visual Basic pour applications fenêtre.

2. Dans le Projet-VBAProjet volet, double-cliquez Ce classeur ouvrir le Module, puis copiez et collez le code ci-dessous dans le module, voir capture d'écran:

Code VBA: Augmentez automatiquement un nombre lorsque le classeur est ouvert:

Private Sub Workbook_Open()
Worksheets("Sheet1").Range("A2") = Worksheets("Sheet1").Range("A2") + 1
End Sub

Notes: Dans le code ci-dessus, Sheet1 et A2 sont la feuille et la cellule contenant le nombre que vous souhaitez augmenter automatiquement. Veuillez les modifier selon vos besoins.

3. Ensuite, vous devez enregistrer le fichier Excel sous Cahier de travail Excel avec macro-activé format, voir capture d'écran:

À partir de maintenant, lorsque vous ouvrez ce classeur spécifique, le numéro de la cellule A2 de Sheet1 sera automatiquement ajouté 1.

Notes: Ce code n'est appliqué qu'à la cellule numérique.