Hessel de Walle's Blog

In the example template I am showing here, a dialogue window will automatically start on opening: As soon as you enter some stuff in the dialogue window and you click OK the text fields in the memo template will be filled in: At the same time, a new Tab  + Button will appear at the left hand side: Adjust Memo Fields . As you click this button, the dialogue window will appear again, filled in this time: When you are in the right mood, you can go on forever. If you are interested, you can download the template with the legacy fields  memo.dotm here: https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing or the new one with the content controls: memonieuw.dotm

Word has a lot of buttons to add elements to a table. But there is no button to add a row at the end of the table your cursor is in. I know very well that adding a row can be done positioning the cursus in the last cell of the last row and column and then pressing the tab key. But I wanted to create a button doing this. First of all we need a Custom UI editor for Microsoft Office to add a piece of XML to the document. My XML script looks like this: <customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">   <ribbon startFromScratch="false">     <tabs>       <tab id="CV" label="CV" keytip="CV" insertBeforeMso="TabHome">          <group id="CVactions" label="CV actions">            <button id="AddRow" label="Add row at end of table" imageMso="FileNew" size="large" onAction="ctlAddRule" />          ...

The first script deletes all autotext entire from the normal.dotm Sub DeleteNormalAutoTextEntries()     'goal: delete all autotext entries from normal.dotm     Dim i As AutoTextEntry     'wissen autotextentries     For Each i In NormalTemplate.AutoTextEntries         i.Delete     Next End Sub The second script deletes all built in building block entries from the template  built-in building blocks.dotx Sub DeleteBuiltinBuildingblockentries()     'Word 2010 and up     'goal: delete all elements from built-in building blocks.dotx     On Error Resume Next 'necessary while deleting from the template causes errors     Dim objTemplate As Template     Dim i As Integer 'counter     Dim bb As Word.BuildingBlock      Set objTemplate = Templates(1) 'temp...

1.1      Inleiding In de volgende voorbeelden gebruiken we de Office Custom UI Editor en Word template add-ins. We gebruiken deze manier omdat: §    de Custom UI Editor automatisch de vereiste Open Office XML bestandsrelaties maakt §    we dan geen additionele ontwikkelsoftware als Visual Studio nodig hebben §    en we gewoon gebruik kunnen maken van VBA om het lint aan te roepen De Office Custom UI Editor kunne we gratis downloaden via OpenXMLDeveloper.org: Custom UI Editor Het aanpassen van de linten van Word zoals hier getoond, kunnen we toepassen op een los Word sjabloon of via een Word add-in. 1.2      Voorbeeld 1 Het eerste voorbeeld is tamelijk simpel. We gaan hier een losse knop op een tab verbergen. We gaan de knop Macro ’ s op de tab Beeld verbergen. §    Maak een leeg sjabloon dat macro ’ s kan bevatten: voorbeeld1.dotm §    Sluit het document en sluit Wor...