Word 2013 VBA Runtime Error 4198

I havea macro thataddsrows in a table(over 500rows)aftera bit ofinsertionsreturnsthe errorruntime
error4198.
my codeis as follows:
For i = 1 To Wx
Selection.PasteAppendTable
Next i....
Thanks
Marzio

Hi,
I have a document with
the following table:
I mustadd at least1000 linesvia VBA,I try todo it withthe
following code:
'Sub AutoOpen()
Sub Macro1()
' AutoOpen Macro
' Macro created 03/05/2013 by gary and roger
Dim UsPath$
Dim Wx As Integer
UsPath$ = Environ("userprofile")
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "[#Tipo]"
.Replacement.Text = fVal$
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=5, Extend:=wdExtend
Selection.Copy
Wx = 1000
Selection.MoveDown Unit:=wdLine, Count:=1
Selection.PasteAppendTable
For i = 1 To Wx
Selection.PasteAppendTable
Next i
End Sub
the error is random
Thanks Marzio

Similar Messages

Word 2013 VBA Complie error in hidden module: frmabout

Cannot seem to find a resolution to this problem.
Happening on one system and weirdly only one user profile.
Each time the user of profile one opens or closes MS Word 2013 they receive a dialog box indicating the following.
VBA : COMPILE ERROR IN HIDDEN MODULE: FRMABOUT
THIS ERROR COMMONLY OCCURS WHE CODE IS INCOMPATIBLE WITH THE VERSION, PLATFORM, OR ARCHITURE OF THIS APPLICATION. CLICK "HELP" FOR INFORMATION ON HOW TO CORRECT THIS ERROR.
On the same system user, profile two opens and closes MS Word 2013 without any error.
Word 2013 seem usable even with the error it's just annoying to the end user.
System is not connecting to a domain or external server.
Any assistance is appreciated.
Art

Hi,
For the error message, the FRMABOUT macro code in that template is not compatible with any recent version of Word. We may try to find the template and rename it.
The template is typically named FRMABOUT.dotm, although the number may be different depending on which version of the wizard you installed.
There are three possible locations to find the template:
%appdata%\Microsoft\Word\STARTUP
C:\Program Files\Microsoft Office\Office15\STARTUP
C:\Program Files (x86)\Microsoft Office\Office15\STARTUP
For the first one, paste the path into the address bar of the file explorer and press Enter, so the %appdata% part gets expanded to the proper place in your user profile.
The last of the locations will exist only if you're running 32-bit Office on 64-bit Windows.
Look in each place and rename the file wherever you find it. Then restart Word.
More reference:
http://support.microsoft.com/kb/921541/en-us
Regards,
George Zhao
TechNet Community Support

RH8 for Word 2003. Runtime Error 5152: Cant move focus to control

Hi, I am trying to open a word file from the RoboHelp source files and am getting the following error:
Runtime Error '5152': Can't move focus to the control because it is invisible, not enabled, or of a type that does not accept the focus.
I am using Word 2003 and RoboHelp 8. I didnt not change anything in the code, its a RoboHelp provided code. RH was installed with my netword id and with admin rights. When I click debug, it highlights the following piece of code.
Private Function IsRoboHookLoaded() As Boolean
    IsRoboHookLoaded = False
    ' No addins, not loaded
    If (AddIns.Count = 0) Then
        GoTo IsRoboHookLoadedExit
    End If
    For i = 1 To AddIns.Count
        AddInName$ = LCase$(AddIns.Item(i).Name)
        If (AddInName$ = "robohook.wll") Then
            If (AddIns.Item(i).Installed = True) Then
                IsRoboHookLoaded = True
                Exit For
            End If
        End If
    Next
IsRoboHookLoadedExit:
End Function
Also, when I click end and try to close the Document, I get another error:
Runtime Error '5152': Method 'Name' of Object 'AddIN' failed.
It again highlights the same piece of code on debug.
Can you please suggest why this might be so?
Thanks in advance.
- Shubs

