I want to write a macro that only works in one word document

Ron147 Published at Dev

Ron147

I've got this macro in MS Word 2016. It works in every word document, but I want it to work in only one word document eg 'Test.docx'. Can I add something to the code to do this?

The macro in question is this:

Sub MyMistakesFinal()
'
' MyMistakesFinal Macro
'
'
    Selection.Find.ClearFormatting
    With Selection.Find.Font
        .Bold = True
        .Underline = wdUnderlineSingle
    End With
    With Selection.Find
        .Text = ""
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute
    Selection.Previous(Unit:=wdParagraph, Count:=1).Select
End Sub

Domenic

You can test whether the active document is "Test.docx". If not, exit the sub...

Sub MyMistakesFinal()
'
' MyMistakesFinal Macro
'
'
    If ActiveDocument.Name <> " Test.docx" Then Exit Sub

    'etc
    '
    '
    '

End Sub

Collected from the Internet

Please contact [email protected] to delete if infringement.

edited at2021-05-26

Comments

0 comments

I want a Word macro to be only associated with a specific .docm file

Want to read only one document

I want to convert Arabic numerals “٠,١,٢,٣,٤,٥,٦,٧,٨,٩” from whole document into English numerals using Word Macro?

Word VBA macro button only works once

I want to write a macro that only works in one word document

I want to write a macro that only works in one word document

Can't pre-populate phone number and message body in SMS link on iPhones when SMS app is not running in the background

pump.io port in URL

Failed to listen on localhost:8000 (reason: Cannot assign requested address)

Unable to use switch toggle for dark mode in material-ui

grouping by column variables and appending a new variable based on condition

BigQuery - concatenate ignoring NULL

Spring Boot JPA PostgreSQL Web App - Internal Authentication Error

ngClass error (Can't bind ngClass since it isn't a known property of div) in Angular 11.0.3

Python Read Directory And Output to CSV

Remove adjacent duplicates in linked list in C

Angular 8. Unknown amount of http.get requests in array to call, must be sequential, what to use

How to keep curl session alive between two php processes?

Limit number of characters in uitextview

JMeter: Why get error when try to save test plan

Always setting the text cursor on Textbox

MTKView Displaying Wide Gamut P3 Colorspace

Vector input in shiny R and then use it

How to implement an authentication method using Spring Boot and JPA?

Laravel getting value from another table using eloquent

org.springframework.web.client.HttpClientErrorException: 401 null

When I click any button in my view page the form is submitted