stocker valeur d'une plage

Pierrot93

XLDnaute Barbatruc

• 8 Novembre 2007

• #2

Re : stocker valeur d'une plage

Bonjour Cookie

essaye peut être comme ci dessous :

Code:

Dim t() As Variant
t = Range(Cells(7, 21), Cells(10, 21))

stocke les valeurs dans un tableau virtuel.

bonne journée
@+

 

Vote positif 0 Vote négatif

C

cookie57

XLDnaute Nouveau

• 8 Novembre 2007

• #3

Re : stocker valeur d'une plage

merci Pierrot...mais ca ne marche toujours pas..

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Novembre 2007

• #4

Re : stocker valeur d'une plage

Re

qu'est ce qui ne fonctionne pas... mets peut être le code complet utilisé...

@+

 

Vote positif 0 Vote négatif

C

cookie57

XLDnaute Nouveau

• 8 Novembre 2007

• #5

Re : stocker valeur d'une plage

code du style, je souhaite recuperer la valeur de la selection:

Sub macro()

Dim t() As Variant
Dim total As Long
sheets("x").Select

t = Range(Cells(7, 21), Cells(10, 21))

total = t

End Sub

et ca plante!!!

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Novembre 2007

• #6

Re : stocker valeur d'une plage

Re

c'est normal, "t" est un tableau virtuel et contient donc toutes les valeurs de la plage soit x valeurs. Essaye plutot comme ceci :

Code:

total = WorksheetFunction.Sum(Range(Cells(7, 21), Cells(10, 21)).Value)

@+

 

Vote positif 0 Vote négatif

C

cookie57

XLDnaute Nouveau

• 8 Novembre 2007

• #7

Re : stocker valeur d'une plage

merci Pierrot, c'est super ca marche

le code que je cherchais est effectivement celui la :
total = WorksheetFunction.Sum(Range(Cells(x, x), Cells(x, x)).Value)

Encore merci a toi

a +

 

Vote positif 0 Vote négatif