Styles

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Word Addin Hello All, I am making a Word Add-in in VB.NET. I am willing to have my own Menu Item in the Menu Bar like File, Edit, Etc and under my Menu item i will be having some more items as File->New, Edit->Copy, etc. Now i am getting 2 problems: 1/ When I run the program for 1 document things are fine but when i open more than 1 document simultaneously than I did not get that menu working (menu is shown but its not functioning) in other documents than the 1st document. I have solved this problem by creating the menu item at AppObj_WindowActivate function but this function is called whenever the document is activated even i minimize or maximize the document. 2/ When I uninstall the package that I install then the Menu Item is not removed. Its functionality are removed but with that the menu item should also be deleted which is not deleted. So i have to manually remove it so that it is not visible later on. Please help me with these 2 problems as I am in great trouble. GS Tag: Styles Tag: 66649
  - 2
    - Find older file version I created a file in Word XP, saved it and then opened it again, but unwittingly hit OK to the pop-up question "Do you want to revert to the original saved file?" Now all I have are 3 lines on the file which had some 1000 words. Help please! Tag: Styles Tag: 66647
  - 3
    - Restore Find box settings I am trying to save and then restore the settings for the find box. I've tried the following code, but the .style setting is always left as 'sdPart' instead of whatever the style name was before the procedure is run. Thanks for any advice. --------------------------------------- Sub MessWithFindBox2() Dim fFind As Find Set fFind = Selection.Find '********************* With Selection.Find .ClearFormatting .Text = "" .Style = "sdPart" .Execute End With '********************* Selection.Find.Style = fFind.Style End sub Tag: Styles Tag: 66642
  - 4
    - Adding CommandBarControls in VBA with Word Hi All I'm automating showing the "Mail Merge" menu and if it is nor visible then adding the "Insert Merge Field" pop up. I have mastered showing the command bar but I am having problems with getting the pop up to work. I've added the pop up but there ar no fields in the list. Having recorded a macro to check what is happening I get: Sub Macro2() ' ' Macro2 Macro ' Macro recorded 13/04/2005 by Tim Davies ' CommandBars("Mail Merge").Controls.Add Type:=msoControlPopup, ID:= 30076 End Sub But if I remove the pop up and run the macro it is added but does not list the field in the merge data source. Any pointers would be great. Cheers Tim Davies using Word 2002 SP3 Tag: Styles Tag: 66634
  - 5
    - y a part of data stored into previous ActiveX control loses if i insert new ActiveX hi! i have written an activex control for word that stores some binary data. now when after placing my control into word doc i store binary data (varry between 25KB to 10MB). control persists it. when i close it and reopen the document it is there. but when i place another control and store data into it, the data stored into the first control is truncated, not the whole data but only few KBs. I tried to find out the reason but couldn't. Is there any Guru to give me a hand. I am in too much tension about this problem. Plz help me. Thanks in advance. Ahmad Jalil Qarshi Tag: Styles Tag: 66625
  - 6
    - Using Word instead of web form interface for entering data into SQL Server database Hello all! I would like to as for an advice: what's the most suitable way, if it's indeed possible at all, to use a Word document as an interface for entering the data into a SQL database, just as it would have been done by using a web form? I would like the data to be saved in SQL database when the Word document is saved. Also, I would like to put this Word document as a template in the SharePoint Portal Server site.... Thank you in advance, Hrvoje Tag: Styles Tag: 66624
  - 7
    - Embedded word tables in Powerpoint Hi there, I have a macro that copies embedded word tables in PPT to a WORD document, but with large PPT files I get a Word error "Insufficient Memory or Disk space. Close extra windows and save your work", but I have a lot of RAM and disk space. Also, if I try to debug VBA, the 'Set oDoc = shp.OLEFormat.Object' becomes yellow. Does anybody have a clue what's going on here? something I forgot to clean-up in the code? Thanks so much! JS ==================================== Sub CopyPastePPT2Word() Dim shp As Shape Dim sld As Slide Dim wdApp As Word.Application Dim oDoc As Word.Document Set wdApp = New Word.Application With wdApp .Documents.Add .Visible = True End With For Each sld In Application.ActivePresentation.Slides For Each shp In sld.Shapes If shp.Type = msoEmbeddedOLEObject Then If shp.OLEFormat.ProgID = "Word.Document.8" Then Set oDoc = shp.OLEFormat.Object oDoc.Select Selection.Copy With wdApp .Selection.Paste .Selection.TypeParagraph End With Set oDoc = Nothing End If End If Next shp Next sld End Sub Tag: Styles Tag: 66615
  - 8
    - Can I automate dropping access tables into a word template? We have a word template we use for generating monthly reports. Much of the data for these reports resides in Access databases. Presently we run a query in access and paste the results into the word document. If the queries are standard is it possible to set up the word template to place the query results in the appropriate place each time a doc is created from the template? I've only done a few lines of VB in word (but lots of it in other apps), but if there's a way to do it and someone can point me in the right direction, that would be great! Tag: Styles Tag: 66613
  - 9
    - GetAddress differences I have a small template which creates a customized envelope (special return address w/ logo) and Bar Coding. The template uses the GetAddress function to lookup names in one of two Contact lists of Outlook. The template used to work fine until my hard-drive crashed and I had to rebuild using a new version of Windows (XP-Pro). I reinstalled Office 2000 and was able to recover all of my templates. I am having two problems now: 1) The Select Name dialog box does not sort/display the names by {Last Name}, {First Name} (it is sorting/displaying by {First Name} {Last Name}. 2) It no longer uses the "default" mailing address as the PR_STREET_ADDRESS field even though it is selected in Outlook. It only uses the Business Address (this never happened before). Iâ??ve tried looking at a bunch of options in Outlook but Iâ??m not sure why it worked before. Iâ??m running the latest "patched" version of Office 2000. Thank you for your time in advance. Sincerely, Paul D. Goldstein Tag: Styles Tag: 66608
  - 10
    - Converting RTF to DOCs I have a folder full of RTF files saved with .doc extensions created by the Adobe Acrobate 6.0 Standard Save As feature. I found the following macro code at http://support.microsoft.com/default.aspx?scid=kb;en-us;242875: Sub convert() Dim strFile As String Dim X As String Dim Y As String Dim Z As Object 'Collect Drive and directory to convert Word Docs in. X = InputBox("Please enter the drive the documents are on.", "Drive Letter", "C") Y = InputBox("Please enter the path to the directory the files are in.", "Path to files", "My Documents") 'seed the string to the first file in the directory strFile = Dir(X & ":\" & (Y) & "\" & "*.rtf") ' Start looping through files opening and saving as current version of Word. On Error Resume Next Do While strFile <> "" Documents.Open X & ":\" & (Y) & "\" & strFile, Format:=wdOpenFormatRTF ActiveDocument.SaveAs (X & ":\" & Y & "\" & strFile), FileFormat = wdFormatDocument ActiveDocument.Close strFile = Dir Loop 'Alert user operation is complete MsgBox "done" End Sub How do I convert this code into a stand-alone script file so I can distribute it? -- Regards, Ward Tag: Styles Tag: 66607
  - 11
    - Close EXCEL.EXE process Hi I need to kill Excel process totaly. After excel is close a Excel.exe process stays on. How can I close excel for good ? Regars Mikko I have used this macro to open workbook Sub chart() Dim oXL As Excel.Application Dim oWB As Excel.Workbook Dim oSheet As Excel.Worksheet Dim oRng As Excel.Range Dim ExcelWasNotRunning As Boolean Dim WorkbookToWorkOn As String 'specify the workbook to work on WorkbookToWorkOn = "C:\Documents and Settings\All Users\Huoltoraportti\ chart.xls" 'If Excel is running, get a handle on it; otherwise start a new instance of Excel On Error Resume Next Set oXL = GetObject(, "Excel.Application") If Err Then ExcelWasNotRunning = True Set oXL = New Excel.Application End If On Error GoTo Err_Handler 'If you want Excel to be visible, you could add the line: oXL.Visible = True here; but your code will run faster if you don't make it visible 'Open the workbook Set oWB = oXL.Workbooks.Open(FileName:=WorkbookToWorkOn) 'Process each of the spreadsheets in the workbook 'For Each oSheet In oXL.ActiveWorkbook.Worksheets 'put guts of your code here 'get next sheet Sheets("Taul1").Select Range("B2").Select ActiveCell.FormulaR1C1 = Me.TextBox1.Value Range("C2").Select ActiveCell.FormulaR1C1 = Me.TextBox2.Value Range("D2").Select ActiveCell.FormulaR1C1 = Me.TextBox3.Value Range("E2").Select ActiveCell.FormulaR1C1 = Me.TextBox4.Value Range("F2").Select ActiveCell.FormulaR1C1 = Me.TextBox5.Value Range("G2").Select ActiveCell.FormulaR1C1 = Me.TextBox6.Value Range("H2").Select ActiveCell.FormulaR1C1 = Me.TextBox7.Value Range("I2").Select ActiveCell.FormulaR1C1 = Me.TextBox8.Value Range("J2").Select ActiveCell.FormulaR1C1 = Me.TextBox9.Value Range("K2").Select ActiveCell.FormulaR1C1 = Me.TextBox10.Value Range("L2").Select ActiveCell.FormulaR1C1 = Me.TextBox11.Value Range("M2").Select ActiveCell.FormulaR1C1 = Me.TextBox12.Value Range("B3").Select ActiveCell.FormulaR1C1 = Me.TextBox13.Value Range("C3").Select ActiveCell.FormulaR1C1 = Me.TextBox14.Value Range("D3").Select ActiveCell.FormulaR1C1 = Me.TextBox15.Value Range("E3").Select ActiveCell.FormulaR1C1 = Me.TextBox16.Value Range("F3").Select ActiveCell.FormulaR1C1 = Me.TextBox17.Value Range("G3").Select ActiveCell.FormulaR1C1 = Me.TextBox18.Value Range("H3").Select ActiveCell.FormulaR1C1 = Me.TextBox19.Value Range("I3").Select ActiveCell.FormulaR1C1 = Me.TextBox20.Value Range("J3").Select ActiveCell.FormulaR1C1 = Me.TextBox21.Value Range("K3").Select ActiveCell.FormulaR1C1 = Me.TextBox22.Value Range("L3").Select ActiveCell.FormulaR1C1 = Me.TextBox23.Value Range("M3").Select ActiveCell.FormulaR1C1 = Me.TextBox24.Value Range("M4").Select Sheets("Kaavio1").Select 'Next oSheet If ExcelWasNotRunning Then 'oXL.SaveWorkspace oXL.DisplayAlerts = False oXL.Application.Workbooks.Close oXL.Quit End If 'Make sure you release object references. Set oRng = Nothing Set oSheet = Nothing Set oWB = Nothing Set oXL = Nothing 'quit Exit Sub Err_Handler: MsgBox WorkbookToWorkOn & " caused a problem. " & Err.Description, vbCritical, _ "Error: " & Err.Number If ExcelWasNotRunning Then oXL.Quit End If End Sub -- Message posted via http://www.officekb.com Tag: Styles Tag: 66606
  - 12
    - macro to print wide table on successive pages Can a macro be created to print a wide table on successive pages. I have a wide table (it is already landscape). Can a macro split it (say at 10 in.) and print the second part on a successive page? Excel does this easily, but I need to do it in word (I have formatting in the table that needs to be retained). Tag: Styles Tag: 66601
  - 13
    - Help getting size box on pasted-in tables? I generate a lot of tables in Excel and paste them into Word (using Excel and Word 2000). I've gone through several methods of trying to do this, most driven by the size and functionality of the table after it's pasted in. I can paste in an Excel table, and it becomes a Word table, but often the size is way too big. I've been doing this for years, and I have just now discovered the little sizing box in the lower right corner of a table!! This could be great - except for one thing. When I paste in a table that overflows the right margin, I can't get to the sizing box! Can someone give me tips on how to manage this, either in the document or with VBA, to get a handle on this handle when it's off the edge? Ed Tag: Styles Tag: 66598
  - 14
    - Form Load error on some machines Hello, I am really stumped... I got a form that loads up when a user opens a word template .dot file that has some VBA to run in it. the first form show up and has a very simple button that when click clears the start form and shows another...using variations of the code below. All machines are running Word 2003 on Windows Xp service pack 2 Private Sub CommandButton1_Click() ''Unload Me Unload frm_warning UserForm1.Show (False) ''Form.Show UserForm1 End Sub Again most machines work, but a couple of computer have errors such as "Type Mismatch" and stop on the UserForm1.Show line... If anyone has any idea why this might happen, please let me know all the computers are running Visual Basic 6.3 . would there be another dll or scripting automation plugin which might be missing? Thanks, yurps Tag: Styles Tag: 66595
  - 15
    - Can I setup a TOC to update programatically? Instead of manually hitting the F9 key to update a Table of Contents page numbers, is there a way to automatically set this up? I would hope to write some VBScript code to do this, but am not sure if it is possible. Thanks. Tag: Styles Tag: 66594
  - 16
    - If statement results inconsistent I have a userform where the user enters some numbers. I want to check that the number identified as "mininum temp" is lower than the one identified as "maximum temp". I wrote: Private Sub CommandButton2_Click() 'next button ActiveDocument.FormFields("mintemp").Result = mintemp.Value ActiveDocument.FormFields("maxtemp").Result = maxtemp.Value ActiveDocument.FormFields("cur").Result = cur.Value ActiveDocument.FormFields("minpres").Result = minpres.Value ActiveDocument.FormFields("avgh").Result = avgh.Value ActiveDocument.FormFields("maxh").Result = maxh.Value ActiveDocument.FormFields("process").Result = process.Value ActiveDocument.FormFields("contam").Result = contam.Value If mintemp.Value = "" Then MsgBox ("Please enter minimum temperature.") mintemp.SetFocus ElseIf maxtemp.Value = "" Then MsgBox ("Please enter maximum temperature.") maxtemp.SetFocus ElseIf cur.Value = "" Then MsgBox ("Please enter current temperature") cur.SetFocus ElseIf avgh.Value = "" Then MsgBox ("Please enter average humidity.") avgh.SetFocus ElseIf maxh.Value = "" Then MsgBox ("Please enter maximum humidity.") maxh.SetFocus ElseIf mintemp.Value > maxtemp.Value Then MsgBox ("Minimum temperature cannot be greater than maximum temperature.") mintemp.SetFocus Else ambient.Hide AirTreatDetail.Show End If End Sub This works the first time, and maybe the second time, but the more times I go through it the less it works. Sometimes I can only avoid the message box when both numbers are equal. What is wrong? Tag: Styles Tag: 66593
  - 17
    - Inserting a radio button in a document I'd like to be able to use option buttons in a document that I can click on to turn on or off. I don't know what the macro code is to do this when I insert one from control toolbox. Any assistance much appreciated. Using Word 2003 Tag: Styles Tag: 66592
  - 18
    - MS Word drop downs I am not vb programmer. Can anyone help define method to associate 2 drop down list boxes? As example, suppose first drop down is Area (i.e., work area (Procurement, Finance, Logistics, etc.)). Second drop down is Title (i.e., job title (clerk, manager, director, etc.)). Title list of values is dependent upon Area (i.e., noted titles only pertain to Procurement Area). Thanks in advance for any help you can provide. Tag: Styles Tag: 66590
  - 19
    - Why can't I post, answered It turns out I had to disable ie's popup blocker. Is it possible, that I'm the first person this happened to? -- papagru Tag: Styles Tag: 66589
  - 20
    - Document Map To change the document map, Word help says to right-click on the map, but when I do, nothing happens (my right click works every where else). Any ideas? Also, can the Document Map be changed with VBA? Thanks. Tag: Styles Tag: 66586
  - 21
    - How do I get the current line number in a macro? In Word 2002, I need to locate and list locations at which a string is found in the document. Once find locates the string, how do I assign the then current line number to a variable? Thanks for any suggestions, Larry Tag: Styles Tag: 66585
  - 22
    - Macro Security Level ! HI ! I know it's not possible to check the security level with VBa when the doc is open by a user. ...but I want the user changes this security level and so ...I would like to avoid the user doing anything else in the opening doc excepted: - reading a message explaining the user must change the security level to the "middle" level if an above level is checked -checking the security level -closing the doc without saving it ..or anything else to get similar results ... ...until the security level is middle or under ...and so the doc will open normally at this time ! Any help to try writting this? Thanks in advance! Thierry Borgne Tag: Styles Tag: 66577
  - 23
    - run some code before doc opening Hi I would like to parse the doc name to be opened and run some code before document opening if when parsing the document name I found some particular stuff.. Within the (document_open event) if instr("key string",activedocument.name) >0 then run some code else end if I can't get it working , can someone give me some help ? Am I doing something wrong ? How can I achieve that ? Tag: Styles Tag: 66576
  - 24
    - Insert date and time? I have one textfield in my word document. I want when I open my document to automticly insert date and time in textfield. Tag: Styles Tag: 66574
  - 25
    - checking if a folder exists before using rmdir to delete it Calling RMDIR to delete a folder that does not exist results in an error ... what is the easiest way to test if a folder exists? Thanks, in anticipation of assistance, Peter E Tag: Styles Tag: 66572
