Split Une explication sur l’utilisation de Split(FL1.UsedRange.Address, « $ »)(4) : Worksheets(« Feuil1 »).UsedRange.address donne l’adresse de la plage de données sous la forme « A1: » & DernièreColonne & dernièreLigne » Par exemple « $A$1:$H$75 » En réalité on utilisera Split(Worksheets(« Feuil1 »).UsedRange.address, « $ ») ou Split(FL1.UsedRange.address, « $ ») En utilisant « $ » comme séparateur de données, Split(« $A$1:$H$75 », « $ ») crée un tableau de taille 5 (0 à 4) de cette adresse Exemple : Code :Sélectionner tout /// Sub Ex1() Dim adres As Variant, DerCol As Variant, DerLig As Long adres = Split(« $A$1:$H$75 », « $ ») adres(0) = « » adres(1) = « A » adres(2) = « 1 » adres(3) = « H » adres(4) = « 75 » ‘donne MsgBox Split(« $A$1:$H$75 », « $ »)(4) ‘Dernière ligne = 75 MsgBox Columns(Split(« $A$1:$H$75 », « $ »)(3)).Column ‘Dernière colonne (H) que Columns convertit en numéro (8) End Sub ///