Check Box Macro

		Microsoft Office Forums > Microsoft Word > Word VBA
Check Box Macro

FAQ

Thread Tools

Display Modes

04-06-2011, 03:05 PM

macropod

Windows 7 32bit Check Box Macro

Office 2000

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,467

Hi Johnny,

Try:

Code:

Sub CopyField()
Dim StrResult As String, i As Integer
With ActiveDocument
  StrResult = .FormFields("LMSI_Office1").Result
  For i = 2 To 15
    .FormFields("LMSI_Office" & i).Result = StrResult
  Next
End With
End Sub

As for unprotecting/reprotecting the document, none of these macros I've posted needs that - they all run fine while the document is protected.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Tags

macro, vba, word 2003

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
check with condition	karti	Word	2	03-15-2011 06:06 AM
Check whether Follow Up set	konfis	Outlook	0	10-27-2010 11:19 PM
Need Help with Using a Check Box	Nick9589	Excel	1	05-01-2010 09:29 AM
Spell Check	WorkerB	Word	2	11-21-2009 07:22 AM
Check Box in Word	serayam	Word	1	11-06-2008 06:45 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 04:10 AM.