VBA conditional selection of ranges in table

[zeno]

[h=2][/h]

Hi,

I have an Excel table with different dates, times, etc. This table can be divided into 3 ranges or arrays, based on column 'C'.

'A' --- 'B' --- 'C'
date - time - 1
date - time - 1
date - time - 2
date - time - 3
date - time - 3
date - time - 3
etc.

I'd like to know how in <acronym title="visual basic for applications" style="border-width: 0px 0px 1px; border-bottom-style: dotted; border-bottom-color: rgb(0, 0, 0); cursor: help; ">VBA</acronym> I can define the 3 different ranges (or arrays) for a variable number of rows. Every range would contain the 3 columns.

Thank you for your help.​

 

[zeno]

I see that I can define the whole table as range with the following code:

Set rng=Range("A2:C" & end_row)

But I would have to compare between the 3 different ranges. So how can I find the last row of '1' in column 'C', the rows of '2' and those of '3'?

 

[zeno]

I'm trying with the following code, which does not work. I thought that the value of 'D2' would be taken, but instead it is copying the whole table?

Sheets("Sheet1").Range("A2:J" & Range("D2").End(xlDown).Row).Copy _
   Destination:=Sheets("Sheet2").Range("A2")

 

[zeno]

I'm looking into a 'Range.Group' method, but this seems to be possible if the object is a single cell? Possibly multiple-area ranges could work.
Thank you for any suggestions.