Thread: Sequential Number Generator Macro
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
merjet merjet is offline
external usenet poster
  
Posts: 812
Default Sequential Number Generator Macro
I forget the coloring.
Add these lines before "Loop":

Sheets("Sheet1").Cells(iRow, iCol).Interior.ColorIndex = xlNone
Sheets("Sheet1").Cells(iRow, iCol).Font.ColorIndex = 0
Sheets("Sheet1").Cells(iRow + 1, iCol).Interior.ColorIndex = 6
Sheets("Sheet1").Cells(iRow + 1, iCol).Interior.Pattern = xlSolid
Sheets("Sheet1").Cells(iRow + 1, iCol).Font.ColorIndex = 3

Hth,
Merjet

Reply With QuoteReply With Quote