Ik heb een access 2007 database met een tabel. In de tabel een memo veld met text met opmaak.
Wanneer ik hier met de hand wat zaken intik en daar wat tekstopmaak doe, dan kan ik met vba via een formulier de geformatte text copieren van 1 record en plakken in een een ander record. Dit werkt mb van onderstaande code:
iets = Form_Formulier1.textje
DoCmd.GoToRecord , , acNext
Form_Formulier1.textje = iets
Doel was om opgemaakte text (kleuren en bullets etc) uit een word document te halen en dit in memo fields op te slaan. Ik al heel veel geprobeerd maar niets lijkt te werken.
Bijvoorbeeld:
set wdApp = GetObject(, "Word.Application")
Set wdDoc = wdApp.Documents.Open("test.doc")
Form_Formulier1.textje = wdDoc.Paragraphs(6)
Form_Formulier1.textje = wdDoc.Range(1, 250)
Dit werkt wel maar alle tekstopmaak is kwijt.
Weet iemand hier de juiste methode voor
Alvast bedankt
Wanneer ik hier met de hand wat zaken intik en daar wat tekstopmaak doe, dan kan ik met vba via een formulier de geformatte text copieren van 1 record en plakken in een een ander record. Dit werkt mb van onderstaande code:
iets = Form_Formulier1.textje
DoCmd.GoToRecord , , acNext
Form_Formulier1.textje = iets
Doel was om opgemaakte text (kleuren en bullets etc) uit een word document te halen en dit in memo fields op te slaan. Ik al heel veel geprobeerd maar niets lijkt te werken.
Bijvoorbeeld:
set wdApp = GetObject(, "Word.Application")
Set wdDoc = wdApp.Documents.Open("test.doc")
Form_Formulier1.textje = wdDoc.Paragraphs(6)
Form_Formulier1.textje = wdDoc.Range(1, 250)
Dit werkt wel maar alle tekstopmaak is kwijt.
Weet iemand hier de juiste methode voor
Alvast bedankt
Laatst bewerkt:
