Hallo folks
I have started an application in Excel.
Column 1 or A contains codes of people names.
I want the vba code to find the next empty column (which will be B).
I want to place data in B until i have reached the length
of FILLED column A (Find the next empty row in column B)
Only then I want the code to find the next empty column.
The code to find the next empty column is as follows and works just fine:
Dim NextEmptyCol As Long
NextEmptyCol = Cells.Find("*", [A1], , , xlByColumns, xlPrevious).Column + 1
MsgBox "Column Number" & " " & NextEmptyCol & vbCr & _
"Or column letter """ & Replace(Cells(1, NextEmptyCol).Address(0, 0), 1, "") & """", vbInformation, "The next empty Column is ..."
[TABLE="width: 500, align: center"]
A
[/td]B
[/td]C
[/td]D
[/td]E
[/td]Teachers
[/td]AC
[/td]PT
[/td]JC
[/td]WT
[/td]
[/TABLE]
I need assistance filling column B with data until the length of filled
column A had been reached. I can use all assistance I can get.
Thanks folks.
crow