rechercher du max en definissant les 1ers chiffres

H

hoerwind

XLDnaute Barbatruc

• 13 Décembre 2012

• #2

Re : rechercher du max en definissant les 1ers chiffres

Bonjour,

Oui, c'est possible par une formule matricielle du type =MAX(SI(...
Si tu avais joint un petit exemple à ta question, je t'aurais volontiers montré comment faire.

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 13 Décembre 2012

• #3

Re : rechercher du max en definissant les 1ers chiffres

Bonjour Greg,Bonjour Hoerwind

un exemple c'est bien aussi parce que si tes numéros sont triés en alphanumérique, on peut jouer avec index et equiv ou recherchev

 

Vote positif 0 Vote négatif

G

greg62200

XLDnaute Nouveau

• 13 Décembre 2012

• #4

Re : rechercher du max en definissant les 1ers chiffres

colonne a on voit des numeros clients

je voulais trouver la formule et la transcrire en vba avec l'enregistreur de macro mais si tu veux le faire direct en vba c'est aussi bien ca m'evitera les droles de code et en + j'ai du mal a comprendre ses formular1c1 lol

 

Pièces jointes

• numclt.xlsm

  10.4 KB · Affichages: 38

Vote positif 0 Vote négatif

H

hoerwind

XLDnaute Barbatruc

• 13 Décembre 2012

• #5

Re : rechercher du max en definissant les 1ers chiffres

Re,

A essayer :
=MAX(SI(GAUCHE(A2:A23;4)="4110";A2:A23))
=MAX(SI(GAUCHE(A2:A23;4)="4114";A2:A23))
formules à valider en matricielle (Ctrl+Maj+Entrée)

 

Vote positif 0 Vote négatif

G

greg62200

XLDnaute Nouveau

• 13 Décembre 2012

• #6

Re : rechercher du max en definissant les 1ers chiffres

salut eric, on s'est croise

les N°clients viennent de textbox d'usf, je sais pas trop comment ils arriveront, construction en cours et finalisation ce soir je pense
est ce que la cellule garde son format ou est ce qu'elle prend un format specifique au textbox ? sachant que je stipule jms rien sur le format ds le code (je sais pas encore le faire ca )

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 13 Décembre 2012

• #7

Re : rechercher du max en definissant les 1ers chiffres

Re

il faudra quand même savoir si c'est du texte ou des nombres........

Penser peut-être aussi à utiliser les tableaux
exemple joint, feuil1 non trié
copie = trié (c qui est plus logique pour moi dans une base client mais chacun range son tiroir comme il veut... s'il s'y retrouve....)

 

Pièces jointes

• numcltES.xlsm

  22.3 KB · Affichages: 55

Vote positif 0 Vote négatif

G

greg62200

XLDnaute Nouveau

• 13 Décembre 2012

• #8

Re : rechercher du max en definissant les 1ers chiffres

merci eric mais j'arrive pas a faire fonctionner le "comptage"
en colonne a, 1ere ligne vide j'ai mis
=SI(Tableau1[[#Cette ligne];[Pro ??]]="oui";L6+1;L3+1) l6 et l13 sont les max respectifs et le oui indique si c'est un compte pro ou pas
resultat il met 0 et me fait une ligne bleue ?!?

sinon qu'est ce que ca apporte de + un tableau ?
est ce que les lignes se creent toutes seules ou faut il re-selectionner la zone apres chaque entree ??

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 13 Décembre 2012

• #9

Re : rechercher du max en definissant les 1ers chiffres

Re

je ne comprends pas trop ce que tu veux faire exactement
Hoerwind et moi avons tenté de réponder à ta question, mais quel est ton problème ???

 

Vote positif 0 Vote négatif

G

greg62200

XLDnaute Nouveau

• 13 Décembre 2012

• #10

Re : rechercher du max en definissant les 1ers chiffres

ce que je veux c'est que le numero client soit cree correctement (en respectant le 4e chiffre pour pro ou pas) pour les nouveaux clients que l'on inscrit

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 14 Décembre 2012

• #11

Re : rechercher du max en definissant les 1ers chiffres

Re

si tu nommes tes 2 cellules de calcul du max, par exemple maxpart et maxpro

le principe serait

Code:

Sub e()
monclientpro = "oui"
derlig = Sheets("feuil1").Range("A" & Rows.Count).End(xlUp).Row
If monclientpro = "oui" Then
    Range("A" & derlig + 1).Value = Range("maxpro").Value + 1
Else
    Range("A" & derlig + 1).Value = Range("maxpart").Value + 1
End If
End Sub

n esachant pas où récupérer l'info pro ou pas (texbox??) j'ai mis la variable en dur : monclientpro

 

Vote positif 0 Vote négatif