- Next
  - 1
    - Disappearing bookmarks Hello, I've encountered strange bookmark behaviour. The code is in C# but it should not matter: // myWordApp variable points to the Application object // myBookmark variable points to a bookmark. myBookmark.Select(); Word.Selection selection =3D myWordApp.ActiveWindow.Selection; selection.Text =3D "\xD6"; So far so good, but if I do: selection.Font.Name =3D "Wingdings"; or selection.InsertParagraphAfter(); The bookmark disappears. Can anyone explain what's going on and how to overcome this issue? Thanks, Alex. --=20 Address email to user "response" at domain "alexoren" with suffix "com" Tag: Styles Tag: 66562
  - 2
    - prevent template macros copying to new documant I have macros in a template used to create a specific naming convention when saved. I do not want these templates in the newly created document. Is it possible to set Word to not copy the macros? If so how? Please respond to my email address preflyght-1@yahoo.com Thanks! Tag: Styles Tag: 66560
  - 3
    - UserForm Data Capture in Word I have designed a UserForm in a word document that has a couple of comboboxs with drop down lists and a few text boxes. What do I need to do in VBA to transfer the data the user has entered into specified places in the document? Am I also able to insert other documents depending on the result of a combobox? -- Dave Tag: Styles Tag: 66550
  - 4
    - GetSpellingSuggestions -- 9132 Hello, I have successfully used the wdWildcard and wdAnagrams constant with the SuggestionMode argument for the GetSpellingSuggestions method for Word in Office 98. But these constants cannot be used with Word 2000 and Word 2003 (see: http://support.microsoft.com/default.aspx?scid=kb;en-us;224722 ). Is there any way I can use the dll and other files from Office 98 to beef-up my Word 2003 so that I get support for these constants? If so, how? Thanks, --Suresh Tag: Styles Tag: 66546
  - 5
    - big corner red X in Word Make the big red X close all windows like it used to. Tag: Styles Tag: 66544
  - 6
    - Problem with previous post re: individual footers for each copy ma I asked the question Friday if I could create a macro that would print 3 copies of a one page document with each copy having different footer text. Greg instructed me on the macro and it worked great. The problem I am having is that the document has form fields in it, and when the document form field are protected and the macro is run I get an error with no text. I assume it's because of the protection. How can I avoid the error from appearing while still having the document protected? Tag: Styles Tag: 66543
  - 7
    - Create submit button to trx to Access I have created a form in word and would like a "Submit Data" button to transfer all the data from the form to an access table in a database. I'm being a bit adventurous as I am a new user and have no idea where to begin. Can anyone help me through step by step? Tag: Styles Tag: 66538
  - 8
    - Bookmark Hi, Each paragraph in my document is a bookmark: Paragraph 1 = bm1 Paragraph 2 = bm2 Paragraph 3 = bm3 ... The user can delete paragraph. This mean that paragraph numer 4 not necessarily means bm4. It could be bm2. When I click a button, I want the macro to show me in which bookmark I clicked in and show a messagebox that correspond with that bookmark. How is this done? / Ulf Tag: Styles Tag: 66531
  - 9
    - Syntax doubt - Find and Replace Hi, Some time back I had a requirement where I had to REPLACE some text in EACH PAGE of the MAIN STORY IN MS Word. The text was of the form -- Page 83 -- or -- Page 62-- and so on and the replacement text was the related to the actual word page number. The below macro I got from NG for this purpose works great. Only change is that previously I had to find and replace text with 2 digit numbers following "Page ". But now I want to be able to replace 3 digit numbers also. I have tried changing the syntax -- .Text = "Page [0-9]{1,2}" -- to -- .Text = "Page [0-9]{1,2,3}" -- thinking that this would extend the search to one more character, but Im getting -- Runtime error '5560': The find what text contains a pattern match expression which is not valid.-- and the above error occurs at the -- .Execute Replace:=wdReplaceAll--. Strangely if I change it to .Text = "Page [0-9]{3}" -- then am able to get it working (that is am able to search for -- Page 768 -- and replace it with the desired text). Why is it that .Text = "Page [0-9]{1,2}" works well for finding -- Page 83 -- or -- Page 62-- but .Text = "Page [0-9]{1,2,3}" -- gives syntax error. Isnt the number within the squiggly bracket meant to indicate the extent of the search? Thanks a lot, Hari India Sub ReWritingPageNumbersByHelmutWeber() 'Swiped from NG by Hari Prasadh ResetSearch Dim lPgs As Long Dim lTmp As Long lPgs = Selection.Information(wdNumberOfPagesInDocument) For lTmp = 777 To lPgs Selection.GoTo _ what:=wdGoToPage, _ which:=wdGoToAbsolute, _ Count:=lTmp Selection.Bookmarks("\page").Select With Selection.Find .Text = "Page [0-9]{1,2}" .Replacement.Text = "Page " & lTmp - 20 .Wrap = wdFindStop .MatchWildcards = True .Execute Replace:=wdReplaceAll End With Next ResetSearch End Sub '--- Public Sub ResetSearch() With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False ' plus some more .Execute End With End Sub Tag: Styles Tag: 66528
  - 10
    - How do I create text that if you type within it it will be repaced Hi guys, I'm trying to create a word docment with a series of "blank" areas in it. At present they just have pink writing within them. I am looking now at being able to label these blank areas. I.E what powerpoint does with its faded text when you insert a text box. So that it will say for example "Insert Date here" then when a user puts the date in it will remove the string of text and replace it with what ever has been typed. Anythoughts would be greatly appriciated. cheers, steve Tag: Styles Tag: 66525
  - 11
    - does anybody know optical character recognition? I am trying to find out how to scan a form into OCR. Do anybody know how? Tag: Styles Tag: 66518
  - 12
    - Fixed Size Table Hello I use C++ to automate Word. Here is the code to insert a table with 1 row and 1 column BOOL CAutoWordDlg::AddCoverPage( Selection WordSelection) { WordSelection.TypeParagraph(); Range WordRange = WordSelection.GetRange(); WordRange.Collapse( vtCollapseEnd); Tables WordTables = WordSelection.GetTables(); Table WordTable = WordTables.Add( WordRange, 1, 1, vtFalse, vtTrue); } The parameters of the Add function allows the AutoFit of the table ... OK but I would like to set a fixed size for this table, say 80% of the page with and 80 % of the page height. Is it possible to do this ? Thanks for your help Thierry Tag: Styles Tag: 66515
  - 13
    - Is their any way to automacically copy text in Word from one page. Is their any way to automacically copy text in Word from one page to another, or from one document to another Tag: Styles Tag: 66511
  - 14
    - new document counter: how to change? Hello, I want to change default name for new document (like "Doc1", "Doc2", ... in Polish and German version it is "Dokument1", "Dokument2"). Is it possible? I need it, because my VBA application creates one "hidden" document for each newly created document. So, user creates first document ("Dokument1") and one hidden, linked to first one, is created (not visible, but it uses name "Dokument2"). Then, user closes document ("Dokument1") - automatically hidden document ("Dokument2") is closed - and creates second one. He is suprised, that its name is "Dokument3" (should be "Dokument2"). Is there any property to set counter of documents? Regards, Tomasz Swedrowski Tag: Styles Tag: 66510
  - 15
    - Fax programming via Ole automation for sending faxes over a LAN enviroment I search lot of time for the best fax program with candy COM interface for send faxes from my APP, over the LAN... I would apreciate some confesions/comments via email about this... Thanks from Cordoba, Spain !! ........ Tag: Styles Tag: 66508
  - 16
    - Registry setting for Proof directory? Options.DefaultFilePath(wdProofingToolsPath) returns \program files\common files\microsoft shared\proof Is there a registry setting, or some other means, to get a pointer to \Documents and Settings\username\Application Data\Microsoft\Proof when there are no custom dictionaries? -- http://www.standards.com/; See Howard Kaikow's web site. Tag: Styles Tag: 66507
  - 17
    - AutoText fields inserting as static text Program: Word 2003 Not sure how to describe this correctly, but when one of our users inserts an AutoText entry that contains a field code, such as Filename and Path or a date field, Word is inserting the *text* of the code, i.e. _ FILENAME \p _ (except there are boxes instead of "_"). I've made sure the user's language is set to English, but I'm not sure where else to begin with this problem. It's as though Word is not inserting the brackets enclosing the code, or it's automatically unlinking the field. Where the brackets should be enclosing the code, there are the boxes Word usually inserts for characters not included in a font set. So the code for pathnames and dates are inserted but not a working field code. Where the pathname should be, you just see the pathname code text in the document and that's how it prints (even when unchecking any options that cause the field code to print or be viewed in the document). I'm at a loss and am hoping for a resolution other than reinstallation. OTOH, the user *can* insert both the date field and pathname via Insert -> Field. Claudia Tag: Styles Tag: 66496
  - 18
    - Auto Fill Contracts In a contract I have the same name appearing over and over on the signature pages. How can I type it in once and have it copied throughout the document? Tag: Styles Tag: 66494
  - 19
    - delete section breaks Hi, for word xp, how could i delete all the section breaks in a document in vba? thank you, william. -- Tag: Styles Tag: 66493
  - 20
    - Strange Delineation of Sentences Consider the a document containing only: John Doe, Ph.D., is a scientist. As expected, "ActiveDocument.Words(1).Text" return "John". However, "ActiveDocument.Sentences(1).Text" returns "," and the second sentence is returned as "is a scientist". Is this a bug? Am I missing something here? Tag: Styles Tag: 66489
  - 21
    - How do I hide information in a Word document for different docume. Our team would like to create information once and use it throughout multiple versions of a document. Since we did not receive approval for a CMS, I am trying to optimize Word 2003 to gain us the same benefits. I guess you call it applying conditions to text. Thanks! Tag: Styles Tag: 66488
  - 22
    - Merging Two documents and have them print duplex as one document Here is what I need to do - I have a word document with several pages (grade reports), usually in the thousands. Each page is a separate grade report. I have a generic letter that I would like to print out on the back of each grade report (duplex printing). How can I add this generic letter to the back of each of the grade report? Is there a way to do this without using a macro...and if not how can I do it with a macro? Thanks. Tag: Styles Tag: 66483
  - 23
    - Specify Number of copies and individual footer for each copy. I have a document that I need to print exactly 3 copies of. On each copy I want a different footer, like "Customer Copy", "Our Copy", "File Copy". How can I do this programatically? Tag: Styles Tag: 66480
  - 24
    - Spelling suggetsions in Word should be in reverse order. In MS Word: When you right-click over an incorrectly spelt word, the spelling suggestions should list the most likely word closer to the mouse; the list should begin with the least likely suggestion and end with the most likely. Reversing the order that the words are currently listed in would make this feature more convenient. Tag: Styles Tag: 66473
  - 25
    - Spelling suggetsions in Word should be in reverse order. In MS Word: When you right-click over an incorrectly spelt word, the spelling suggestions should list the most likely word closer to the mouse; the list should begin with the least likely suggestion and end with the most likely. Reversing the order that the words are currently listed in would make this feature more convenient. Tag: Styles Tag: 66472

Is there an equivalent of .clearformatting with respect to styles? How do I
programatically clear all the current style options, use the default style
and apply my settings on to it?

I want to base my style on "no style" and then add some formatting to it. I
am not sure how to do this through VBA.

Thanks for your time.

Vince

Top

Re: Styles by Vince

Vince
Thu Apr 14 03:14:42 CDT 2005

Sorry cancel that. It goes .basestyle="". Just recorded a macro!

Thanks,
Vince

"Vince" <sdsad@fsd.com> wrote in message
news:u%23iUFmMQFHA.164@TK2MSFTNGP12.phx.gbl...
>
> Is there an equivalent of .clearformatting with respect to styles? How do
I
> programatically clear all the current style options, use the default style
> and apply my settings on to it?
>
> I want to base my style on "no style" and then add some formatting to it.
I
> am not sure how to do this through VBA.
>
> Thanks for your time.
>
> Vince
>
>

Top