Hi Scott

The data is in variables at the conclusion of Jake's example.
Debug.print puts something in the "Immediate" pane in the VBA editor.
If you want it on your spreadsheet too, you can add some lines such as:

Debug.Print msDIVIDEND_RATE & ": " & Mid$(s, nStart, nEnd - nStart) '
existing line from JMs code
ActiveCell.Value = msDIVIDEND_RATE & ": " & Mid$(s, nStart, nEnd -
nStart) ' puts the same thing in the active cell
activecell.offset(1,0).activate ' move to an empty cell to put the
next piece of data into



Kevin