Microsoft Word

27K

Solutions

21K

Contributors

Microsoft Word is a commercial document editing program that is part of the Microsoft Office suite. It features numerous text-editing tools for creating richly formatted documents, along with tools for the use of macros in Word documents. Word's native file formats are denoted either by a .doc or .docx file extension. Plugins permitting the Windows versions of Word to read and write formats it does not natively support, such as the OpenDocument format (ODF) are available. Word can import and display images in common bitmap formats such as JPG and GIF. It can also be used to create and display simple line-art.

Share tech news, updates, or what's on your mind.

Sign up to Post

Hi


Imagine after installing Ms Access 2016 my Ms Excel & Word icons have turned white and now any word document is opening in note pad, any solution??????????????
0
Cloud Class® Course: Microsoft Office 2010
LVL 12
Cloud Class® Course: Microsoft Office 2010

This course will introduce you to the interfaces and features of Microsoft Office 2010 Word, Excel, PowerPoint, Outlook, and Access. You will learn about the features that are shared between all products in the Office suite, as well as the new features that are product specific.

I am now unable to access it, it is saying that it has been renamed/deleted/or moved.  Just wondering if there is any way to recover it
0
Need to make Word 2018 print a Booklet with 8 panels

I asked someone to create for me a Word template for the following booklet type:

http://gtsak.info/small-brochure-template/small-brochure-template-make-pocketmods-little-booklets-with-ms-word-3-steps-download/

I was given the following:

8-Field-Brochure-Template.docx

and was told it works fine on Word 2010.

InWord 2018 I do not see how to set to 8 pages...

Layout does not contain 8 pages
I see 6 or 9,,not 8.

Any idea why not?

Thanks.
0
Hi

I am trying to work out the best way to send an order document from my ASP.net web app. Initially I looked at creating a PDF document from scratch
and found that this is quite complicated. Is there a way to use some sort of template document in Excel, Word or PDF that I can just populate with numbers
and text?
Another alternative would be to use html to build a sort of document in the body of the email?
A further way would be to create an ASP.net web page that could be printed off
0
My requirement is to grab two texts between two flags placed in word file and write in to excel - 2 columns
Flags can be [mydate] and [/mydate]
and [mytext] and [/mytext]

e.g. [mydate] 2018-07-14 [/mydate] blah blah [mytext] this is my text [/mytext]

It should be repeated until all occurrence in the file.

I am using following code as guided by GrahamSkan

Option Explicit

Sub GrabUsage()
Dim FName As String, FD As FileDialog

Dim WApp As Word.Application 'Object
Dim WDoc As Word.Document 'Object
Dim WRange1 As Word.Range
Dim WRange2 As Word.Range

Dim ExWks As Excel.Worksheet
Dim ExR As Excel.Range

Dim r As Integer
Dim bTesting As Boolean
Dim bVisible As Boolean
Dim bNewWordApp As Boolean
Dim bFinish As Boolean

    bTesting = True
    Set ExWks = Selection.Worksheet
    r = 1

    If bTesting Then
       FName = "I:\Allwork\ee\29108962\InDoc.docx"
    Else
        'let's select the WORD doc
        Set FD = Application.FileDialog(msoFileDialogOpen)
        FD.Show
        If FD.SelectedItems.Count <> 0 Then
            FName = FD.SelectedItems(1)
        Else
            Exit Sub
        End If
    End If
    
    ' open Word application if necessary and load doc
    On Error Resume Next 'supress error checking for one line only
        Set WApp = GetObject(, "Word.Application")
    On Error GoTo 0
    If WApp Is Nothing Then
        Set WApp = CreateObject("Word.Application")
        bNewWordApp = True
    End If
    'make word application visible after 

Open in new window

0
I'm looking for an MS Word VBA macro to remove redundant blank paragraphs spacing from Word documents.  There are many examples of snippets which replace ^p^p with ^p and loop to catch ^p^p....^p such as GrahamSkan's answer to Q 23519746. When run these have the effect of making all paragraphs in a document contiguous i.e. there are no gaps between them.

