One last thing
You'll be a lot better of if you give you're formfields bookmarks names!
This will give easy access and make you're programme thougher!
I've done programticaly (Field add) You could use a counter to increment the field bookmark ore something..but you should use bookmarks..
And...
Hi Xeno, :D
A bit more information please...
Third fields??...every line?? (what lines?)
Are we talking tables here?
Wel lets see tommorow...have to sleep now! ;-)
Groetjes,
Joost Verdaasdonk
Hi Xeno, :D
You're welcome!
Yes a lot off books and a lot more exercise ;-)
A Good book is Steve Romans: Word Macro's . (I think that was his name)
BTW; The best tutorial is F1 (not dissing you) and use Intelissense in the VBA and read wat arguments a method has.
If you need an answer...
Hai Xeno, :D
Set NoReset to True (in protect method)
Last line is:
ActiveDocument.Protect wdAllowOnlyFormFields, True
Have Fun!
Groetjes,
Joost Verdaasdonk
Hi Skip, [peace]
I think I know what you are trying to do here!
I will take a look at my sheet and try this out.
For you're question All the constants wil be updated from time to time because they represent Specifiations of Producst Lower control limits, Upper control limits and Targets. (so...
Hi everybody, [peace]
Is it possible to create a line in a chart based on ONE value?
(to occupy the Series Collections)
I’m creating an application that created dynamic charts of the source data in an Excel database. This Data is filtered on several criteria and has dynamic name ranges to...
Hi Tru, [thumbsup]
Seems to me you forgot to format the hidden text in the document.
You could consider to put the text in the Open event in the right format and then turn the switch on.
Note:
For A template use the AutoNew event (or Document_New)
For A document ust the AutoOpen event ("")...
Hi Tru, [2thumbsup]
Don't use code for this, you just need Hidden Text!
Put the text in you're document en go to the Font Dialog en put a marker in the Hidden text box. (now the text we'l disapear)
Make shure you check the print options box for Hidden text.
TOOLS/OPTIONS/PRINT/HIDDEN TEXT...
..."C:\Documents and Settings\Joost\Bureaublad\Kopie II\"
Dim dlg As Dialog
Set dlg = Dialogs(wdDialogInsertFile)
With dlg
.Name = "*.txt"
If dlg.Show = -1 Then
strData = .Name
If InStr(strData, "\") = 0 Then
strData = CurDir() + "\" + strData...
Hi Francis, [2thumbsup]
This will do what you want:
Sub INSERTFILE()
sDir = "C:\Documents and Settings\Joost\Bureaublad\Kopie II\*.Doc"
With Application.Dialogs(wdDialogInsertFile)
.Name = sDir
.Show
End With
End Sub
Enjoy [peace]
Joost Verdaasdonk
Hi SkyHigh,
Take a look at this site: http://www.helenfeddema.com/CodeSamples.htm
You can download all the code samples you need off full automation between Access and the rest of the Office family!
Enjoy,
Joost Verdaasdonk
Hi Judy,
Try this:
Sub Test()
ActiveDocument.Unprotect Password:="HI"
If ActiveDocument.FormFields("Text1").Result = vbNullString Then
ActiveDocument.FormFields("Text1").Select
Else
ActiveDocument.FormFields("Text2").Select
End If
ActiveDocument.Protect Password:="HI", NoReset:=False, Type:= _...
Hi Quimbly,
Take a look at the Application.International in the F1 (HELP)
Here's a quick example:
Sub test()
'Use this to check out the number of the xlCountrySetting
'MsgBox Application.International(xlCountrySetting)
If Application.International(xlCountrySetting) = 47 Then...
Hi PHV,
This is the code used to check a formfield from a Userform checkbox: (In TheKeyper his template)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
If chkSpecies1.Value = True Then
With ActiveDocument.FormFields("chkSpecies1")
With .CheckBox
.Default = True...
Hi theKeyper,
You don't have to check if the document is protected. It is, otherwise you're formfields would not be working.
The code mentioned above does remove the password for you and after checking the box it puts the password back.
You've been working on this for a while so I think it...
Hi theKeyper,
The above mentioned sollutions don't work for me.
I use the Click Event of the checkbox with this code
Private Sub cbxKlik_Click()
ActiveDocument.Unprotect Password:="jojo"
With Selection.FormFields(1)
.Name = "joost"
.EntryMacro = ""
.ExitMacro =...
Hi,
Thanks for you’re response!
Yes I’ve added that reference and I’ve tried numerous controls. (that sound like they can hold animations)
The problem is that Word crashes every single time. (cannot display error because its in my native language)
What happens:
I put the control on to my...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.