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.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
