heralde sen başlıkları ayrı ayrı almak istiyosun anladıım kadarıyla onun için split kullanıcan şöyle mesela

canafar = split(veri,"<td") 'diye ayır ilk baştan sonra diziyi kullan bi for la

for i = 1 to ubound(canafar)
artık burada da "baslik">" bunla "</td>" bunun arasını al dersin yazdırısın ekrana olur
next