RE: Problem with Macro Word 2003 to 2007

["Rick_Bishop" <rickbishop -at- austin -dot- rr -dot- com>]

Deb:  I can see right away that any {With} statement must end with and {End
With} statement.
This code should work:
---------------------------
Sub MacroName()
'
' MacroName Macro
'
'
With Dialogs(wdDialogInsertCrossReference)
      SendKeys "ff{TAB}{DOWN}{DOWN}{ENTER}{TAB}{h}{TAB}": .Show
End With
End Sub
---------------------------

Date: Wed, 17 Aug 2011 14:19:19 +0300
From: Debbie Hemstreet <D_Hemstreet -at- rambam -dot- health -dot- gov -dot- il>
To: "Techwr-l (techwr-l -at- lists -dot- techwr-l -dot- com)"
	<techwr-l -at- lists -dot- techwr-l -dot- com>
Subject: Problem with Macro Word 2003 to 2007
Message-ID:
	
<24067065A37C0A419275B87CCCDD7592554D6A9C7E -at- RHCC-MAIL -dot- rambam -dot- health -dot- gov -dot- il>
	
Content-Type: text/plain; charset="us-ascii"

Hi All,

I hope you can help me. I have a macro which works fine as is in Word 2003,
but when transferred to Word 2007, it does not work. I have enabled the
macro, checked my security, and verified within VBA help 2007, that the code
is OK. Any suggestions why the code won't work? The specific code is below.
Please note it was written with the help of Jonathan West.

With Dialogs(wdDialogInsertCrossReference)
      SendKeys "ff{TAB}{DOWN}{DOWN}{ENTER}{TAB}{h}{TAB}": .Show


Thanks in advance,

Deborah



_____________________
Deborah Hemstreet
English Editor
Rambam Hospital
Ext. 1285
Tel. 04 854-1285
Mobile: 052 2838-253
Fax: 04 854-2657


^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Create and publish documentation through multiple channels with Doc-To-Help.
Choose your authoring formats and get any output you may need. Try
Doc-To-Help, now with MS SharePoint integration, free for 30-days.
http://www.doctohelp.com

---
You are currently subscribed to TECHWR-L as archive -at- web -dot- techwr-l -dot- com -dot- 

To unsubscribe send a blank email to
techwr-l-unsubscribe -at- lists -dot- techwr-l -dot- com
or visit http://lists.techwr-l.com/mailman/options/techwr-l/archive%40web.techwr-l.com


To subscribe, send a blank email to techwr-l-join -at- lists -dot- techwr-l -dot- com

Send administrative questions to admin -at- techwr-l -dot- com -dot-  Visit
http://www.techwr-l.com/ for more resources and info.

Please move off-topic discussions to the Chat list, at:
http://lists.techwr-l.com/mailman/listinfo/techwr-l-chat