D
DESPERATE IN MS
Yesterday I was proud..Today I'm about to throw my computer out the door.
I need a template that I can share with other folks.
The template should have a custom toolbar which are associated with macros I
have written for each checksheet they will be using.
Here is an example of what I've come up: (and it is repeated several times
for each checksheet)
Public Sub WeldVerify_E()
'
' Energy Weld Spec E Macro
' Macro recorded 3/17/2009 by Wroblewski, Laura - wrlag on 2UA6380WHF
'
Dim wrdDoc As Word.Document
Set wrdDoc = Documents.Open("O:\Routine Maintenance\Routine Planner
Share\Common\Macros\Docs\Clay\EnergyWeldESpecStic.doc")
wrdDoc.Activate
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close = wdOLEEmbed
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub
This template will (if every possible) be the default for when opening Word
2003. - macros & toolbar will need to be there...also the MAIN PURPOSE for
this is we have a program that lets you "embed" a document that saved to
Portal/J?. (another thing. When I embed a document in under "file" I have a
choice "Close & Return to Portal/J...and I have no idea where this "Portal/J"
is...and either other don't either or won't tell me. But when I access a
checksheet thru the custom toolbar this "Close & Return to Portal/J" option
is gone...is there any way to keep the standard toolbar to not change????))
ANYWAY BACK TO WHAT I STARTED....They would click the embed document icon and
this is when the new word template should open with the macros and custom
toolbars.
Now...at one time I had everything working except the document was opening
at the bottom. I fixed that and then when I went to move it to my template
folder and moved out the Normal....I LOST EVERYTHING.
I've got my macros re-written and saved as a dot.dot but the toolbar keeps
disappearing and now it is back to asking if I want to update the file rather
than "embed" UGH!!!!!!!!!!! In the 1st "IF" I put ActiveWindow.Pane (2)
..Close = wdOLEEmbed.....but I dont really now what I am doing NOW....Please
someone help and make it simple for my simple, fried and going crazy mind.
Never more desperate that every..thanks folks...that feels better
I need a template that I can share with other folks.
The template should have a custom toolbar which are associated with macros I
have written for each checksheet they will be using.
Here is an example of what I've come up: (and it is repeated several times
for each checksheet)
Public Sub WeldVerify_E()
'
' Energy Weld Spec E Macro
' Macro recorded 3/17/2009 by Wroblewski, Laura - wrlag on 2UA6380WHF
'
Dim wrdDoc As Word.Document
Set wrdDoc = Documents.Open("O:\Routine Maintenance\Routine Planner
Share\Common\Macros\Docs\Clay\EnergyWeldESpecStic.doc")
wrdDoc.Activate
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close = wdOLEEmbed
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub
This template will (if every possible) be the default for when opening Word
2003. - macros & toolbar will need to be there...also the MAIN PURPOSE for
this is we have a program that lets you "embed" a document that saved to
Portal/J?. (another thing. When I embed a document in under "file" I have a
choice "Close & Return to Portal/J...and I have no idea where this "Portal/J"
is...and either other don't either or won't tell me. But when I access a
checksheet thru the custom toolbar this "Close & Return to Portal/J" option
is gone...is there any way to keep the standard toolbar to not change????))
ANYWAY BACK TO WHAT I STARTED....They would click the embed document icon and
this is when the new word template should open with the macros and custom
toolbars.
Now...at one time I had everything working except the document was opening
at the bottom. I fixed that and then when I went to move it to my template
folder and moved out the Normal....I LOST EVERYTHING.
I've got my macros re-written and saved as a dot.dot but the toolbar keeps
disappearing and now it is back to asking if I want to update the file rather
than "embed" UGH!!!!!!!!!!! In the 1st "IF" I put ActiveWindow.Pane (2)
..Close = wdOLEEmbed.....but I dont really now what I am doing NOW....Please
someone help and make it simple for my simple, fried and going crazy mind.
Never more desperate that every..thanks folks...that feels better