Scroll when importing data

[knut]

Excel 2007

I have a VBA-routine that imports data from an external source. There will
be hundreds of rows imported, and this takes several minutes to complete. I
would like to always have the last imported row visible. As it is now the
page does not scroll as the import takes place.
Does anyone understand what I am after, and does anyone have a solution? I
do not have the VBA-routien at hand right now so I can't share it with you.

Thanx
Knut

[Gary Keramidas]

you can try adding something like this to the end of your routine, just change
the column letter.

lastrow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
Application.Goto ActiveSheet.Range("A" & lastrow), scroll:=True

--

Gary Keramidas
Excel 2003

"knut" <nomail@please> wrote in message
news:%23ot7py%23jKH...@TK2MSFTNGP02.phx.gbl...

[Roger Govier]

Hi

I usually like to see that last few rows of data when i jump to the end of
the list, so code something like the following after your copy routine
should work

Dim lr As Long
lr = Cells(Rows.Count, 1).End(xlUp).Row
Cells(lr, 1).Activate
ActiveWindow.ScrollRow = lr - 6

--
Regards
Roger Govier

"knut" <nomail@please> wrote in message

news:#ot7py#jKHA...@TK2MSFTNGP02.phx.gbl...

> __________ Information from ESET Smart Security, version of virus
> signature database 4752 (20100107) __________
>
> The message was checked by ESET Smart Security.
>
> http://www.eset.com
>
>
>

__________ Information from ESET Smart Security, version of virus signature database 4752 (20100107) __________

The message was checked by ESET Smart Security.

http://www.eset.com