Incrementation
Fermé
JSCH19
-
30 oct. 2019 à 20:01
Mike-31 Messages postés 18354 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 1 janvier 2025 - 31 oct. 2019 à 20:31
Mike-31 Messages postés 18354 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 1 janvier 2025 - 31 oct. 2019 à 20:31
A voir également:
- Excel numéroter les occurrences
- Incrémentation excel ne fonctionne pas ✓ - Forum Excel
- Excel incrémentation automatique numéro vba - Forum VB / VBA
- Renommer plusieurs fichiers incrémentation - Guide
- Incrémentation Numéro VBA Excel - Forum VB / VBA
- Souci d'incrémentation automatique sur EXCEL ✓ - Forum Excel
4 réponses
Mike-31
Messages postés
18354
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
1 janvier 2025
5 111
Modifié le 31 oct. 2019 à 21:04
Modifié le 31 oct. 2019 à 21:04
Bonsoir,
Dès le départ j'avais compris un manque de clarté et de terme mal exprimé comme incrémentation qui est plus utilisé dans le fait de déplacer des données ou formules par un cliqué/glissé
dans ton cas tu aurais parler d'incrémenté un compteur aurait été plus parlant et aurait permis de partir directement sur du VBA
en VBA il faut connaitre le langage ou chaque signe à son importance comme les guillemets
regarde ta ligne de commande
Sheets("ventes").Range("B2").Value = Sheets("ventes").Range("B2").Value + 1
et tu crées un format personnalisé en B2
"FACT-"000"-OCT"
Mais pourquoi passer par du VBA, il suffit de créer le format personnalisé et saisir simplement le numéro de facture 1 ou 2 etc et tu auras FACT-"001"-OCT, FACT-"002"-OCT etc
Dès le départ j'avais compris un manque de clarté et de terme mal exprimé comme incrémentation qui est plus utilisé dans le fait de déplacer des données ou formules par un cliqué/glissé
dans ton cas tu aurais parler d'incrémenté un compteur aurait été plus parlant et aurait permis de partir directement sur du VBA
en VBA il faut connaitre le langage ou chaque signe à son importance comme les guillemets
regarde ta ligne de commande
Sheets("ventes").Range("B2").Value = Sheets("ventes").Range("B2").Value + 1
et tu crées un format personnalisé en B2
"FACT-"000"-OCT"
Mais pourquoi passer par du VBA, il suffit de créer le format personnalisé et saisir simplement le numéro de facture 1 ou 2 etc et tu auras FACT-"001"-OCT, FACT-"002"-OCT etc
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 421
30 oct. 2019 à 20:39
30 oct. 2019 à 20:39
Bonjour
dans la cellule de la 1° ligne à numéroter:
="FACT-"&TEXTE(LIGNE(A1);"000")&"-OCT"
crdlmnt
dans la cellule de la 1° ligne à numéroter:
="FACT-"&TEXTE(LIGNE(A1);"000")&"-OCT"
crdlmnt
Raymond PENTIER
Messages postés
58836
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
25 janvier 2025
17 275
31 oct. 2019 à 01:25
31 oct. 2019 à 01:25
C'est curieux ! J'ai essayé, à mon tour, et ça marche parfaitement !
Fais un copier-coller de la formule, au lieu de la saisir au clavier.
Mais surtout, il faut la saisir dans la cellule A1 ! ...
Fais un copier-coller de la formule, au lieu de la saisir au clavier.
Mais surtout, il faut la saisir dans la cellule A1 ! ...
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 421
Modifié le 31 oct. 2019 à 06:53
Modifié le 31 oct. 2019 à 06:53
bonjour
Non, comme la formule fait référence à LIGNE(A1) pour le premier rang, elle peut être collée n'importe où dans la feuille.(et c'est le but) C'est seulement lorsqu'on utilise LIGNE() sans adresse qu'elle renvoie le N° de ligne qui la contient.
Non, comme la formule fait référence à LIGNE(A1) pour le premier rang, elle peut être collée n'importe où dans la feuille.(et c'est le but) C'est seulement lorsqu'on utilise LIGNE() sans adresse qu'elle renvoie le N° de ligne qui la contient.
Raymond PENTIER
Messages postés
58836
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
25 janvier 2025
17 275
31 oct. 2019 à 17:05
31 oct. 2019 à 17:05
Tout-à-fait exact !
J'ai été un peu trop pressé, et pas assez attentif ...
Merci, ami Vaucluse, et à bientôt.
J'ai été un peu trop pressé, et pas assez attentif ...
Merci, ami Vaucluse, et à bientôt.
via55
Messages postés
14512
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 janvier 2025
2 740
31 oct. 2019 à 02:21
31 oct. 2019 à 02:21
Bonjour à tous
Autre possibilité :
Ne rentrer que les nombres dans les cellules 1, 2 etc que tu peux incrémenter en tirant vers le bas ou par formule style =A1+1
Mettre les cellules en Format personnalisé et entrer comme type : "FACT-"000"-OCT"
Cdlmnt
Via
Autre possibilité :
Ne rentrer que les nombres dans les cellules 1, 2 etc que tu peux incrémenter en tirant vers le bas ou par formule style =A1+1
Mettre les cellules en Format personnalisé et entrer comme type : "FACT-"000"-OCT"
Cdlmnt
Via
PHILOU10120
Messages postés
6400
Date d'inscription
lundi 16 avril 2012
Statut
Contributeur
Dernière intervention
17 janvier 2025
812
31 oct. 2019 à 09:05
31 oct. 2019 à 09:05
Bonjour à tous
Changement du mois en automatique
="FACT-"&TEXTE(LIGNE(A1);"000")&"-"&CHOISIR(MOIS(MAINTENANT());"JAN";"FEV";"MAR";"AVR";"MAI";"JUN";"JUL";"AOU";"SEP";"OCT";"NOV";"DEC")
Changement du mois en automatique
="FACT-"&TEXTE(LIGNE(A1);"000")&"-"&CHOISIR(MOIS(MAINTENANT());"JAN";"FEV";"MAR";"AVR";"MAI";"JUN";"JUL";"AOU";"SEP";"OCT";"NOV";"DEC")
Bonjour,j ai un petit problème,depuis plus de deux jour je travaille pour incrémenter un No de facture j’y suis parvenu mais cela ne me suffit pas puisque je veux que mon numéro comprenne Des lettres-numero-mois ex:FACT-001-OCT mon problème n est pas de le mettre dans une celule avec des formules j ai essayer et j’y suis parvenu,je compte utiliser cette facture pour effectuer des Ventes donc j ai fait une Macro et c est la que je n’arrive pas a incrémenter la facture après chaque Vente.j ai crée une fonction qui m’a permis de l’obtenir... function (numero,Date)
Debut=‘’FACT-‘’
Milieu=Format(Mid(numero,6,3)+1,’’000 ‘’)
Fin=‘’-‘’&UCase(format(Date,’’MMM’’))
Nouveaunum=Debut&Milieu&Fin
Mais maintenant la mon problème c est de l’incrementer en VBA parce que cela me donne une erreur quand je fais ; sheets (‘’ventes’’).range(‘’b2’’).value=Sheets(‘’ventes ‘’).range(‘’b2).value +1
Debut=‘’FACT-‘’
Milieu=Format(Mid(numero,6,3)+1,’’000 ‘’)
Fin=‘’-‘’&UCase(format(Date,’’MMM’’))
Nouveaunum=Debut&Milieu&Fin
Mais maintenant la mon problème c est de l’incrementer en VBA parce que cela me donne une erreur quand je fais ; sheets (‘’ventes’’).range(‘’b2’’).value=Sheets(‘’ventes ‘’).range(‘’b2).value +1
Raymond PENTIER
Messages postés
58836
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
25 janvier 2025
17 275
31 oct. 2019 à 17:09
31 oct. 2019 à 17:09
Tu aurais pu préciser dès le départ que c'était une macro ...
