Rename Folder

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Identifying Character in a Text String Word 2000 I have a string of text that contains an unknown character. I need to identify the character code. I've done this before, so I know that it's possible, but I'm drawing a complete blank on the command that I used, and I haven't been able to find the information in Help. Can someone show me how to get the character code of an unknown character? -- Tom State of Montana Department of Justice Help Desk "Making the world a safer place." Tag: Rename Folder Tag: 61655
  - 2
    - VBA Question Hello, I am just starting out trying to learn a little VBA code and was trying to understand an example at the following address: http://office.microsoft.com/en-us/assistance/HA010188011033.aspx I typed the code as requested but I am receiving the following error: "Compile Error, sub or function not defined" the hilighted area points to the word "AdditionResult". I am not sure how to make it work. I tried typing it carefully a couple of different ways and even just copied the code directly from the webpage, but it will not work. what am I doing wrong? Tag: Rename Folder Tag: 61651
  - 3
    - Like Statement Is there any way to construct a wildcard Like statement similar to the {1,} one or more of the proceding character used in Find? Here is an example. I want my Like statement to be true if the string is only lower case letters. I get a a match if I use [a-z] followed by 25 asterisks. Is this statement really limited in this area? Thanks Sub Test() Dim MySting As String MyString = "abcdefghijklmnopqrstuvwxyz" If MyString Like "[a-z]************************" Then MsgBox "Eureka" 'What I would like to do: 'If MyString Lik "[a-z]{1,}" Then ... End Sub -- Greg Maxey/Word MVP A Peer in Peer to Peer Support Tag: Rename Folder Tag: 61648
  - 4
    - How to get more color fills I created a table in Word 97, and I want to color the cells in the table. This seems can only be done through the Borders and Shading. But it provides a very limited color choice. How can I get a rich fill color palette like the one with the Background fill? Any vba code can solve the problem? Thank you. Leon ----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeeds.com The #1 Newsgroup Service in the World! >100,000 Newsgroups ---= East/West-Coast Server Farms - Total Privacy via Encryption =--- Tag: Rename Folder Tag: 61643
  - 5
    - Two sided tri-fold brochure I have had some experience creating simple word documents via VBA and VB6. However I'm struggling to determine the best way to generate a two sided tri-fold brochure on legal size paper (landscape). The requirement is to pull data from multiple SQL Server tables to construct the brochure and format it for the "mini" pages. Can anyone point me to any documentation/reference material or provide me with examples or advice that demonstrate snaking of columns and maybe suggestions for the best way to go about this. Thanks in advance for any help. Joe Tag: Rename Folder Tag: 61642
  - 6
    - Select Heading1 fails only in Macro Would someone tell me why my Select Heading1 Macro fails at the line below? I can select Heading1 manually however in a Macro is fails and I get "Char Char" instead of Heading1. I tried to replace char char with Heading 1 to no avail. Selection.Style = ActiveDocument.Styles(" Char Char") ActiveDocument.Save thx, Ted Tag: Rename Folder Tag: 61641
  - 7
    - for next updating headings I often get documents that have had the heading styles manually formatted so that when I drop portions of the document into my template these headings don't update properly. I would like to create a macro to loop through the headings and reapply the heading style to eliminate any manual formatting. Here is my attempt. I get an error in the first line because I don't know how to properly declare which element in which collection to loop through, and I don't know how to find out. Sub UpdateHeaders() For Each HeadingStyles In ActiveDocument If Selection.Style = ActiveDocument.Styles("Heading 1") Then With Selection .Paragraphs(1).Range.Select .Collapse Direction:=wdCollapseStart .Style = ActiveDocument.Styles("Heading 1") End With ElseIf Selection.Style = ActiveDocument.Styles("Heading 2") Then Selection.Style = ActiveDocument.Styles("Heading 2") ElseIf Selection.Style = ActiveDocument.Styles("Heading 3") Then Selection.Style = ActiveDocument.Styles("Heading 3") ElseIf Selection.Style = ActiveDocument.Styles("Heading 4") Then Selection.Style = ActiveDocument.Styles("Heading 4") End If Next HeadingStyles End Sub Thanks for any help, Blake Tag: Rename Folder Tag: 61636
  - 8
    - Jump between sections How do I jump between sections in a document to add text. Eg in a standard letter, i just want to jump through to name, then halfway throught the first paragraph, then to ending etc. Is there something I can insert then just TAB through? Tag: Rename Folder Tag: 61628
  - 9
    - Inlineshape move-event Hi, Is it possble to handle the event of an inlineshape-object (image) beeing moved from one document to another document? Thank you in advance for your quick response :-) Tag: Rename Folder Tag: 61626
  - 10
    - VBA Mail Merge using multiple data sources and mixture of single item and repeating rows fields I am newbie to VBA, and would like to know if the following can be done using VBA with Word. A word document is to be used as a report template. The users may amend the "boilerplate text" to their tastes, but not the merge data place holders (terminology?). The document is a mixed of single items and repeating row items, as illustrated by the following example: OWNER: _THE_OWNER_ ADDRESS: _THE_ADDRESS_ RESIDENTS NAME DOB GENDER _THE_NAME_ _THE_DOB_ _THE_GENDER_ (repeated for each database row) RESIDENCE LAYOUT ROOM SIZE USAGE HEATED DOUBLE GLAZED _THE_ROOM_ _THE_SIZE_ _THE_USAGE_ _THE_HEATED_ _THE_DOUBLE_GLAZED_ (repeated for each database row) INSPECTION NOTES: _THE_INSPECTION_NOTES_ INSPECTED BY: _THE_INSPECTED_BY_ INSPECTION DATE: _THE_INSPECTION_DATE_ All items in relate to a single database row other than those in the tables marked above as "repeated for each database row". I cannot use normal Word Mail Merge because I need 3 data sources, 1 for the single items and one for each table above - I could use mail merge if I flattened the returned data out to make a single data source, but that would be well messy and there has to be a neater way. Having searched the internet for info I have concluded that this can be done using VBA, but what I need is an example of such a mail merge that I can use as a proof of concept for input into the design stage. I am using Office 2000. Saeed ng_786 Tag: Rename Folder Tag: 61619
  - 11
    - Word 2002 installation problems I hope this is the appropriate forum for this question. I apologize for the length of my message but it has been a lengthy battle. I have a Dell Dimension 8250 computer with Windows XP. For the past several months I have had difficulty getting my Word 2002 to function properly. It frequently would not open of partially open and then freeze. The Windows Task Manager showed that Word was "Not Responding". I tried using "Detect and Repair in "Help" in Word but Word 2002 still didn't improve. I opened the Control Panel, clicked on Word 2002 and tried to repair Word that way but it didn't work. Finally I uninstalled Word 2002 and Microsoft Works 2003 and inserted Disc 1 of the Microsoft Works Suite 2003 that came with my computer and reinstalled them. Microsoft Works 2003 reinstalled ok but Word 2002 did not install properly. I can't find it when I click on "Start" and "All Programs". Also the Works Task Launcher shows Word but when I click on it I get the message "The Works Task Launcher cannot access the task you selected. Files needed to start the program may be missing, corrupted, or may have been deleted. To retore or replace the files, reinstall the program, and then try starting the program again." I've tried to reinstall the program about 3 times now with the same results. I first tried to custom install Word 2002 by itself and that didn't work. I then tried to uninstall Microsoft Works Suite 2003 and and Word and then reinstall both. It shows Word 2002 installing but I can't find it. What am I doing wrong? Tag: Rename Folder Tag: 61618
  - 12
    - Re - Activating the application Hi All, Basically i want to ask two questions.. 1) In my application, i open the word document, insert some texts at pre defined book marks and also inserting the shapes and things like that. And then i make application visible..so, application is visble with complete data in its document. But at the beginning of that application, some text is selected..i dont want ant thing to be selected in the document..can you please suggest me any possibilities..? my second question is.. 2) i keep open the previous document but not in the fore ground and then i open a new document programatically, again i insert my data in it, and then call application visble again..but this time..the application or the document doesn't come in to fore ground. I tried activating the document also, but it didn't hep me. Please help me in these two questions.. Thanks in advance. Tag: Rename Folder Tag: 61617
  - 13
    - There must be a better way Hello, I started out trying to develop a simple test to determine if each word in a document was numeric, alphanumeric, or plain letter text. The beast just kept growing. Numeric or non numeric was simple. It got complicated with the alphanumeric text as I couldn't find a simple comparison. I tried a Like statement "[A-z], but apparently there is no {1,} to continue looking for one or more. I next shifted to a Instr test, but I couldn't figure out how to write a statement Instr(oWord, *) where * represents any number 0-9. Finally I settled on a series Instr statements in an Or construction. The next glitch was numbers like 1-800-867-5309, 1,200, 12.23 etc. I added a few other tests to handle those with the below macro. If someone knows of a better way to test for an alphanumeric number, please let me know: Sub Alphanumeric() Dim oWord As Word.Range For Each oWord In ActiveDocument.Words If IsNumeric(oWord) Then oWord.Font.Color = wdColorGreen ElseIf oWord.Text = "-" Or oWord.Text = "." _ Or oWord.Text = "," Or oWord.Text = "$" Then oWord.MoveEnd Unit:=wdCharacter, Count:=1 If InStr(oWord, 0) Or InStr(oWord, 1) Or InStr(oWord, 2) _ Or InStr(oWord, 3) Or InStr(oWord, 4) Or InStr(oWord, 5) _ Or InStr(oWord, 6) Or InStr(oWord, 7) Or InStr(oWord, 8) _ Or InStr(oWord, 6) Or InStr(oWord, 7) Then oWord.MoveEnd Unit:=wdCharacter, Count:=-1 oWord.Font.Color = wdColorGreen End If ElseIf InStr(oWord, 0) Or InStr(oWord, 1) Or InStr(oWord, 2) _ Or InStr(oWord, 3) Or InStr(oWord, 4) Or InStr(oWord, 5) _ Or InStr(oWord, 6) Or InStr(oWord, 7) Or InStr(oWord, 8) _ Or InStr(oWord, 6) Or InStr(oWord, 7) Then oWord.Font.Color = wdColorRed Else: oWord.Font.Color = wdColorAutomatic End If Next End Sub -- Greg Maxey/Word MVP A Peer in Peer to Peer Support Tag: Rename Folder Tag: 61616
  - 14
    - Macro code to retrieve Dropdown field value within Word? I am new at creating Macros and VB code. I am trying to setup a Macro that is ran upon exit from a dropdown field in Word. I am wanting to check the value from the dropdown to fill data into form text fields. I have tried ActiveDocument but can't see what needs to be coded to get the value. Tag: Rename Folder Tag: 61609
  - 15
    - Overwriting text into a Word DOC with VBA This is a multi-part message in MIME format. ------=_NextPart_000_0017_01C4F906.7A391DA0 Content-Type: text/plain; charset="iso-8859-2" Content-Transfer-Encoding: quoted-printable Hi, I have a word DOC and I have to automatically replace some text in it = with other. The code uses Automation from an Access application to handle the Word = DOC Somewhere on a page of the Doc I have a text like this Categorie A1 =20 Dinsdag 25-01-2005 aanvang 19.00 De Boeg 2=20 & Woensdag 26-01-2005 aanvang 19.00 De Welvaart 1 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 =20 I have the following VBA code to find that part of the doc and populate = the table .... cSearchName =3D "Categorie[ ]@" & rsCat!CatNaam & rsCat!PouleNaam Set myfind =3D oWrdDoc.Content.Find myfind.MatchWildcards =3D True myfind.Execute FindText:=3DcSearchName, Forward:=3DTrue If myfind.Found Then Set myrange =3D oWrdDoc.Range(myfind.Parent.Start, = End:=3DoWrdDoc.Range.End) Set tbl =3D myrange.Tables(1) ..... And now I know how to populate the table using=20 .... Set rng =3D tbl.Cell(i, j).Range rng.Text =3D MyValue However, I don't know how to change the=20 Dinsdag 25-01-2005 aanvang 19.00 De Boeg 2=20 and=20 Woensdag 26-01-2005 aanvang 19.00 De Welvaart 1 The idea is I don't know what text I have to look for, but instead I = have to replace the text on second and 4'th rows AFTER Categorie A1 = (title). And on any of those rows, there are two variables who hold the = value to replace with, one for normal text and one for bold. As you see, I have to format also the values, to use Times Roman 14 = normal for the beginning and bold for De Boeg 2=20 Can anyone give me a clue on how to do it? Thank you Regards, Tomas =20 ------=_NextPart_000_0017_01C4F906.7A391DA0 Content-Type: text/html; charset="iso-8859-2" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-2"> <META content=3D"MSHTML 6.00.2900.2523" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY> <DIV><FONT face=3DArial size=3D2>Hi,</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>I have a word DOC and I have to = automatically=20 replace some text in it with other.</FONT></DIV> <DIV><FONT face=3DArial size=3D2>The code uses Automation from an Access = application=20 to handle the Word DOC</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Somewhere on a page of the Doc I have a = text like=20 this</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 16pt; mso-bidi-font-size: 10.0pt">Categorie <B=20 style=3D"mso-bidi-font-weight: normal">A1</B><?xml:namespace prefix =3D = o ns =3D=20 "urn:schemas-microsoft-com:office:office" /><o:p></o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: = 10.0pt"><o:p> </o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt">Dinsdag 25-01-2005 = aanvang=20 19.00 <B style=3D"mso-bidi-font-weight: normal">De Boeg 2=20 </B><o:p></o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: = 10.0pt">&<o:p></o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt">Woensdag = 26-01-2005 aanvang=20 19.00 <B style=3D"mso-bidi-font-weight: normal">De Welvaart=20 1<o:p></o:p></B></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: = 10.0pt"><o:p> </o:p></SPAN></P> <TABLE class=3DMsoNormalTable=20 style=3D"BORDER-RIGHT: medium none; BORDER-TOP: medium none; MARGIN: = auto auto auto 10.6pt; BORDER-LEFT: medium none; BORDER-BOTTOM: medium = none; BORDER-COLLAPSE: collapse; mso-table-layout-alt: fixed; = mso-border-alt: solid windowtext .5pt; mso-padding-alt: 0cm 3.5pt 0cm = 3.5pt; mso-border-insideh: .5pt solid windowtext; mso-border-insidev: = .5pt solid windowtext"=20 cellSpacing=3D0 cellPadding=3D0 border=3D1> <TBODY> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 0"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p><FONT=20 face=3DArial=20 = size=3D2>          &nbs= p;</FONT></o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-left-alt: = solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-left-alt: = solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><FONT=20 face=3DArial size=3D2></FONT></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-left-alt: = solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><FONT=20 face=3DArial size=3D2></FONT></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: windowtext 1pt solid; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: = 0cm; BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-left-alt: = solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><FONT=20 face=3DArial size=3D2></FONT></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 1"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 2"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 3"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 4"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 5"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR> <TR style=3D"HEIGHT: 21pt; mso-yfti-irow: 6; mso-yfti-lastrow: yes"> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: windowtext 1pt solid; WIDTH: 1cm; PADDING-TOP: 0cm; = BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: = transparent; mso-border-alt: solid windowtext .5pt; mso-border-top-alt: = solid windowtext .5pt"=20 width=3D38> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; mso-pagination: = none"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; LAYOUT-GRID-MODE: line; COLOR: black; = mso-bidi-font-size: 10.0pt"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 4cm; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D151> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.8pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal style=3D"MARGIN: 0cm 0cm 0pt; = mso-outline-level: 2"><SPAN=20 lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD> <TD=20 style=3D"BORDER-RIGHT: windowtext 1pt solid; PADDING-RIGHT: 3.5pt; = BORDER-TOP: #ece9d8; PADDING-LEFT: 3.5pt; PADDING-BOTTOM: 0cm; = BORDER-LEFT: #ece9d8; WIDTH: 47.85pt; PADDING-TOP: 0cm; BORDER-BOTTOM: = windowtext 1pt solid; HEIGHT: 21pt; BACKGROUND-COLOR: transparent; = mso-border-alt: solid windowtext .5pt; mso-border-left-alt: solid = windowtext .5pt; mso-border-top-alt: solid windowtext .5pt"=20 width=3D64> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: right; = mso-outline-level: 2"=20 align=3Dright><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; COLOR: = black"><o:p> </o:p></SPAN></P></TD></TR></TBODY></TABLE> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: center; tab-stops: 0cm 28.3pt = 56.6pt 84.9pt 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt = 311.3pt 339.6pt 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt = 566.0pt 594.3pt 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt" = align=3Dcenter><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p> </o:p></SPAN></P></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>I have the following VBA code  to find that part of the = doc and=20 populate the table</FONT></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2></FONT></o:p></SPAN> </DIV> <DIV> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p><FONT=20 face=3DArial size=3D2>....</FONT></o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p><FONT=20 face=3DArial size=3D2>cSearchName =3D "Categorie[ ]@" & = rsCat!CatNaam &=20 rsCat!PouleNaam<BR></FONT></o:p></SPAN><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>Set myfind =3D oWrdDoc.Content.Find<BR>myfind.MatchWildcards = =3D=20 True<BR>myfind.Execute FindText:=3DcSearchName, Forward:=3DTrue<BR>If = myfind.Found=20 Then<BR>    Set myrange =3D = oWrdDoc.Range(myfind.Parent.Start,=20 End:=3DoWrdDoc.Range.End)<BR>    Set tbl =3D=20 myrange.Tables(1)</FONT></o:p></SPAN></P><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>.....</FONT></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2></FONT></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>And now I know how to populate the table using = </FONT></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2></FONT></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>....</FONT></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>Set rng =3D tbl.Cell(i, j).Range<BR>rng.Text =3D=20 MyValue</FONT></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2></FONT></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><FONT = face=3DArial=20 size=3D2>However, I don't know how to change the </FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT></o:p></SPAN><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: = 10.0pt"></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2>Dinsdag 25-01-2005 aanvang 19.00 De Boeg 2=20 </FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2></FONT></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2>and=20 </FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2></FONT></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2>Woensdag 26-01-2005 aanvang 19.00 De Welvaart=20 1</FONT></SPAN></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2></FONT></SPAN></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2>The idea is I don't know what text I have to look for, but = instead I have=20 to replace the text on second and 4'th rows AFTER <SPAN lang=3DNL=20 style=3D"FONT-SIZE: 16pt; mso-bidi-font-size: 10.0pt">Categorie A1 <FONT = size=3D2>(title). And on any of those rows, there are two variables who = hold the=20 value to replace with, one for normal text and one for=20 bold.<o:p></o:p></FONT></SPAN></FONT></FONT></SPAN></SPAN></o:p></SPAN></= DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT face=3DArial = size=3D2></FONT></SPAN></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><SPAN lang=3DNL style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: = 10.0pt"><FONT=20 face=3D"Times New Roman"></FONT><o:p></o:p></SPAN><o:p>As you see, I = have to=20 format also the values, to use Times Roman 14 normal for the beginning = and bold=20 for De Boeg 2 </o:p></FONT></FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p></o:p></FONT></FONT></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p>Can anyone give me a clue on how to do=20 it?</o:p></FONT></FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p></o:p></FONT></FONT></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p>Thank you</o:p></FONT></FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p></o:p></FONT></FONT></SPAN></o:p></SPAN> </DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p>Regards,</o:p></FONT></FONT></SPAN></o:p></SPAN></DIV> <DIV><SPAN lang=3DNL=20 style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: 10.0pt"><o:p><SPAN = lang=3DNL=20 style=3D"FONT-SIZE: 14pt; mso-bidi-font-size: 10.0pt"><FONT = face=3DArial><FONT=20 size=3D2><o:p>Tomas</o:p></FONT></FONT></SPAN></DIV> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><FONT=20 face=3DArial size=3D2></FONT><FONT face=3DArial = size=3D2></FONT><BR><FONT face=3DArial=20 size=3D2>          &nbs= p;=20 </FONT></o:p></SPAN></P> <P class=3DMsoNormal=20 style=3D"MARGIN: 0cm 0cm 0pt; tab-stops: 0cm 28.3pt 56.6pt 84.9pt = 113.2pt 141.5pt 169.8pt 198.1pt 226.4pt 254.7pt 283.0pt 311.3pt 339.6pt = 367.9pt 396.2pt 424.5pt 452.8pt 481.1pt 509.4pt 537.7pt 566.0pt 594.3pt = 622.6pt 650.9pt 679.2pt 707.5pt 735.8pt 764.1pt 792.4pt"><SPAN=20 lang=3DNL style=3D"FONT-SIZE: 12pt; mso-bidi-font-size: = 10.0pt"><o:p><FONT=20 face=3DArial size=3D2></FONT></o:p></SPAN> </P></BODY></HTML> ------=_NextPart_000_0017_01C4F906.7A391DA0-- Tag: Rename Folder Tag: 61607
  - 16
    - optional 'pages' view in MSWord It would be a useful aid to navigating and working in longer documents to have an optional 'pages' view available to the left hand side of the screen as with 'Slides' in PPT and 'Pages' Adobe Acrobat Tag: Rename Folder Tag: 61599
  - 17
    - Making template instructions disappear when user enters input Is there a way to make lengthy instructions (sometimes several paragraphs) automatically disappear from a template when a user enters input? I tried the MacroButton NoMacro field, but that is limited to instructions that are no longer than one line. This template details the information that should appear in each section, but the instructions remain unless the author remembers to delete them (sigh). Thanks for your help. Tag: Rename Folder Tag: 61594
  - 18
    - Is there a way to delete reviewers in tracking changes? My computer has greater than 8 reviewers for track changes and my color is a duplicate of another. Is there a way to delete reviewers to get under 6 as this is the limit of color assignment by author? Tag: Rename Folder Tag: 61591
  - 19
    - Word online document Is there a way to increase the dropdown form field item maximum of 25 when working with a Word online document? Possibly a download? I can use either '97, 2000 or 2003. Tag: Rename Folder Tag: 61589
  - 20
    - Capture the print instruction When someone prints a document, I want to have a macro that adds a watermark and header/footer information, but when the document is viewed on screen this information is not visible. What is the "capture print" instruction, I cant find it anywhere. Tag: Rename Folder Tag: 61585
  - 21
    - Prefixed Numbered TOC Would someone tell me how to create a prefixed Line Numbered TOC, formated with tab leaders "....." and page #'s. It should look like this: TC01: Introduction ............. 2 TC02: Revision................... 3 TIA, Ted Tag: Rename Folder Tag: 61582
  - 22
    - Accessing the "Printed Watermark" dialog in XP/2003 Hello All Is it at all possible to do a .Show directly to the watermark dialog you get to via the menu system clicks of Format -> Background -> Printed Watermark. We use this watermark dialog a lot and would like to bypass all the menu clicks. Here's hoping Trevor Henderson Tag: Rename Folder Tag: 61580
  - 23
    - Sharing macro ind Word 2003 Hi. What's the easiest way to share/distribute macros in Word 2003? I would prefer not to change NORMAL.DOT. -- Br. Carsten Tag: Rename Folder Tag: 61579
  - 24
    - how to capture the right-click event in MSWord through a word macro (visual basic macros)? I want an action to be performed during the mouse right-click in MSWord. how to capture the right-click event of MSWord(in a word macro)? Tag: Rename Folder Tag: 61578
  - 25
    - Opening word files from Samba share is very slow?? Hi Folks, We've been having problems with opening word files from a samba share in that it takes forever to open and as a result some AutoOpen macros fail to execute properly. The macros work in other environments and in similar environments to our problem area which is - Windows 2000 Pro Office 2000 Pro Novell Client Sophos Anti Virus Samba shares mapped at logon Over 100MB Network Any ideas would be appreciated. Cheers J Tag: Rename Folder Tag: 61574
