Creer un tableau vba

Résolu
blalaa Messages postés 171 Statut Membre -  
blalaa Messages postés 171 Statut Membre -
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

  1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
     
    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
    1. blalaa Messages postés 171 Statut Membre
       
      bonjour

      merci bcp
      ca marche tres bien
      0