Ca y'est, j'ai excel.
Donc, ça n'a rien à voir avec ce que j'ai posté au dessus.
En fait, tu ne peux pas déclarer une variable avec une autre variable en paramètre (Dim Inv(a - 3, 3) ).
En solution, tu peux faire un Redim :
Code :
- Sub Matrices()
- Dim Inv
- Sheets("Sheet3" ).Activate
- a = Range("A65536" ).End(xlUp).Row
- ReDim Inv(a - 3, 3)
- For j = 0 To a - 4
- Inv(j, 0) = Cells(0, j + 3)
- Next j
- End Sub
|
Encore plus simple si tu veux mettre une plage dans un tablo :
Code :
- sub tablo()
- dim tabl as Variant
- tabl = Range("A1:A30" ).Value
- Range("B2:B31" ) = tabl
- end sub
|
---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"- Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1