Hi Karthik,
'Try the following code:-
Sub karthik()
Dim a, b As String
Range("a65536").Select
Selection.End(xlUp).Select
b = ActiveCell.Address
Range("a1").EntireColumn.Select
While ActiveCell.Address <> b
If ActiveCell.Value = "" Then
a = ActiveCell.Address
MsgBox ("next blank cell is " & a)
Act
Dear Dave
this is the method i expect , it's working fine, thanks for your help
On Fri, Jun 5, 2009 at 4:22 AM, Dave Bonallack wrote:
> Hi,
> Try this:
> A = Cells(Rows.Count, 1).End(xlUp).Row + 1
> This will give you the first blank row number
> Regards - Dave.
>
> --
Hi,
Try this:
A = Cells(Rows.Count, 1).End(xlUp).Row + 1
This will give you the first blank row number
Regards - Dave.
Date: Thu, 4 Jun 2009 18:40:46 +0530
Subject: $$Excel-Macros$$ find next empty cell address
From: grli...@gmail.com
To: excel-macros@googlegroups.com
Dear All
my data started
try the below
dim row_count as double
row_count = 6
do while activesheet.cells(6, column_number*).value <> ""
msgbox row_count
loop
* enter the column number here
Nishant
On Jun 4, 6:10 pm, grlinks-karthik wrote:
> Dear All
>
> my data started in colomn "A" cell no 6 upto a50(Cell a1 to
