Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Is there an upper limit to the number of non-contiguous cells Excel can hold
in a range object? The Address property fatigues at 256 characters, but I could get no indication from Cells.Count that there is any upper limit (perhaps I ran out of patience) 1000 increment 00:00:03 total time = 00:00:03 2000 increment 00:00:25 total time = 00:00:27 3000 increment 00:01:05 total time = 00:01:32 4000 increment 00:02:06 total time = 00:03:38 5000 increment 00:03:10 total time = 00:06:48 .... 'Code for this test : '(I didn't let it run all the way to the 8,838,608 cells that 'could have been added on just one worksheet of course) Sub fghijx() Dim aRange(1 To 65536, 1 To 256) As Range, i As Long, j As Long Dim AllRange As Range On Error GoTo Err_ Set AllRange = Cells(2, 1) For j = 1 To 256 For i = 1 To 65536 If (j Mod 2) < (i Mod 2) Then Set aRange(i, j) = Cells(i, j) Set AllRange = Union(AllRange, aRange(i, j)) ' some code to measure progress End If Next i Next j Exit_Sub: Exit Sub Err_: MsgBox "col " & j & " row " & i & " Err # " & Chr(13) & _ Err.Number & " " & Err.Description Resume Exit_Sub End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
counting cells that are 0 in a range of non-contiguous cells | Excel Worksheet Functions | |||
copying and holding certain cells in the function | Excel Discussion (Misc queries) | |||
copying and holding certain cells in the function | Excel Discussion (Misc queries) | |||
pasting non-contiguous range of cells to new row, same cell locati | New Users to Excel | |||
Cells not holding format | Excel Discussion (Misc queries) |