Range Manipulation

[Comfy]

I'm wondering whether it is possible to manipulate multiple cells in a range at the same time.

EG

Dim rng As Range
Set rng = Range(Cells(1, 1), Cells(4, 4))

I can edit one cell rng(1).Formula or rng(5).Value

but is it possible to select a range within that range

rng(1 - 5)??

 

[MickG]

Example:-

Dim rng As Range
Set rng = Range(Cells(10, 1), Cells(20, 5))
MsgBox rng.Address
MsgBox rng.Range(Cells(5, 1), Cells(10, 5)).Address

Mick

 

[Comfy]

Cheers Mick

 

[Comfy]

It's taken me 3 days to get where I am and I think this is my final hurdle.

This works:

rng.Range(Cells(1, 3), Cells(1, 3)).Value = Application.WorksheetFunction.Round((Cells(i, NBVCol) / (Cells(i, LifeCol).Value) * (Cells(i, LifeCol).Value - 6)), 2)

This doesn't:

rng.Range(Cells(1, startQ + 1), Cells(1, 4)).Value = rng.Range(Cells(1, startQ + 1), Cells(1, 4)).Value + Application.WorksheetFunction.Round((ADrng(i) / (Life - (i - 1))) * 3, 2)

I can only assume it's because I'm trying to add a single value to an array of cells.

Does anyone know if that's correct and if so how to over come it?

Thanks,
/Comf

 

[Comfy]

nvm.

Used Evaluate(rng.......Address & "+" & Round(........))