Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 31
Default cell number in collection

Hi,

I'm cycling through an object call cellcollection

Set cellCollection = Selection.SpecialCells
(xlCellTypeFormulas)

For Each cell In cellCollection

totcell = cellCollection.count
cellnow = ???
percent_done = cellnow / totcell

next cell

what's the syntax for cellnow..??

Thks

Chris

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,236
Default cell number in collection

cellnow = 0
For Each cell In cellCollection
cellnow = cellnow + 1
totcell = cellCollection.count
percent_done = cellnow / totcell

"Chris Gorham" wrote in message
...
Hi,

I'm cycling through an object call cellcollection

Set cellCollection = Selection.SpecialCells
(xlCellTypeFormulas)

For Each cell In cellCollection

totcell = cellCollection.count
cellnow = ???
percent_done = cellnow / totcell

next cell

what's the syntax for cellnow..??

Thks

Chris



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
help with data collection! brandon roland[_2_] New Users to Excel 1 August 8th 07 10:09 PM
Random cell/number and dont repeat selected cell/number Hector PR Excel Discussion (Misc queries) 0 October 16th 06 05:02 PM
sheet collection Tom Ogilvy Excel Programming 0 October 28th 03 03:15 PM
Is a Collection the best option? Bradley Dawson Excel Programming 1 August 31st 03 08:14 PM
Sum textboxes in a collection Mark[_18_] Excel Programming 1 August 28th 03 04:17 AM


All times are GMT +1. The time now is 03:43 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"