Assuming the data is contiguous from F8 downward the cut and paste code
would look like this:

Range("F8", Range("F8").End(xlDown)).Cut Range("E8")

--
Jim
"Neddy" wrote in
message ...
|
| Hi,
|
| Excel 97
| I have a macro attached to a button that copies previously marked data
| from a
| web page to cell D8 on a tempory download sheet, where it is formatted
| and then copied to another sheet.
|
| Sub DownloadTABdata()
| '
| ' DownloadTABdata Macro
| ' Macro recorded 1/06/05 by IBM
| '
| ActiveSheet.PasteSpecial Format:="Text", Link:=False,
| DisplayAsIcon:= _
| False
|
|
| End Sub
|
| Now the data arrives with a list of numbers in col D8:Dxx and names in
| col F8:Fxx. I want to move the data in F8:Fxx to E8:Exx. The data
| range is variable from , say, 6 to 24 items.
|
| After the column move, I want that range (D8:Exx) marked ready for
| copying on to another sheet.
|
| Can anyone help with a bit of code to accomplish this task?
|
| Thanks,
| Neddy
|
|
| --
| Neddy
| ------------------------------------------------------------------------
| Neddy's Profile:
http://www.excelforum.com/member.php...o&userid=24345
| View this thread: http://www.excelforum.com/showthread...hreadid=379455
|