View Single Post
 
Old 01-07-2016, 10:21 PM
PRA007's Avatar
PRA007 PRA007 is offline Windows 7 64bit Office 2010 32bit
Competent Performer
 
Join Date: Dec 2014
Location: Ahmedabad, Gujrat, India
Posts: 145
PRA007 is on a distinguished road
Default

Yes sir. It give plain html if copy paste the web extract. Web extract is in HTML formate like

My StrTxt contains

Code:
<DIV class=someclass>
<DIV id=class-00001 class=class num="00001">
so many such lines with <src = embedded image>
<DIV></DIV>
I want to convert this to

Code:
so many such lines with (inline embedded image).
from web I got little bit of solution.

Code:
Set IE = CreateObject("InternetExplorer.Application")
With IE
	.Visible = False
    .navigate "about:blank"
    .Document.body.innerHTML = StrTxt
    .Document.execCommand "SelectAll"
    .Document.execCommand "Copy"
    .Quit
    .Quit 'to make sure.
End With
Set IE = Nothing
    Set Rng = Tbl.Cell(i, 5).Range
        Rng.Collapse wdCollapseStart
        Rng.PasteAndFormat wdPasteDefault
	Set Rng = Nothing
Reply With Quote