Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Finding next empty empty cell in a range of columns
I have been through the posts here and can not find exactly the same senario
as I want to perform. I have a spreadsheet where data will be held in columns for people. Each person has its own column. I want to be able to place a persons name in the heading of each column. So I am trying to find the next empty column in row 3 to place the name. The code I have used but does not appear to work is NextCol = Application.WorksheetFunction.CountA(Range("D3:W3" )) + 1 It always returns a value of 1. This code is in a commandButton(Click) proceedure. I thought it would look at the range and give me the next column free as a response? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Finding next empty empty cell in a range of columns
maybe...
Dim NextCol as long with activesheet nextcol = .cells(3,.columns.count).end(xltoleft).column + 1 end with But the only way I would think your code wouldn't work is if the code was looking at the wrong sheet: NextCol _ = Application.WorksheetFunction.CountA(worksheets("S heet99").Range("D3:W3")) + 1 UncleBun wrote: I have been through the posts here and can not find exactly the same senario as I want to perform. I have a spreadsheet where data will be held in columns for people. Each person has its own column. I want to be able to place a persons name in the heading of each column. So I am trying to find the next empty column in row 3 to place the name. The code I have used but does not appear to work is NextCol = Application.WorksheetFunction.CountA(Range("D3:W3" )) + 1 It always returns a value of 1. This code is in a commandButton(Click) proceedure. I thought it would look at the range and give me the next column free as a response? -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Finding next available empty cell in a row | Excel Programming | |||
Finding the first empty cell in a column | Excel Programming | |||
automatically finding the first empty cell | Excel Programming | |||
Finding first (end of range) empty cell | Excel Programming | |||
Finding the next empty cell. | Excel Programming |