Creer un tableau vba

Résolu
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention   -  
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

1 réponse

Réponse 1 / 1
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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

0
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour

merci bcp
ca marche tres bien
0