Redimensionner un range

[Gucciz]

Hello à tous,
Avec vba, j'ai de gros soucis avec les ranges.
Mon souci, c'est que j'ai déclaré une variable range et affecter à cette variable range un champ ligne de ma feuille Excel, comme ci-dessous:

Set GeoData = Range(Cells(FundLine, ColD), Cells(FundLine, ColE))

A ce propos, VBA m'affiche le message d'erreur suivant "Application-defined or object-defined error".

Mais ma question est la suivante:
Comment sous vba peut-on modifier une variable range 1 dimension en une variable range deux dimensions.
Exemple: 1 2 3 4 5 6 ==> 1 2 3
4 5 6

Avec d'autres langages comme scilab, j'arrive à redimmensionner facilement tout en conservant les données mais là sur vba, je bloque.

Merci de votre aide,

GucciZ

 

[flyonets44]

Re : Redimensionner un range

Bonjour
tu peux corriger ton problème comme suit

Dim Y&, Col&
y=Cells(rows.count, 1).End(xlUp).Row + 1
col =Cells.Find("*", [A1], -4123, , 2, 2).Column
Set GeoData = Range(Cells(1, 1), Cells(y, col))

Cordialement
flyonets

 

[Gucciz]

Re : Redimensionner un range

Je n'ai absolument rien compris...