The formatting is lost if the robohelp.dot template is not present in the same folder as the word document I am trying to open (and edit). The template is still present under application data\templates. Below are your answers:
So if you have the robohelp.dot in the application data\templates folder and open the project and the doc, the fomatting is gone in the doc and it is is plain text, correct? - Yes
Are any styles attached to the text at all? - Yes
For instance if you highlight what was a heading 1, is it still heading 1? - Yes - It still shows as heading 1, but not as big and coloured as the headings in documents with robohelp.dot
if you create a new help project, do you run into the same problem? - Yes
I tried copying the styles from robohelp.dot to my document, but still it doesn't reflect the changes.
I want to be able to open the document (with the robohelp template and its styles attached to it) and edit it, without changing any styles/formatting.
I am not an expert on this but my feeling is it has something deeper to do with other than just the location of the template or the styles. There should be a reason for the runtime error 5152: "Can't move focus to control....".

Vba runtime error

Hi,
Our workbook has three sheets and each sheet is having one query. i written vba code to remove '#' values. But when i am refresh all the queries at once i am getting the runtime error
run-time error '1004'
select method of Range class failed
How to solve this:
<b>this is my code:</b>
Sub SAPBEXonRefresh(queryID As String, resultArea As Range)
If queryID = "SAPBEXq0001" Or queryID = "SAPBEXq0002" Or queryID = "SAPBEXq0003" Then
resultArea.Select
'Remove '#'
Selection.Cells.Replace What:="#", Replacement:="", LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False, MatchByte:=True
'Remove 'Not assigned'
'Selection.Cells.Replace What:="Not assigned", Replacement:="", LookAt:=xlWhole, _ SearchOrder:=xlByRows, MatchCase:=False, MatchByte:=True
End If

Please tell us which line creates the error.
If it is the
   resultArea.Select?
If so try following:
I assume SAPBEXq0001 to be on sheet 1, SAPBEXq0002 on sheet 2, SAPBEXq0003 on sheet 3 for this coding:
Sub SAPBEXonRefresh(queryID As String, resultArea As Range)
Dim SheetNo As Double
Select Case queryID
    Case "SAPBEXq0001"
      SheetNo = 1
    Case "SAPBEXq0002"
      SheetNo = 2
    Case "SAPBEXq0003"
      SheetNo = 3
    Case Else
      Exit Sub
