View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Robert24 Robert24 is offline
external usenet poster
 
Posts: 4
Default Needs to Transpose Large List


This seems to work. Copy the addresses from the website into col A of sheet1
Place the cursor on the top address and run this macro. It will copy that
address to Sheet2. Repeat running the macro for each address.
As your adreesses are of varying lengths you don't get all the email
adresses in one column but you can fix this either before or after you run
the macro.

Hope this helps


Selection.CurrentRegion.Select
Selection.Copy
Sheets("Sheet2").Select
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=True
Sheets("Sheet1").Select
Selection.End(xlDown).Select
Selection.End(xlDown).Select
End Sub

"The Patriot" wrote:

Hey, I'm trying to put all the names (along with their address, university,
etc) located at http://www.asc41.com/director/frame.htm into an excel
spreadsheet where I have one name (and all the rest of the information) in
one row. Is there an easy way to do this rather and just copy and pasting and
then transposing each individual name into the spreadsheet?

Thanks,
-Nick