Incrementation Numero de facture
Bonjour,
J'ai integrer un bouton à ma feuille avec la macro suivante qui me donne + 1 à mes numeros de factures.
[size=85]Sub plus()
'
' plus Macro
'
' Touche de raccourci du clavier: Ctrl+p
'Dim num As Integer
Range("D17").Select
num = Range("D17").Value
num = num + 1
Range("D17").Value = num
End Sub[/size]
Cependant mes numéro de facture sont F0001 F0002 etc ...
Quand je clique sur le bouton, j'ai une erreur incompatibilité de type et ca me met en jaune la ligne
num = num + 1
Ca fonctionne si je met des numeros de facture 0001 0002 mais le F me donne cette erreur.
Quelqu'un peut m'aider?
bonjour
et si tu mets ton numéro dans une cellule et le f dans une autre c'est pas bon
pascal
c'est ce que j'ai fini par faire, merci
Bonjour,
l'erreur est du au fait d'additionner une valeur numérique à de l'alphanumérique.
Plutôt que de modifier votre code, il vous suffit de modifier la mise en forme de votre cellule, clic droit, mise en forme, sélectionnez "personnalisée" puis dans le "type" mettez : "F"0000.
Ensuite il vous suffit de mettre un chiffre dans la cellule, les zéros manquants sont ajoutés et le F en début également.
Après il faut voir sur la suite de votre fichier si cela ne coince pas.
En gros votre facture porte le numéro 13 pour Excel (et les calculs éventuels ou formules...) mais visuellement pour l'utilisateur et l'impression elle de la forme F0013.
@ bientôt
LouReeD
Merci louree j'ai réussi. Par contre pourquoi il faut obligatoire le . à la fin de "F"0000.
Bonjour,
à la fin d'une phrase je met un point. (comme celui-ci !
Donc pas de point sur le format
@ bientôt
LouReeD