End Select
'Remove '#'
Sheets(SheetNo).resultArea.Replace What:="#", Replacement:="", _
LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False, _
MatchByte:=True
'Remove 'Not assigned'
Sheets(SheetNo).resultArea.Replace What:="Not assigned", Replacement:="", _
LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False, _
MatchByte:=True
End Sub
hope that helps (and runs, not tested.
br
Andreas
Message was edited by:
        Andreas Hinrichs

Word 2013 VBA to format a picture with tight text wrapping

I use a recorded macro to occasionally insert a small picture repeatedly at random places. Here is the code I use:
Sub Sidewinder()
' Sidewinder Macro
Selection.InlineShapes.AddPicture FileName:= _
"C:\Users\Korndorb\Pictures\Sidewinder (573x409) (204x146).jpg", _
LinkToFile:=False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Collapse
End Sub
I have not been able to have the macro select the picture and specify the word wrap format as "tight". The "selection.moveleft ..." was my recorded attempt at selecting the picture. That selected the picture, but the recorded attempt
to click on the little format icon and then select "tight" did not work because as soon as I click the format icon, the picture is de-selected. I would appreciate any help (Paul?)
Thanks - Bob K.
korndorb

Thank you very much, Paul. I wish it were easier to use help or other resources to handle simple questions like this in working with VBA. Or is there an easy help system that I've overlooked? I try the F1 key on error messages and that does lead me to a
solution, but not very often. And I never have comprehended or even seen a good presentation on this "object - properties - method, etc" structure. Perhaps if i had a better understanding of that then finding answers on my own would be easier. Any suggestions?
Anyway your solution totally worked, and thanks once again.
Regards, Bob K.
korndorb

VBA Runtime Error 1004 "Application-defined or Object-defined error"

I have code VBA code written in MS Access 2010 (.mbd file) to write data into an Excel file (.xls file). Below is the code to write data into that excel file. When you run this code, it always throws Error#1004 "Application-defined or Object-defined
error". When you debug the code (F8) or run it (F5), it runs absolutely fine with out any issues. I am still not able to figure it out on what exactly the issue is. This code works fine when executed in MS Access 2007.
Below is thr code that's getting executed and when it fails, the focus is set on the 3rd last line of the code marked in double astriek mark.
Sub PopulateReport(appExcel As Object, testcam)
Dim Site As String, intRec As Integer, i As Integer, cnt As Integer, intRecSet As Integer, cntr As Integer
Dim F1 As String, F2 As String, F3 As String, F4 As String, F5 As String, F6 As String, F7 As String
Dim F8 As String, F9 As String, F10 As String, F11 As String, F12 As String, F13 As String, CAMDate As Date
Close
i = 0
cnt = 0
cntr = 0
Set cnn = CurrentProject.Connection
rec.Open "SELECT * FROM Site", cnn, adOpenStatic, adLockPessimistic
rec.MoveLast
rec.MoveFirst
intRec = rec.RecordCount
Do Until cnt = intRec
rec.MoveLast
rec.MoveFirst
rec.Move cnt
Site = rec(4)
Select Case Site
Case "Fort Worth"
cntr = 0
recset.Open "SELECT * FROM Employee", cnn, adOpenStatic, adLockPessimistic
recset.MoveLast
recset.MoveFirst
intRecSet = recset.RecordCount
appExcel.Application.Goto Reference:="START_FW_CL"
Do Until cntr = intRecSet - 1
appExcel.Selection.EntireRow.Copy
appExcel.Selection.EntireRow.Insert
cntr = cntr + 1
Loop
appExcel.Application.CutCopyMode = False
appExcel.Application.Goto Reference:="START_FW2_CL"
go = appExcel.Application.Range("START_FW2_CL")
cntr = 1
With appExcel.Worksheets("Accts. > Clearing").[START_FW2_CL]
Do Until recset.EOF
**.Offset(cntr, 0) = recset(0)**
.Offset(cntr, 1) = recset(1)
.Offset(cntr, 2) = recset(2)
End Sub

What's wrong about it? It can only copy what you chose to have in the recordset. If you only want some fields or fields in a different order, replace
SELECT * FROM with
SELECT Field1, Field2, etc
CopyFromRecordset is bay far the best method and runs much faster.
Rod Gill
Author of the one and only Project VBA Book
www.project-systems.co.nz

I am mac user and want to create Object in VBA macro. when i write "set objwrd=createObject("Word.Application")"- it returns "runtime error "492" can't create object". now what it alternative to create object for word in excel macro???

I am mac user and want to create Object in VBA macro. when i write "set objwrd=createObject("Word.Application")"… it returns "runtime error "492" can't create object". now what it alternative to create object for word in excel macro???

Any help here...
http://support.microsoft.com/kb/288117
http://www.macworld.com/article/1154785/welcomebackvisualbasic.html

Runtime error 4605 and word application crashing

Hello Everyone,
I wrote a script to add TAGs as comments of word document. The criteria of adding tag is based on outline numbering as document do not follow word styles, I had to use outline numbering for this purpose.
There are couple of issues I am facing.
1.) script is very slow and sometimes my word application crashes.
2.) sometimes I get a runtime error 4605 'This command is not available' for line "Selection.Comments.Add Range:=Para.Range, text:="[" & sIdLabel & sCurrentNumber & "]" & vbCrLf ' ID‘}"
Here is my updated code
'script to insert TAGs as comment based on word document outline.
' The format of TAG is provided by user and also the step by which TAG number need to be incremented
Public Sub CreateOutline()
Dim sIdLabel As String
Dim sCurrentNumber As String
Dim sStepNumber As String
Dim Para As Paragraph
Application.Templates.LoadBuildingBlocks
'get the TAG format from user.
sIdLabel = InputBox("Provide the TAG ID", "TS_FS_")
sCurrentNumber = InputBox("Provide the Current number", "001")
'get the step by which the TAG number is to be incremented everytime.
sStepNumber = InputBox("Provide the step", "1")
For Each Para In ActiveDocument.Paragraphs
If Para.Range.ListParagraphs.Count = 1 Then
Para.Range.Select
Selection.Move wdParagraph, 1
Selection.Comments.Add Range:=Para.Range, text:="[" & sIdLabel & sCurrentNumber & "]" & vbCrLf ' ID‘}
sCurrentNumber = Format(Val(sCurrentNumber) + Val(sStepNumber), String(Len(sCurrentNumber), "0"))
End If
Next Para
End Sub