- Next
  - 1
    - How to customize the pop-up right-click menu in MSword? Using Word macros I have added two options to the right-click popup menu of MSWord. I want only Option1 to be displayed when the cursor points to a bookmark and option2 to be displayed when the cursor is placed on a normal line (not a book mark). How to customize the popup menu? Tag: Rename Folder Tag: 61568
  - 2
    - Wd2003:AutoExit Macro Doesn't Restore Menu Items Customized by Aut I use a customized word 2003 template. In the AutoNew macro, I'm saving the commandbar settings in registry, deleting all commmandbars and creating some customized command bars. When the application is closed, the commandbar settings saved in the registry has to restored. I do it in the AutoExit macro. Apparently, this is not working. (This was early in Word 97. It was working fine.) When the AutoExit function is called, the commandbars are being reinstated, but once the word exit and I open word again, they are not gone. For word 2000, microsoft have given the solution as to open the normal template and make the menu changes and save it. But this is not working in this case. Tag: Rename Folder Tag: 61561
  - 3
    - Word Macros hi, Using Word macros I have added two options to the popup menu. I want only Option (1) to be displayed when the cursor points to a bookmark and only option (2) to be display when the cursor is placed on a normal line (not a book mark) How to customize the popup menu? Can anybody tell me how to resolve this problem? Thank you Petricia Smith Tag: Rename Folder Tag: 61560
  - 4
    - Preserve numbering when copying to a new document (MVP) Hi there! I need to copy paras formatted with styles containing outline numbering (legal) to a new document and retain the numbering (using VBA).... I seem to lose some of the numbering. Ideas most welcome. Thanks Tim Tag: Rename Folder Tag: 61559
  - 5
    - Removing trailing carriage returns in Word VBA? Okay, so I've got a macro that's supposed to concatenate a bunch of documents together, separated by exactly one blank line. The thing is, I can't count on any specific number of blank lines at the end of each source document that I'm concatenating. It would be nice if, after I append each document to my master document, I could remove all trailing carriage returns from the master document, so that I'll know exactly where I am and how many blank lines I'm going to have after each append. I've scoured the books and newsgroups, and I haven't found a way to do this. It seems simple enough, so maybe it's just my brain shorting out after a long day. If anyone can shed some light on this, I would vastly appreciate it. ~ Steve Tag: Rename Folder Tag: 61556
  - 6
    - Copy Word lines into an array? I accidentally posted this question in another NG, please disregard the other one. I need an example function that will copy each line in a Word document beginning at the first line and ending at the end of paragraph 10. Each line needs to be separately copied into an array. Can someone please, please, please post a function to do this? Thanks so very much in advance. Tag: Rename Folder Tag: 61553
  - 7
    - Obtain the index number of the active document. I know how to get the count of active documents and the active document name. I'd like to extract the index number of the active document. Any suggestions? TIA Tag: Rename Folder Tag: 61548
  - 8
    - Highlight regions of protected document This applies to Word 2003 Is there a way to programmatically turn off the "Highlight regions I can edit" option that is accessible from the Protect Document task pane of a protected document? I do not want this option selected when a user opens the document. Thanks. Tag: Rename Folder Tag: 61540
  - 9
    - How can I force to change cursor under unselected fields? I have a set of fields type of "wdFieldMacrobutton". And the problem is that on roll over event the cursor changes to arrow only if the field is selected. How can i make cursor change to an arrow under not selected fields? Tag: Rename Folder Tag: 61538
  - 10
    - how to send e-mail What code could I use to send an e-mail message. I've generated all events and I just need this code to send the e-mail. Private Sub oApp_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean) Dim strFileName As String strFileName = ActiveDocument.FullName ??? Code for the e-mail that in the strFileName some changes have been made. Thanks Tag: Rename Folder Tag: 61537
  - 11
    - HELP - Tabs and Paragraphs Hello all, Would anyone have any suggestions on this? When I start at the very end of each line preceding each of the (2) examples below, there is (1) chr(13) for a paragraph mark and (2) chr(9) for a tab mark. But on line one, you only go to the beginning of the line and with line 2 you go over to the Tab2 position. I am guessing that the tab must have some kind of properties that tells Word to go over to the tab2 position, but darn if I know what it is. If anyone could offer any suggestions, it would be greatly appreciated! Tab 1 Tab 2 >> Line 1 Some Text Some other text >> Line 2 Yet more text Tag: Rename Folder Tag: 61533
  - 12
    - Move IP to the start of a Story Hi, ActiveDocument.Range(0,0).Select moves the IP to the start of the maintext story apparently from any story. My IP is in the header story and I want to move the IP to the start. I can use Selection.HomeKey Unit:=wdStory I was wondering if there isn't a Range(Start, End) method that I should be using. Thanks Tag: Rename Folder Tag: 61532
  - 13
    - renaming class or module in a project window in VB How to rename a class or module in a project window in VB? The Module1 to something name and the Class1 to something name? Thanks Tag: Rename Folder Tag: 61522
  - 14
    - Letting others use routines I've written My VBA programming has always been only for myself, up to now. But I've created a document conversion program that is needed by others, and I cannot get it to work on their computers. I copied the template to a network drive, then copied from there to Word's Templates directory on a co-worker's computer. Then I attached it to the document that he wanted to convert, but when I bring up the Macros dialog, the list of macros is blank, even when I specify the template name in the "Macros in" box. So there's something I'm missing about the VB environment. Also, it would be nice if, on other machines, users did not have to first attach the template to the document before using it. Any help appreciated. Christopher Brewster Lockheed Martin -- Message posted via http://www.officekb.com Tag: Rename Folder Tag: 61520
  - 15
    - Appendix in TOC Hi I am working with Word 2002. I have created a document and added a table of content. Fine. But it does not pick up my appendix (it is in a separate section, page break). How do I get the TOC to include thr appendices? Tag: Rename Folder Tag: 61518
  - 16
    - How can I insert data from a word document in a Access database? I need some help to know what I have to do to insert somo information from a Word Document in a table from an Access database. Do I have to create a Macro? If yes, How can I type the code? Tag: Rename Folder Tag: 61516
  - 17
    - Unwanted control toolboxes In Word 2000 VBA control toolboxes appear in the upper left and lower right corners, unbidden, when documents are opened. The lower right toolbox shows only a triangle. What causes this and how can I get rid of it? Tag: Rename Folder Tag: 61515
  - 18
    - Word install problem my office got uinstalled by some reasons I dont know. so now I cant open it! every file is on the harddisc but I cant find any install program:S can somebody help me???? Tag: Rename Folder Tag: 61513
  - 19
    - Word install problem my office got uinstalled by some reasons I dont know. so now I cant open it! every file is on the harddisc but I cant find any install program:S can somebody help me???? Tag: Rename Folder Tag: 61512
  - 20
    - Word Install-problem Hi.. my office by some reasons got uinstalled! but i can find the program to install office again, and I dont have some CD`s of I need that. can somebody help me please? Tag: Rename Folder Tag: 61510
  - 21
    - How do I set TOC Page Numbering with (Page x of y) and sections? Per article 291283 "How to create two page-numbering schemes in one document in Word 2002" - how do I set correct page numbering for the Table of Contents? I was successful in using the Method 1, "Use SEQ fields", but that causes the numbering in the TOC to start at 1 for every section listed, instead of showing the real page number based on the total number of pages. Any help in writing the necessary code will be greatly appreciated.......! Tag: Rename Folder Tag: 61503
  - 22
    - How to automatically update the Filename field? How do I get the Filename field in different headers of a protected form to automatically update when closing the form? The Filename field is in all of the different headers in the form. This was a default feature of Word 2000, but is not a feature of Office 2003. Thanks. Tag: Rename Folder Tag: 61502
  - 23
    - How to automatically update the Filename field? How do I get the Filename field in different headers of a protected form to automatically update when closing the form? The Filename field is in all of the different headers in the form. This was a default feature of Word 2000, but is not a feature of Office 2003. Thanks. Tag: Rename Folder Tag: 61501
  - 24
    - Adding Meetings to a Word Doc. I have a word document that gets sent out to a bunch of people, which contains meetings. I would like to set up a way so that they can click on a meeting and it would add the meeting to their outlook calendar as a meeting. Hope that make sense. Tag: Rename Folder Tag: 61496
  - 25
    - Changing Invoice # automatically on document I am using the templates in word for invoices. Is there a way I can set up the invoice # to change everytime I print/save a new invoice. I just started using these invoices thru Word so any other suggestions would also be helpful. So far, I have set up the template and added form fields. Upon exiting I am saving each one into a folder for the month of that year. Thank you Tag: Rename Folder Tag: 61487

Using Word 2002, I would like to be able to rename or delete a folder using
vba

Any sample code to do this would be appreciated

TIA
Tom

Top

Re: Rename Folder by JB

JB
Fri Jan 14 04:18:26 CST 2005

Tom wrote:
> Using Word 2002, I would like to be able to rename or delete a folder using
> vba
>
> Any sample code to do this would be appreciated
>
> TIA
> Tom
>
>
>
Hi Tom,
You might want to have a look at the FileSystemObject, which will allow
you to do these things paying particular attention to DeleteFile and
DeleteFolder.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/jsobjFileSystem.asp

HTH

J

Top