Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 694
Default Find last filled cell in a column

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells filled up and
then next three cells are empty and then again next five are filled up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 12
Default Find last filled cell in a column

Hi

how would i use your code iny my spreadsheet?!
my objective is filling a cell with the last filled cell in another column.

thanks

"sebastienm" wrote:

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells filled up and
then next three cells are empty and then again next five are filled up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Find last filled cell in a column

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)
Range("G9").Value = rgLastCell.Value

if the objective cell ig G9 and the "another" column is column A as an
example.

--
Regards,
Tom Ogilvy

"Hesham" wrote in message
...
Hi

how would i use your code iny my spreadsheet?!
my objective is filling a cell with the last filled cell in another

column.

thanks

"sebastienm" wrote:

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells filled up

and
then next three cells are empty and then again next five are filled

up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 12
Default Find last filled cell in a column

tom,
thanks for your reply. how would i implement this code into the sheet. where
do i actually write it?

thanks

"Tom Ogilvy" wrote:

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)
Range("G9").Value = rgLastCell.Value

if the objective cell ig G9 and the "another" column is column A as an
example.

--
Regards,
Tom Ogilvy

"Hesham" wrote in message
...
Hi

how would i use your code iny my spreadsheet?!
my objective is filling a cell with the last filled cell in another

column.

thanks

"sebastienm" wrote:

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells filled up

and
then next three cells are empty and then again next five are filled

up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.




  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Find last filled cell in a column

Sub PopCell()
Dim sh as Worksheet
Dim rgLastCell as range
set Sh = worksheets("Sheet1")
Set rgLastCell=sh.range("A65536").End(xlup)
sh.Range("G9").Value = rgLastCell.Value
End Sub

to Alt+F11 to go to the Visual Basic Editor. In the menu there, do
Insert=Module
Paste the code in the module that is inserted. Change the code to reflect
the sheet, cell and column as appropriate

do Alt+F11 to get back to excel.


When you want to run the macro, do
Tools=Macro=Macros, select PopCell and click Run

--
Regards,
Tom Ogilvy



"Hesham" wrote in message
...
tom,
thanks for your reply. how would i implement this code into the sheet.

where
do i actually write it?

thanks

"Tom Ogilvy" wrote:

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)
Range("G9").Value = rgLastCell.Value

if the objective cell ig G9 and the "another" column is column A as an
example.

--
Regards,
Tom Ogilvy

"Hesham" wrote in message
...
Hi

how would i use your code iny my spreadsheet?!
my objective is filling a cell with the last filled cell in another

column.

thanks

"sebastienm" wrote:

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells

filled up
and
then next three cells are empty and then again next five are

filled
up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.








  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 12
Default Find last filled cell in a column

Tom,

thanks once again. your help is highly appreciated. just 1 last request.

in the code you gave me i have to specify which cell to put the results
into. can we make the code such that it puts the address of the cell that is
selected in the spreadsheet automatically? rather than me changing the code
everytime.

or....is it possible that excel asks me to which cell i want to put the
results. popup msg or so.

thanks alot.

regards,

hesham
"Tom Ogilvy" wrote:

Sub PopCell()
Dim sh as Worksheet
Dim rgLastCell as range
set Sh = worksheets("Sheet1")
Set rgLastCell=sh.range("A65536").End(xlup)
sh.Range("G9").Value = rgLastCell.Value
End Sub

to Alt+F11 to go to the Visual Basic Editor. In the menu there, do
Insert=Module
Paste the code in the module that is inserted. Change the code to reflect
the sheet, cell and column as appropriate

do Alt+F11 to get back to excel.


When you want to run the macro, do
Tools=Macro=Macros, select PopCell and click Run

--
Regards,
Tom Ogilvy



"Hesham" wrote in message
...
tom,
thanks for your reply. how would i implement this code into the sheet.

where
do i actually write it?

thanks

"Tom Ogilvy" wrote:

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)
Range("G9").Value = rgLastCell.Value

if the objective cell ig G9 and the "another" column is column A as an
example.

--
Regards,
Tom Ogilvy

"Hesham" wrote in message
...
Hi

how would i use your code iny my spreadsheet?!
my objective is filling a cell with the last filled cell in another
column.

thanks

"sebastienm" wrote:

Hi VJ,

Dim rgLastCell as range
Set rgLastCell=Activesheet.range("A65536").End(xlup)

Regards,
Sébastien

"VJ" wrote:

Hi,

Is there any way I can find out the last filled cell in a column?

For exmaple I have col A and in that column first five cells

filled up
and
then next three cells are empty and then again next five are

filled
up. I
need to find the last cell in the column which is filled up.

Help would be appreciated.

Thanks in advance.






Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Find Filled Cell PrinceAli Excel Discussion (Misc queries) 1 August 11th 08 02:02 PM
Macro Request: Fill in empty cells with previous Filled cell in column Artis Excel Worksheet Functions 2 June 25th 07 08:30 PM
Need Formula or macro. If i enter today date in the cell (Row 1,Column 2) and on tab out, the column 1 cell should be filled with "corresponding Day" of the date kakasay Excel Discussion (Misc queries) 1 January 22nd 07 12:31 PM
go to last filled cell in a column shortcut inthestands Excel Worksheet Functions 2 October 30th 06 08:50 PM
How to find last filled in cell in a column? Cat Chowdy Excel Worksheet Functions 5 August 2nd 06 01:46 PM


All times are GMT +1. The time now is 05:49 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"