Numérotation dans excell de 200 en 200

Résolu/Fermé
Signaler
Messages postés
4
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
17 mars 2013
-
Messages postés
26318
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
7 décembre 2021
-
Bonjour, je dois numéroter des couvertures de 340001 à 460000, mais de 200 en 200, sois 600 numéros. Donc, 340001 - 340201 - 340401 ... etc.
Novice en excell, merci de me donner l'information.
dans l'attente,
bonne journée



3 réponses

Messages postés
26318
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
7 décembre 2021
6 135
Bonjour
suffirait de savoir ce que vous appelez des couvertures?
A toutes fins utiles, à adapter:
en A1: 340001
en A2: 342001
sélectionner A1 avec A2
Tirer vers les bas sur la hauteur pour atteindre 460001 (ligne 616)
crdlmnt


Errare humanum est, perseverare diabolicum
Messages postés
4
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
17 mars 2013

Bonjour,
Merci de votre réponse.
Ce sont des couvertures de carnets sur lesquelles il y a 1 seul numéro, le 1er, 1ère page : 340001. Je n'ai donc qu'une cellule dans ma page.
Page 2 : 1 cellule au même endroit que la une, et n° 340201 etc. jusqu'à 460000.J'espère avoir été suffisamment clair.
Merci de votre solution
Cordialement
Messages postés
26318
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
7 décembre 2021
6 135
OK, vous avez donc su adapter:je pense
340001 dans la première couverture
340201 dans la deuxiéme
sélectionner 2 couvertures complètes
tirer sur le champ jusqu'à 460001

En variante:
une feuille couverture avec un seul modèle
clic droit sur le nom de la feuille, et choisir "visualiser le code"

coller ce libellé:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Column = 1 And Target.Row = 1 Then
s = Cells(3, 3).Value + 200
Cells(3, 3).Value = s
Application.CutCopyMode = False
Cells(3, 3).Select
End If

End Sub



La valeur de la cellule B3 augmente de 200 à chaque fois que vous sélectionnez A1

Pour ajuster à vos besoins, dans le code
Cells(3, 3) représente la cellule 3° ligne et 3° colonne de la feuille.

Crdlmnt
Messages postés
4
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
17 mars 2013

C'est OK, merci beaucoup
Messages postés
26318
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
7 décembre 2021
6 135
Attention si vous utilisez la macro, je viens de corriger le texte.