[VBA/WORD] Plakken HTML string*

Pagina: 1
Acties:
  • 153 views sinds 30-01-2008
  • Reageer

  • Sisko
  • Registratie: Oktober 2003
  • Laatst online: 17-04-2014
Ik probeer een string bestaande uit HTML opmaak uit een mssql database veld te plakken in word.
Als test situatie voer ik de volgende code uit bij het openen van mijn test document:

code:
1
2
3
4
5
6
7
Dim MyData As DataObject
Dim strClip As String
strClip = "Dit <b>is</b> html<br>enzo"

Set MyData = New DataObject
MyData.SetText strClip
MyData.PutInClipboard


Om te controleren of het clipboard inderdaad de string bevat doe ik vervolgens CTRL+V in het document. De string wordt inderdaad in het document gezet, echter niet met de html opmaak.
Hij plakt dus letterlijk:
code:
1
Dit <b>is</b> html<br>enzo


Wat ik wil bereiken is een manier om gefragmenteerde HTML code in een document te kunnen plakken MET de opmaak. Als je bijvoorbeeld vanuit Internet Explorer iets selecteert en kopieert plakt hij de opmaak wél mee in word.

Ik maak nu gebruik van het clipboard object maar misschien zijn er nog andere methoden om hetzelfde te bereiken. Wie kan mij een zetje geven in de goeie richting?

  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 22-08 10:45

mulder

ik spuug op het trottoir

Je zet de string als Text op het clipboard. Je moet dus kijken of je de string als HTML op het clipboard kan plaatsen.

oogjes open, snaveltjes dicht


  • Sisko
  • Registratie: Oktober 2003
  • Laatst online: 17-04-2014
Hoe zorg ik er dan voor dat ik forceer wat voor Type object ik in het clipboard plaats?

  • NMe
  • Registratie: Februari 2004
  • Laatst online: 19-08 12:58

NMe

Quia Ego Sic Dico.

We hebben sinds kort een nieuw subforum dat bedoeld is voor vragen met officesuites, en ook voor VBA. Ik zet je topic even op de goede plaats. :)

Programming & Webscripting >> Officesuites en -software

'E's fighting in there!' he stuttered, grabbing the captain's arm.
'All by himself?' said the captain.
'No, with everyone!' shouted Nobby, hopping from one foot to the other.


  • Sisko
  • Registratie: Oktober 2003
  • Laatst online: 17-04-2014
Ondertussen heb ik na grondig speuren het volgende opgedoken bij MS zelf:
http://support.microsoft.com/default.aspx?scid=274326

Dit werkt perfect :)

Iedereen bedankt voor het meedenken.