Hi Ashishk15,
Since you were not able to reproduce the error every time, I suspect this issue maybe relative to the context of document you were handling.
I am also trying to reproduce this issue in Word 2013 however failed. The code works well for me like figure below:
>>2.) sometimes I get a runtime error 4605 'This command is not available' for line "Selection.Comments.Add Range:=Para.Range, text:="[" & sIdLabel & sCurrentNumber & "]" & vbCrLf ' ID‘}"<<
What's version of Word are you using and the exact error message? Can you add the comment manually? If yes, would you mind sharing with us a reproducible document to help us narrow down this issue.
Regards & Fei
We are trying to better understand customer views on social support experience, so your participation in this interview project would be greatly appreciated if you have time. Thanks for helping make community forums a great place.
Click
HERE to participate the survey.

Excluding VBA codes from grammar & Spell checker in word 2013

hi Guys
i am learning VBA & i write my notes & my exercises in a word document.
the problem is Grammar & spell checker shows VBA codes as errors.
i don't want to completely disable checker. is there any method or Add-on so that we introduce Correct VBA codes as correct sentences to word 2013 so that it doesn't show them as errors ?
thanks in advanced

i tested it but i noticed an strange behavior. it sometimes works but sometime doesn't. or sometime partially works.
for example i have defined a box as a border around the selected Area. this applies but although i have selected "do not check spelling or grammar" , system again shows spelling & grammar errors as you see in the screenshot. it's seen even
after i reapply style. any further help please?
Your screenshots have far too little resolution to see anything meaningful. I cannot see what Style you're applying the attributes to, or how you're using that Style. If you're applying the Style to text that's already in the document, you may need to run the
spell-checker to clear the 'error' underlining that was already there.
Cheers
Paul Edstein
[MS MVP - Word]
i have created the "NOGrammarSpellCheck" Style correctly.
yes i had written some VBA codes in my doc, then i created my "NoGrammarCheck" Style & Applied it on the selected Exiting codes. but again errors are shown. i noticed that when i again click on my style to apply, know errors disappear.
so i found that if codes exit before, we must apply the
"NoGrammarCheck" Style Twice so that it completely be applied.
but if we Apply the style on a blank area in word doc & then paste our VBA codes in that Area, now everything is ok & no grammar or spell check is shown.
am i correct ?

Duplicate a Shape in Word 2013 from Access 2013 error

Error occurs on With oshp.duplicate line. From Access 2013 vba need to duplicate a shape in a Word 2013 document.
In a simple test document the With oshp.duplicate line works. In the actual document that has been working fine using Office 2010 it causes an error on that line.
Public Function SpecialTable_testDup()
Dim shp As Word.Shape
Dim oshp As Word.Shape
Dim oshpRng As Word.shaperange
Dim oshpcopy As Word.Shape
Dim shpnum As Long
Dim shptop As Long
Dim shpleft As Long
Dim shpID As Integer
Dim i As Integer
Dim ShapeIndex As Integer
Dim mydoc As Word.Document
Set mydoc = ActiveDocument
mydoc.Activate
'activate for good measure
i = 1
For Each shp In mydoc.Shapes           'kk
    If shp.Title = "chtGeoPieQ" Or shp.Title = "chtSegPiesQ" Then
        ShapeIndex = i
        shptop = shp.top
        shpleft = 0
        shpnum = shp.ID
        Debug.Print "mydoc.Shapes(i).ID = " & mydoc.Shapes(i).ID
        Exit For
    End If
    i = i + 1
Next shp
Set oshp = mydoc.Shapes(ShapeIndex)
    With oshp
        .top = shptop
        .Left = shpleft
        shpID = oshp.ID
        Debug.Print "oshp.name = " & oshp.name
   End With
With oshp.Duplicate        'ERROR
    .name = "newshape1"
    .top = 200
    .Left = 100
    Debug.Print "mydoc.Shapes(newshape1).ID = " & mydoc.Shapes("newshape1").ID