Instead, I would like that where any two text-containing paragraphs were previously separated by one or more blank paragraphs then following the macro being run each such pair should be separated by only one blank paragraph. In other words, paragraphs that were previously separated from each other should remain separated but that separation should where necessary be contracted.

Any suggestions gratefully received.
0
How to get MS Word message box to display content vertically?

Dim strInText As String
Dim strOutText As String
strInText = "MATERIALS ASSESSMENT                                                                          Structural failure, Handling Characterictics,Installation characteristics, Chemical exposure, Defective material, Materials not inspected, Wrong materials delivered, Material failed after installation, Characteristics/design presents non-typical handling/use challenges,  None of the Above "
strOutText = Replace(strInText, ",", vbCrLf)
MsgBox strOutText

End Sub
The MS Word macro I adjusted to get the items to display vertically, but I don't know the macro should be written to get the items to display vertically unless I use this long sentence with commas in it, see macro below:
Macro-Vertical.jpg
0
Below is a section of MS Word VBA code which removes duplicate paragraphs from a document. It retains the first instance of each paragraph it finds, and deletes any subsequent instances ("duplicates").  Does anyone know how I might amend the code so that instead:

1) it deletes the first and all subsequent instances of each paragraph except the last instance (the one closest to the bottom of the document) which it retains? PS: since posting I have figured this one out.

2) It deletes all instances of a paragraph which has duplicates, retaining none?

3) In the process of trying to solve (2) I realise that I don't really understand how the 'collect duplicates' section works. If anyone could explain that to me I would be very grateful!

Sub DeleteDuplicateParagraphs()
  Dim p As Paragraph
  Dim d As New Scripting.Dictionary
  Dim t As Variant
  Dim i As Integer
  Dim StartTime As Single

  StartTime = Timer

  ' collect duplicates
  For Each p In ActiveDocument.Paragraphs
    t = p.Range.Text
    If t <> vbCr Then
      If Not d.Exists(t) Then d.Add t, New Scripting.Dictionary
      d(t).Add d(t).Count + 1, p
    End If
  Next

  ' eliminate duplicates
  Application.ScreenUpdating = False
  For Each t In d
    For i = 2 To d(t).Count
      d(t)(i).Range.Delete
    Next
  Next
  Application.ScreenUpdating = True

  MsgBox "This code ran successfully in " & Round(Timer - StartTime, 2) & " seconds", vbInformation
End Sub

Open in new window

0
What's the difference between BaseAdapter, SimpleAdapter, Custom SimpleAdapter, ArrayAdapter and Custom ArrayAdapter in Android ? I have see some articles but I can't identify when I select one over anothers ?

Thx
0
Need a Word Template (Mac) for multi-fold booklet

I love the idea of using this little pocket booklet, but can not make this template in Word.

I assume the template would maintain the proper orientation, for example.

Can anyone dig one up for me?

http://gtsak.info/small-brochure-template/small-brochure-template-make-pocketmods-little-booklets-with-ms-word-3-steps-download/

Thanks.
0
Introducing Cloud Class® training courses
LVL 12
Introducing Cloud Class® training courses

Tech changes fast. You can learn faster. That’s why we’re bringing professional training courses to Experts Exchange. With a subscription, you can access all the Cloud Class® courses to expand your education, prep for certifications, and get top-notch instructions.

I am trying and (so far) failing to adapt a Word VBA macro to run in Outlook 2016. I wonder if anyone can help? Within Outlook I have referenced the Microsoft Word 16.0 Object Library, and I have tried to use the suggestions at http://www.vboffice.net/en/developers/use-word-macro-in-outlook/  and https://www.slipstick.com/developer/word-macro-apply-formatting-outlook-email/ but without success.

The Word VBA I am trying to use is below. Its purpose is to remove redundant (repeated) paragraphs which it does in Word. I want it to perform the same function on an email message which is open and being edited within Outlook 2016.

