ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Need help with For Each c In Worksheets("CV Table").Range("B:B").C (https://www.excelbanter.com/excel-programming/396896-need-help-each-c-worksheets-cv-table-range-b-b-c.html)

Ayo

Need help with For Each c In Worksheets("CV Table").Range("B:B").C
 
I want to run through a column using the:

For Each c In Worksheets("CV Table").Range("B:B").Cells,

statement but I want to start at Cell(6,6) all the way down to the last cell
in coulmn B:B with a value in it. How do I write the code for this. Thanks

Don Guillett

Need help with For Each c In Worksheets("CV Table").Range("B:B").C
 
try this idea
with Worksheets("CV Table")
lr=.cells(rows.count,"b").end(xlup).row
for each c in .range(.cells(6,6),.cells(lr,6))
'do your thing
next c
end with
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Ayo" wrote in message
...
I want to run through a column using the:

For Each c In Worksheets("CV Table").Range("B:B").Cells,

statement but I want to start at Cell(6,6) all the way down to the last
cell
in coulmn B:B with a value in it. How do I write the code for this. Thanks



Mike H

Need help with For Each c In Worksheets("CV Table").Range("B:B").C
 
Hi,

You don't actually tell us what you want to do and there is no cell(6,6) in
column B so I have assumed row 6.Try this:-

Sub sonic()
Dim myRange As Range
lastrowcolb = Worksheets("CV Table").Range("B65536").End(xlUp).Row
Set myRange = Worksheets("CV Table").Range("B6:B" & lastrowcolb)
For Each c In myRange
'do something
Next c
End Sub


Mike
"Ayo" wrote:

I want to run through a column using the:

For Each c In Worksheets("CV Table").Range("B:B").Cells,

statement but I want to start at Cell(6,6) all the way down to the last cell
in coulmn B:B with a value in it. How do I write the code for this. Thanks


Gary''s Student

Need help with For Each c In Worksheets("CV Table").Range("B:B").C
 
Use:

n = Cells(Rows.Count, "B").End(xlUp).Row
Set r = Worksheets("CV Table").Range("B1:B" & n)
For Each c In r
--
Gary''s Student - gsnu200742


"Ayo" wrote:

I want to run through a column using the:

For Each c In Worksheets("CV Table").Range("B:B").Cells,

statement but I want to start at Cell(6,6) all the way down to the last cell
in coulmn B:B with a value in it. How do I write the code for this. Thanks



All times are GMT +1. The time now is 04:00 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com