ExpExchHelp
asked on
Macro in MS-Word
Greetings Experts:
I need some assistance with modifying an existing (working) macro.
Here's what I currently have:
- Word document saved as a template (.dot extension). The Word template is stored in folder anywhere (e.g., Desktop).
- Another folder on the C-drive… C:\MyFolderLocation.
The Word template contains the following fields/command buttons:
- 3 fields where user enters information (e.g., [Date], [Name], [Description]).
- 1 command button "Copy Me!"
Below is the process (which again works great right now):
- User opens (double-clicks) on Word template
- Word opens... new file name is called "Document1"
- User then modifies information for [Date], [Name], and [Description]
- User then clicks on command button "Copy Me!"
- Now, file "Document1" changes its filename/extension to "MyFileName.doc"
- Then, file "MyFileName.doc" is automatically saved in C:\MyFolderLocation
Again, the above process works great... but now I need to slightly modify it. Here's what I need some help with.
The folder location (C:\MyFolderLocation) and filename (MyFileName.doc) are currently hard-coded in the VBA code (see bottom of this post).
Now, instead of using the hardcoded folder location and filename, I'd like the user to determine these themselves. Thus, the following is envisioned:
1. Just as before, the user opens the Word template (which contains the 3 required fields).
2. Again, the user adds information such as [Date], [Name], [Description]
3. Now, however, user types in a filename (somewhere where the VBA code can "recognize" it)
4. Also, user can select a folder location (via Browse dialog box).
5. Then, just before, the user click on command button "Copy Me!".
6. Now, the new file copy is stored wherever specified with the chosen filename.
Please keep in mind that we're NOT just opening a new (blank) Word document where the user can merely save it anywhere with any file name. The difference is that this template includes pre-defined fields (actual document has more than just 3 fields). Thus, I must use the template.
Please see attached current Word document/template. For testing purposes, create a folder "C:\MyFolderLocation" and then open the .dot. Whatever information you'll type into the 3 fields are then saved accordingly. Hopefully this helps facilitating the process.
Thank you in advance for helping me figuring out modifications (step #4 and #5).
EEH
I need some assistance with modifying an existing (working) macro.
Here's what I currently have:
- Word document saved as a template (.dot extension). The Word template is stored in folder anywhere (e.g., Desktop).
- Another folder on the C-drive… C:\MyFolderLocation.
The Word template contains the following fields/command buttons:
- 3 fields where user enters information (e.g., [Date], [Name], [Description]).
- 1 command button "Copy Me!"
Below is the process (which again works great right now):
- User opens (double-clicks) on Word template
- Word opens... new file name is called "Document1"
- User then modifies information for [Date], [Name], and [Description]
- User then clicks on command button "Copy Me!"
- Now, file "Document1" changes its filename/extension to "MyFileName.doc"
- Then, file "MyFileName.doc" is automatically saved in C:\MyFolderLocation
Again, the above process works great... but now I need to slightly modify it. Here's what I need some help with.
The folder location (C:\MyFolderLocation) and filename (MyFileName.doc) are currently hard-coded in the VBA code (see bottom of this post).
Now, instead of using the hardcoded folder location and filename, I'd like the user to determine these themselves. Thus, the following is envisioned:
1. Just as before, the user opens the Word template (which contains the 3 required fields).
2. Again, the user adds information such as [Date], [Name], [Description]
3. Now, however, user types in a filename (somewhere where the VBA code can "recognize" it)
4. Also, user can select a folder location (via Browse dialog box).
5. Then, just before, the user click on command button "Copy Me!".
6. Now, the new file copy is stored wherever specified with the chosen filename.
Please keep in mind that we're NOT just opening a new (blank) Word document where the user can merely save it anywhere with any file name. The difference is that this template includes pre-defined fields (actual document has more than just 3 fields). Thus, I must use the template.
Please see attached current Word document/template. For testing purposes, create a folder "C:\MyFolderLocation" and then open the .dot. Whatever information you'll type into the 3 fields are then saved accordingly. Hopefully this helps facilitating the process.
Thank you in advance for helping me figuring out modifications (step #4 and #5).
EEH
Private Sub CommandButton1_Click()
Dim doc As Document
Set doc = ActiveDocument
doc.InlineShapes(1).Delete
doc.SaveAs "C:\MyFolderLocation\MyFileName.doc"
End Sub
Template.dot
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
That is fine by me - and is also customary, glad it works.
ASKER
DrTribos.
'Just saw your follow-on post. When opening the template and clicking on "CopyMe!", I was first prompted to about the "new file format".
Once I clicked on "Do not ask again", your solution worked great.
Again, thanks!
EEH
'Just saw your follow-on post. When opening the template and clicking on "CopyMe!", I was first prompted to about the "new file format".
Once I clicked on "Do not ask again", your solution worked great.
Again, thanks!
EEH
That is fine by me - and is also customary, glad it works.
ASKER
DrTribos -- this works great. Amazing how simple the solution was. ;)
MacroShadow -- yours works as well. I will admit I prefer the default Windows Brose dialog box (over the customized version).
Given the solution and timing, I would like to award points to both experts (best solution goes to DrTribos).
I hope both of your are ok w/ that.
MacroShadow -- yours works as well. I will admit I prefer the default Windows Brose dialog box (over the customized version).
Given the solution and timing, I would like to award points to both experts (best solution goes to DrTribos).
I hope both of your are ok w/ that.
I was first prompted to about the "new file format".If you can, I suggest using the new file format docx, dotx, docm, dotm as they are apparently more reliable, and support new features added to word from ver 2007.
Most, everyone(?), with older versions of MS-Word will be able to view files in this format as MS made a viewer available to users with XP /Word2003 users.
[Edit: oh, not to mention that it is the way forward with MS Office]
ASKER
DrTribos:
Again, thank you for your support on this question. I do have a follow-up question.
As part of the process (within military environment), users are NOT allowed to save macros on their environment.
As you know, however, the "Browse" dialog box brings up the following options under the "Save as type:" drop-down menu:
Word Document
Word Macro-Enabled Document
Word 97-2003 Document
...
...
...
That said, is there a way to limit the file type options in the drop-down menu. In other words, can I >> remove << the option "Word Macro-Enabled Document"?
Thanks,
EEH
Again, thank you for your support on this question. I do have a follow-up question.
As part of the process (within military environment), users are NOT allowed to save macros on their environment.
As you know, however, the "Browse" dialog box brings up the following options under the "Save as type:" drop-down menu:
Word Document
Word Macro-Enabled Document
Word 97-2003 Document
...
...
...
That said, is there a way to limit the file type options in the drop-down menu. In other words, can I >> remove << the option "Word Macro-Enabled Document"?
Thanks,
EEH
I don't know the answer to that. Best bet would be to open another question. I am curious to find out now that you have asked.
Cheers,
Cheers,
ASKER
DrTribos: Good call... please see new question at:
https://www.experts-exchange.com/questions/28404266/Limit-available-Save-as-type-option-in-Windows-Browse-menu.html
https://www.experts-exchange.com/questions/28404266/Limit-available-Save-as-type-option-in-Windows-Browse-menu.html
ASKER
DrTribos, MacroShadow:
I posted a new question pertaining to previous question.
Interested in taking a stab?
https://www.experts-exchange.com/questions/28410067/Macro-in-MS-Word.html
Cheers,
EEH
I posted a new question pertaining to previous question.
Interested in taking a stab?
https://www.experts-exchange.com/questions/28410067/Macro-in-MS-Word.html
Cheers,
EEH
Reason for asking is that it seems to me you could benefit from using content controls, these are available in MS-Word 2007 onwards.
FYI: You can add content controls by enabling the developer tab enabling the developer tab
then adding content controls for each item of information