Creer un tableau vba [Résolu/Fermé]

Signaler
Messages postés
167
Date d'inscription
mercredi 18 avril 2018
Statut
Membre
Dernière intervention
24 mars 2020
-
Messages postés
167
Date d'inscription
mercredi 18 avril 2018
Statut
Membre
Dernière intervention
24 mars 2020
-
Bonjour,

je souhaiterai récupérer dans une colonne le numéro le plus grand, le probleme c que dans ma colonne les numero sont pas ecrit directement
exemple

OB_1
OB_2
OB_3
OB_5
OB_9
OB_7
.
.
.

jai trouver un code qui recupere le numer eleve dans la colonne 2 mais ca marche pas dans mon cas (au dessus )

Nombre = Application.WorksheetFunction.Large(Columns(2), 1)



merci davance pour vos reponses

1 réponse

Messages postés
29594
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
25 septembre 2020
2 791
Bonjour,

Via une boucle éventuellement
Sub test()

Dim rng As Range
Set rng = Range("B1:B500")
Dim C As Range
Dim splitC As Variant
Dim num As Integer
Dim MaxNum As Integer

MaxNum = 0
For Each C In rng
    If C.Value <> "" Then
        splitC = Split(C.Value, "_")
        num = splitC(1)
        If num > MaxNum Then MaxNum = num
    End If
Next
MsgBox "Le plus grand est :" & MaxNum




End Sub

Messages postés
167
Date d'inscription
mercredi 18 avril 2018
Statut
Membre
Dernière intervention
24 mars 2020

bonjour

merci bcp
ca marche tres bien