Sub DeleteDuplicateParagraphs()
'PURPOSE: Remove Duplicate Paragraphs Throughout the Entire Word Document
'SOURCE: www.TheSpreadsheetGuru.com/the-code-vault

Dim p1 As Paragraph
Dim p2 As Paragraph
Dim DupCount As Long

DupCount = 0

For Each p1 In ActiveDocument.Paragraphs
  If p1.Range.Text <> vbCr Then 'Ignore blank paragraphs
    
    For Each p2 In ActiveDocument.Paragraphs
      If p1.Range.Text = p2.Range.Text Then
        DupCount = DupCount + 1
        If p1.Range.Text = p2.Range.Text And DupCount > 1 Then p2.Range.Delete
      End If
    Next p2
    
  End If
  
  'Reset Duplicate Counter
    DupCount = 0

Next p1

End Sub

Open in new window

0
I got the following pages after converting a PDF to Word. I want to combine the two tables, but don't know what the problem is or how to fix it.

Split Tables
1
Grab text from a word file with Excel VBA
=======================================
My requirement is to grab two texts between two flags placed in word file and write in to excel - 2 columns
Flags can be [mydate] and [/mydate]
and [mytext] and [/mytext]

e.g. [mydate] 2018-07-14 [/mydate] blah blah [mytext] this is my text [/mytext]

It should be repeated until all occurrence in the file.
Sub GrabUsage()
Dim FName As String, FD As FileDialog
Dim WApp As Object, WDoc As Object, WDR As Object
Dim ExR As Range

    Set ExR = Selection ' current location in Excel Sheet

    'let's select the WORD doc
    Set FD = Application.FileDialog(msoFileDialogOpen)
    FD.Show
    If FD.SelectedItems.Count <> 0 Then
        FName = FD.SelectedItems(1)
    Else
        Exit Sub
    End If

    ' open Word application and load doc
    Set WApp = CreateObject("Word.Application")
    ' WApp.Visible = True
    Set WDoc = WApp.Documents.Open(FName)

    ' go home and search
    WApp.Selection.HomeKey Unit:=6
    WApp.Selection.Find.ClearFormatting
    WApp.Selection.Find.Execute "[EventDayMth]"
    

    ' grab and put into excel
    Set WDR = WApp.Selection
    ExR(1, 1) = WDR ' place at Excel cursor

   'repeat
    WApp.Selection.Find.ClearFormatting
    WApp.Selection.Find.Execute "[EventDayMth]"
  
    WDoc.Close
    WApp.Quit

End Sub

Open in new window

0
I need to find a keyword in a word document title/name so that I can perform an if statement on the result

I have tried the following with a document that had the word "New" in it and this executed in the document open function:

    If ActiveDocument.Name = "New" Then
        MsgBox "New Found"
    Else
        MsgBox "New Not Found"
    End If

As you can guess...it didn't work out and that's why I am here!  :)
0
Hi, my 2007 Word defaults to a double space format and I want the one next to it (no spacing) to be the default.  I've looked under options and everywhere else I know to look but can't find a way to do it.  Can it be done?  Please see pic 1.  Pic 1Thanks
0
Hi,

The user has an HP office jet pro 8710 printer and the laptop is Dell Latitude 7470. the HP printer driver on this laptop only prints PDF and online docs, not office apps, such as word, Excel...

Any suggestions are welcome!

Thank you in advance!

May
0
Hi,
I'm still in the process of migrating from an old Win10 computer to new Win10 machine I need to copy over my CUSTOM.DIC (Word 2016); however, from what I saw in my Word options, there are two CUSTOM.DICs.
Custom dics
Do I need to copy over both? And if so, where would I put the roaming copy? The folder name seems rather specific.

Thanks,
Steve
0
Hello Experts,

DocumentBeforeSave, DocumentBeforeClose, DocumentChange functionality not working in .docx, but works in .dotm.

How does one make it work?  Help!