End With
End Function
Kim Khan

Error occurs on
With oshp.duplicate line. From Access 2013 vba need to duplicate a (pie chart) shape in a Word 2013 document. Also I
tried  Set oshpcopy = oshp.Duplicate line and received the same error that crashes Word 2013.
Run-time error -2147023170. Automation error. The remote procedure call failed.
Can I send the Word 2013 file via email to you? Are there any none bugs regarding the duplicate command in Office 2013?
Code starts:___________________________________
Public Function testDup()
Dim shp As Word.Shape
Dim oshp As Word.Shape
Dim oshpRng As Word.shaperange
Dim oshpcopy As Word.Shape
Dim shpnum As Long
Dim shptop As Long
Dim shpleft As Long
Dim shpID As Integer
Dim i As Integer
Dim ShapeIndex As Integer
Dim mydoc As Word.Document
Set mydoc = ActiveDocument
mydoc.Activate
'activate for good measure
ShapeIndex = 1
i = 1
For Each shp In mydoc.Shapes
If shp.Title = "chtPieA" Or shp.Title = "chtPieB" Then
ShapeIndex = i
shptop = shp.top
shpleft = 0
shpnum = shp.ID
Debug.Print "mydoc.Shapes(i).ID = " & mydoc.Shapes(i).ID
Exit For
End If
i = i + 1
Next shp
Set oshp = mydoc.Shapes(ShapeIndex)
With oshp
.top = shptop
.Left = shpleft
shpID = oshp.ID
Debug.Print "oshp.name = " & oshp.name
End With
Set oshpcopy = oshp.Duplicate 'error
With oshpcopy
.name = "newshape2"
.top = 200
.Left = 100
Debug.Print "mydoc.Shapes(newshape1).ID = " & mydoc.Shapes("newshape1").ID
End With
With oshp.Duplicate 'ERROR
.name = "newshape1"
.top = 200
.Left = 100
Debug.Print "mydoc.Shapes(newshape1).ID = " & mydoc.Shapes("newshape1").ID
End With
Set oshp = Nothing
Set oshpcopy = Nothing
End Function
Code ends:___________________________________
Kim Khan

Word 2013 (Windows 7 64-bit) - Embed PDF as Icon Error

We have a process where we embed PDFs into a table in a Word document as an icon.
This worked for us in Word 2010, but as soon as we upgraded to Word 2013 we started getting an error message.
"The program used to create this object is Package. That program is either not installed on your computer or it is not responding. To edit this object, install Package or ensure that any dialog boxes in Package are closed."
Nothing has changed except uninstalling Office 2010 and installing Office 2013. Acrobat is still there(fully updated XI pro). Acrobat is not open when the attempt to embed is made.
I've tried altering every option I could find that might make this process work, but nothing does the trick. All software is fully updated as far as I can tell. It feels like Office 2013 is not keen on the idea of working with PDFs. The
Acrobat Add-In seems to only promote converting word docs to PDFs, and I found little to no settings referring to PDF embedding or any embedding for that matter.
Does Word 2013 disallow this feature unless you're using Windows 8 and the Windows Reader app?
Any advice would be fantastic. Thanks.

Hi,
Please try to insert some PDF files from Insert tab --> Object --> Create New --> Adobe Acrobat Document
In addition, make sure Adobe Reader is the default application to open the PDF files.
If the issue persists, please try repair or reinstall the latest version of Adobe reader and check this again.
Karen Hu
TechNet Community Support

Recieveing "OnUCAppointmentGetVisible" error in Outlook 2013 (64 bit) - "Custom UI Runtime Error in Lync Meeting Add-in for Microsoft Office 2013"

