FOR EACH loControle IN loIE.Document.Window.Frames(0).Document.Body.All IF UPPER(loControle.NodeName) == "FONT" MESSAGEBOX(loControle.innerText) ENDIF NEXT