chercher l'erreur

[yubstart]

Bonjour,

est ce que quelqu'un saurait dire pourquoi les messages affichés lors de l'exécution du code suivant sont différents

                            Sub somme_du_mois()
       


    selection_plage_date = Application.WorksheetFunction.Max(Range("B11", Range("b65536").End(xlUp)))
    MsgBox Format(selection_plage_date, "mm/yyyy")
    
    
    plage_mois_teste = Range("B11", Range("b65536").End(xlUp))
    selection_plage_date1 = Application.WorksheetFunction.Max(plage_mois_teste)
    MsgBox Format(selection_plage_date1, "mm/yyyy")
End Sub

Où la colonne b contient des dates sour la forme mm/yyyy

 

[yubstart]

Re : chercher l'erreur

bon finalement bhbh m'a donné une solution :

Sub somme_du_mois()
Range("B11", Range("b65536").End(xlUp)).Name = "plage_mois_teste"
selection_plage_date1 = Application.WorksheetFunction.Max([plage_mois_teste])
MsgBox Format(selection_plage_date1, "mm/yyyy")
End Sub