Hi All,
I originally posted this in the MS Support forums (http://answers.microsoft.com/en-us/office/forum/office_2013_release-outlook/recieveing-onucappointmentgetvisible-error-in/1a40eca2-8cd1-40f1-a92f-cb08f0af6b72), but was directed over here.
I have recently upgraded an installation of Office 2010 to 2013 (both 64 bit) but am now receiving an error which says:
Window Title - "Custom UI Runtime Error in Lync Meeting Add-in for Microsoft Office 2013"
An error occured while calling the callback: "OnUCAppointmentGetVisible"
This seem to happen when I initially open a calender entry, and when I close the entry (most only the first time I close the entry).
I did have some developer tools installed for Office 2010 and VS 2010 which played around with Excel,2013 but I have now uninstalled these.
In addition, BCM 2010 was installed (but for the time being has been uninstalled), but I don't think that is the culprit.
The issue is being caused be an Outlook add-in. I have three COM add-in enabled, but the one causing the issue in the "Lync Meeting Add-in for Microsoft Office 2013".
We are currently trialling Lync in a demo installation which is in a different domain to any of the Exchange accounts, but should this cause a problem? For the time being I have disable this add-in.
Regards,
Chris
Chris

Hi,
Sorry for my misunderstanding. If the issue is determined to be caused by Lync Meeting Add-in, please remove this add-in from Outlook, then go to Control Panel to repair Office 2013 program. After repairing,
this add-in would be automatically reinstalled. Please check whether the issue persists. About how to repair Office programs, please refer to:
http://office.microsoft.com/en-us/outlook-help/repair-office-programs-HA010357402.aspx
If the Lync Meeting Add-in is not automatically reinstalled, please try to manually add this add-in by the following steps:
1. Starting Outlook 2013 as an Administrator (right click, run as Admin).
2. Click File > Options > Add-ins, Manage Com Add-Ins Go... > Add..., C:\Program Files (x86)\Microsoft Office\Office15\UCAddin.dll, OK.
3. Close Outlook and start it as a normal user.
Regards,
Winnie Liang
TechNet Community Support

Word 2013 - MSI Install vs. One-Click Install - COM Exception Error

Hello -
we have a 3rd party control that sits on top of word to render word documents. In a MSI installation of Word 2013 everything works fine. When we use the one-click installation the rendering does not work and the system throws a com exception
error.
it basically says "The document is not associated with an ActiveX Document server. at OfficeControlLIB.IOfficeControl.OpenLocalfile...
there is a suggested fix @ http://stackoverflow.com/questions/19778211/office-2013-click-to-run-installer-and-activex-issue/26890815#26890815
where you modify the registry to insert :
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{F4754C9B-64F5-4B40-8AF4-679732AC0607}\DocObject]
into the registry - however this did not work (note we looked up the CLSID for our OCX and replaced.
Any ideas?

Hi,
So it's a 32-bit version of Office which is running on a 32-bit version of Windows, try to omit
Wow6432Node from the registry keys and see if it works.
It's a 3rd party control, there is no way for us to understand how exactly it works. I'd suggest you contact the vendor support of that control for further assistance.
Regards,
Ethan Hua
TechNet Community Support
It's recommended to download and install
Configuration Analyzer Tool (OffCAT), which is developed by Microsoft Support teams. Once the tool is installed, you can run it at any time to scan for hundreds of known issues in Office
programs.

Acrobat 9.5.1 is causing a visual C++ runtime error in WORD 97

acrobat 9.5.1 is causing a visual C++ runtime error in WORD 97

Acrobat 9 should not have installed anything within Word 97: http://helpx.adobe.com/acrobat/kb/compatible-web-browsers-pdfmaker-applications.html. You may want to check Tools > Macros to see if there's anything installed into that version of Word.
-David

I am running Acrobat X Pro on Windows 7 in Parallels. I have tried to install the Acrobat updates, but they won't install. Today I tried to create a pdf from a Word 2013 document and it crapped out. I tried to uninstall Acrobat and got Error 1310. Error w

I am running Acrobat X Pro on Windows 7 in Parallels. I have tried to install the Acrobat updates, but they won't install. Today I tried to create a pdf from a Word 2013 document and it crapped out. I tried to uninstall Acrobat and got Error 1310. Error writing to file: c:\Config.Msi\feea.rbf. What do I do?

Hi Beverly ,
Please refer to the following and see if this helps.
https://helpx.adobe.com/creative-suite/kb/error-1310-error-writing-file.html
Regards
Sukrit Dhingra

Word 2013 VBA Runtime Error 4198

Similar Messages

Maybe you are looking for