[RESOLU] Dimensions d'un range sélectionné - VBa

Hieu · 4 Août 2016

Bonjour,

Supposons que je sélectionne B2:E4. Existe-t-il des fonctions similaires à Lbound/Ubound ?

L'idée :

VB:

Function Llargeur(R As Range)
Llargeur =    '  ==> dans mon exemple 1 (ou 1)
End Function
Function Ulargeur(R As Range)
Ulargeur =    '  ==> dans mon exemple 4 (ou 3)
End Function

Merci,

vgendron · 4 Août 2016

hello: je crois que tu peux avoir l'info avec
R.rows.count
et R.columns.count

Hieu · 4 Août 2016

Slt vgendron,

ça ne marche pas...

Yurperqod · 4 Août 2016

Bonjour le forum

Cela fonctionne si ton code VBA est mis dans un module standard (et pas dans le code de la feuille)

VB:

Option Explicit
'Le code est copié dans un module standard
'(Module1 par exemple)
Function Llargeur(R As Range)
Llargeur = R.Columns.Count  ' ==> dans mon exemple 1 (ou 1)
End Function
Function Ulargeur(R As Range)
Ulargeur = R.Rows.Count   '  ==> dans mon exemple 4 (ou 3)
End Function

Hieu · 4 Août 2016

Au temps pour moi !!
Tellement voulu faire un exemple rapide !
Merci à toi

[RESOLU] Dimensions d'un range sélectionné - VBa

Hieu

XLDnaute Impliqué

vgendron

XLDnaute Barbatruc

Hieu

XLDnaute Impliqué

Pièces jointes

Yurperqod

XLDnaute Occasionnel

Hieu

XLDnaute Impliqué

Discussions similaires