[XL-2007] Dimensions d'une plage de cellule ? (avec Range.)

[Kwick]

Bonjour à tous

Comment savoir les dimensions d'une plage de cellule ?

Je voudrais une fonction 'dimensions_plage' ayant pour paramètre un Range et qui renvoie les dimensions de la plage.

Code :

1
2
3
4
Type Dimensions
largeur As Integer
hauteur As Integer
End Type

Code :

1
2
3
4
5
6
Function dimensions_plage(p As Range) As Dimensions
 
    Dimensions.largeur= p."????"
    Dimensions.hauteur= p."????"
 
End Function

merci de m'aider

[Qwazerty]

Salut

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Type Dimensions
    largeur As Integer
    hauteur As Integer
End Type
Function dimensions_plage(p As Range) As Dimensions
 
    dimensions_plage.largeur = p.Width
    dimensions_plage.hauteur = p.Height
 
End Function
 
Sub test()
Dim LaDimension As Dimensions
LaDimension = dimensions_plage(Range("A1:B2"))
End Sub

A++
Qwaz

[Pierre Fauconnier]

Salut..

Marrant.. Moi, j'avais compris Dimensions comme étant le nombre de lignes et de colonnes

Code :

1
2
    Dimensions.largeur= p.Columns.Count
    Dimensions.hauteur= p.Rows.count

Si c'est "ma" solution, il est préférable d'utiliser des Long plutôt que des integer

[Qwazerty]

Ha oui en effet, pas pensé a ça et je crois qu'on a plus personne pour trancher ^^
++
Qwaz

[Pierre Fauconnier]

Bah...

il aura les deux solutions pour le prix d'une seule question

Bonne soirée

[Kwick]

Salut..

Marrant.. Moi, j'avais compris Dimensions comme étant le nombre de lignes et de colonnes

Code :
Dimensions.largeur= p.Columns.Count
Dimensions.hauteur= p.Rows.count

Si c'est "ma" solution, il est préférable d'utiliser des Long plutôt que des integer

Merci ! C'était ça !

[Qwazerty]

arff
Bien
++
Qwaz

[Pierre Fauconnier]

Résolu?? => (en bas à gauche du premier message de la discussion. Merci.