The attached file will need its extension changed from .zip to .dotm...
ECT.zip
0
A user wants to read through a document in Microsoft Word and manually determine which blocks of text should be cut and pasted into a second document. He marks the text to be removed by manually highlighting it yellow.

Would it be possible to use VBA to automatically select all text within that document which the user has previously highlighted yellow, so that he can then cut and paste it into the second doc? If so, how?
0
Cloud Class® Course: C++ 11 Fundamentals
LVL 12
Cloud Class® Course: C++ 11 Fundamentals

This course will introduce you to C++ 11 and teach you about syntax fundamentals.

In Microsoft Word 2016 one of the settings is the type over, which makes it so you can press the insert key then when you type it types over the existing text.  Also increasing the zoom on the page, it opens at 100% but when I go to 125 it does not stay there when I close and re-open Word.  I have tried to save the changes to the NORMAL.DOT file but that's not making any difference.  I also tried logging in as a different user but that didn't help either.
0
Hey Experts,

I have a strange issue; the following code works in a Word .dotm but doesn't work when you open the template by double left clicking (regular .doc mode).


Private Sub txtRequestor_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    ToggleCounter = 1
    Counter
End Sub

'===========================================================================================

Sub Counter() 'Toggles cmdStartRequest color every one second via "ColorToggle" sub
    Application.OnTime Now() + TimeValue("00:00:01"), "ColorToggle"
End Sub

'===========================================================================================

Sub ColorToggle() 'Toggles cmdStartRequest background color
    If ToggleCounter = 5 Then
        Exit Sub
    Else
        If cmdStartRequest.BackColor = 3158271 Then
            cmdStartRequest.BackColor = 65280 'Green
        Else
            cmdStartRequest.BackColor = 3158271 'Red
        End If
        ToggleCounter = ToggleCounter + 1
        Counter
    End If
End Sub

'===========================================================================================

Open in new window


The ToggleCounter variable is located in a Module as a Byte.

Change the file extension to .dotm

Any thoughts?
0
Hi I’m looking to export settings and have them listed in an easy to read format. In a word doc.  The doc would look like the html report but editable


Using office 2013 2016.  Gpos are Windows 2012 r2.


I know how to do reports I just wondered if any one got a pretty way of doing it to word.  

Cheers
0
I am running MS Office 365 on my new Lenovo P71 Laptop (Windows 10).  Every so often, usually in the middle of typing a long email, my Office programs freeze - my mouse moves, but I can't save, type, send or do anything.  I thought it was just an Outlook thing, but I just noticed that when I have MS Word open it is also frozen.  I don't want to lose my lengthy work product, and thought that if I shut down other programs and gave it a chance to recover it eventually would.  But it's been 20 minutes, and both Outlook and Word are still frozen.  Can you explain why this is happening, how to avoid it, and (hopefully) how to recover without losing my work?

Thanks,

Phil
0
I'm starting to write more documents in powerpoint as its easy to show to people and also as it makes me write more concisely.
But MS Word has more functionally  (such as set styles, table of contents) which helps me more quickly produce professional documents.
I there a feature, or available template, that I can use in MS Word to produce a powerpoint like type simple document that can be showed on powerpoint also as needed? Its like a 'slide' type document.
0
I am not happy. I had a 500 page document saved on my USB I was working on.in MS Word -- it froze up/not responding. I closed it via "End Task" and went to get back into it, and it only saved the first 27 pages... Please tell me there's some back door way to get this back...I've checked recover documents and it's not there...
0

Microsoft Word

27K

Solutions

21K

Contributors

Microsoft Word is a commercial document editing program that is part of the Microsoft Office suite. It features numerous text-editing tools for creating richly formatted documents, along with tools for the use of macros in Word documents. Word's native file formats are denoted either by a .doc or .docx file extension. Plugins permitting the Windows versions of Word to read and write formats it does not natively support, such as the OpenDocument format (ODF) are available. Word can import and display images in common bitmap formats such as JPG and GIF. It can also be used to create and display simple line-art.