Excel property needed

**MartinShort** · 08-25-2008, 06:52 PM

How about something like this?

Sub defineRange()
    Dim rng As Range
    Dim Y As Integer
    Y = 12 'Or whatever you want it to be.
    Set rng = Range("A1").Resize(Y, 3)

    rng.Select 'You should delete this line - I put it in so 
               'you could see what's happening to your range.
End Sub

HTH

**jb777** · 08-25-2008, 07:37 PM

Hi MartinShort,

I tryed something like that earlyer, but got an error so thought I did something wrong. I just tryed your code and it gives me the following error

Run-time error '1004':
Method 'Range' of object'_Global' failed

at

Set rng = Range("A1").Resize(Y, 3)

I tryed with diffrent Y's cause it might be outofbound.

What I tryed earlyer was something like worksheet.range("a1:f4").resize or so

Thank you, John

**MartinShort** · 08-26-2008, 03:23 AM

Hi John

A bit confused. I tried the code out (just to check if I'd done something stupid). It does work on my PC.

Can you post an example worksheet please and I'll see if I can help.

Martin