numéroter des pièces (Excel)
#1
Débutant XLPages

Inscription: 29/10/2013

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 29-10-2013 11h13

bonjour à tous,

 

dans la colonne A je rentre des dates de pièces (xx/xx/20xx).

- en B1 il me faut automatiquement: 20xx-1

(c'est à dire l'année de la colonne A et le numéro de la pièce, donc+1 par rapport à la pièce précédente)

- en B2 il me faut automatiquement: 20xx-2

- en B3 il me faut automatiquement: 20xx-3

etc...

sachant qu'à chaque nouvelle année on repart à 1.

est ce que quelqu'un a la solution?

merci

 

Hors Ligne
Rapport   Haut 

Re: numéroter des pièces (Excel)
#2
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 29-10-2013 17h41

Bonsoir Clem-64400, bonsoir à tous,

 

 

On doit pouvoir faire plus joli mais vois si le fichier joint peut t'aider, j'ai appliqué cette formule en B2 et tirée vers le bas:

=SI(A2<>0;(ANNEE(A2)&" - "&SOMMEPROD((ANNEE(A$2:A2)=ANNEE(A2))*1));"")

Bien à toi,

 

mth

Pièce jointe:
xlsx Clem.xlsx   [ Taille: 12.95 Ko - Téléchargements: 475 ]
Hors Ligne
Rapport   Haut 

Re: numéroter des pièces (Excel)
#3
Débutant XLPages

Inscription: 29/10/2013

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 30-10-2013 09h48

oui ca marche bien.

si ca pouvait se mettre automatiquement (au lieu de tirer à chaque fois) se serait encore mieux, mais en attendant je te remercie ;)

Hors Ligne
Rapport   Haut 

Re: numéroter des pièces (Excel)
#4
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 30-10-2013 21h49

Bonsoir Clem 64400,

 

Tu peux faire une petite macro évènementielle dans ta feuille qui placera la formule à chaque fois que tu saisis une date dans la première colonne, par exemple:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 And IsDate(Target) = True Then
    Target.Offset(0, 1).FormulaR1C1 = _
        "=IF(RC[-1]<>0,(YEAR(RC[-1])&"" - ""&SUMPRODUCT((YEAR(R2C[-1]:RC[-1])=YEAR(RC[-1]))*1)),"""")"
End If

End Sub

Bien à toi,

 

mth

Pièce jointe:
xlsm Clem.xlsm   [ Taille: 20.51 Ko - Téléchargements: 464 ]
Hors Ligne
Rapport   Haut 

Re: numéroter des pièces (Excel)
#5
Débutant XLPages

Inscription: 29/10/2013

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 31-10-2013 10h10

je te cache pas que je n'ai rien compris.. mais c'est pas grave je vais simplement tirer sur 50 000 ligne ca fera l'affaire.

merci encore

 

Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes