Protecting and unprotecting form fields
I have a form that I saved as a template, so that I can insert it into
various documents. I have written code that inserts this form using a macro
that does that and also opens a userform. The form has bookmarks and form
fields with options and drop downs that only work when the form is protected.
I need the form unprotected so that I can insert information from the
userform into specific bookmarks, but then need it protected after that, so
the form field options and drop downs will work. Is there code I can run in
the userform when the form is inserted that will unprotect it until the
infomation is sent to the bookmarks, and then code I can run to protect the
form so the form field options and drop down will work when I exit the
userform, or do I have to manually open the toolbars from the [View]
[Toolbars] [Forms] menu? Thanks!
--
Bill Tag: I would like to add hebrew lanquage to my translation list Tag: 79301
Finding Out What the Current Section Is
For the life of me, I can find a way to determine what section of the
document the current selection is in. It seems like a simple task, but
somehow, I just can't seem to get the syntax right. I'm using a macro to
build a document, and I want it to do one thing if the current selection is
in Section 2 of the document and something else if it isn't, as in:
If Current Section = 2 then
Do one thing
Else
Do something else
End If
I need this macro to work in Word 2000, XP, and 2003. (We can't seem to get
everyone on the same version.) Any help that you can give will be most
appreciated.
Larry Tag: I would like to add hebrew lanquage to my translation list Tag: 79300
call to a DOS command from VBA
I am new to VBA I need help with calling a DOS command from within a VBA 6
code. Here is an example: Suppose I need a list of files in a folder. One can
do it using DOS dir command like
Prompt:> dir drive:\path\foldername > drive:\path\list.txt
The file list.txt output file created contains all file names in foldername,
plus some other info. I have written a vba code for Word to *clean* the
list.txt file, such that it now only contains the names of files in the
foldername folder. The question I have is: can one write a stand alone
*application* or a Word addin, such that it starts with a user form in which
one can browse to a foldername as a source and say cleanlist.doc as the
output, and on closing the form, the dir command is executed, the list.txt
file cleaned with my code, and the cleaned output file placed into a
path\cleanedfile.doc file? I know how to open, create and close files from a
vba code. I do not know how to call a dos command from vba and how to make a
form with controls that allow to browse for a source and destination folders.
Any reading suggestions? Thanks,
--
JanAdam Tag: I would like to add hebrew lanquage to my translation list Tag: 79299
inserting tables
Hello List,
I have been trying to work this for a while now, i can;t seem to get it
working...
I am using word automation to insert tables into my document from a bookmark
range. The problem is when I loop to isnert a table each table will insert
into the first row and column of the previous table.
Here is my code below
For I = 1 to 20
InteriorRange = Doc.Bookmarks.Item("InteriorBuilding").Range ' range obj
InteriorRange.InsertParagraphAfter()
RoomTable = Doc.Tables.Add(InteriorRange, 3, 2) ' doc a reference to the
current document
RoomTable.Cell(1, 1).Range.InsertAfter("tst item")
RoomTable.Cell(1, 2).Range.InsertAfter("test")
RoomTable.Cell(2, 1).Range.InsertAfter("test")
RoomTable.Cell(2,2).Range.InsertAfter("test")
RoomTable.Cell(3, 1).Range.InsertAfter("test")
RoomTable.Cell(3, 2).Range.InsertAfter("test")
RoomTable.Cell(1, 1).Merge(RoomTable.Cell(1, 2))
Next
Any help would be greatly appreciated
thanks very much
nathan Tag: I would like to add hebrew lanquage to my translation list Tag: 79298
Arrangement of carries
Hi
There is a document with the table of several rows.
How for some rows of the table to resolve a hyphenation and for the some
rows to not resolve? Tag: I would like to add hebrew lanquage to my translation list Tag: 79290
Missing keystrokes on custom document
I have a custom Word document, from a template, that catches
WindowSelectionChange to modify data that is input by the user into table
cells. All works well except when more than one Word document are open.
The problem exists whether the other file is based on the template or not.
When switching between docs, the first keystroke is lost. This behavior is
also repeated when changing cells as long as two or more documents are open.
Below is the relevant code:
Option Explicit
Public WithEvents App As Word.Application
Dim thisTable As Integer
Dim thisRow As Integer
Dim thisCol As Integer
Dim lastTable As Integer
Dim lastRow As Integer
Dim lastCol As Integer
Private Sub Document_New()
If App Is Nothing Then
Set App = ThisDocument.Application
End If
keepAlive
End Sub
Private Sub Document_Open()
If App Is Nothing Then
Set App = ThisDocument.Application
End If
keepAlive
End Sub
Private Sub App_WindowSelectionChange(ByVal Sel As Selection)
Dim myRange As Range
Dim mySel As Selection
Dim myText As String
If Not ActiveDocument.AttachedTemplate = ThisDocument Then Exit Sub
thisTable = Macros.getCellLoc.tableNum
thisRow = Macros.getCellLoc.rowNum
thisCol = Macros.getCellLoc.colNum
If (Not Selection.Information(wdSelectionMode) = 0) _
Or (thisTable = lastTable And thisRow = lastRow And thisCol = lastCol) _
Or (thisTable < 4) Then
Exit Sub
End If
If lastTable = 0 Then
lastTable = thisTable
lastRow = thisRow
lastCol = thisCol
Exit Sub
End If
If lastRow > 2 _
And lastCol <= ActiveDocument.Tables(lastTable).Columns.Count Then
Set myRange = ActiveDocument.Tables(lastTable).Cell(lastRow,
lastCol).Range
myRange.End = myRange.End - 1
Select Case lastTable
' Removed
End Select
End If
Select Case thisTable
' Removed
End Select
lastTable = thisTable
lastRow = thisRow
lastCol = thisCol
End Sub
Function isEditable(row As Integer) As Boolean
If row < 3 Then
Selection.Collapse
Selection.MoveDown Unit:=wdLine, Count:=3 - row
Selection.SelectRow
Selection.Collapse
isEditable = False
Else
isEditable = True
End If
End Function
Sub keepAlive()
If App Is Nothing Then
Set App = ThisDocument.Application
End If
Application.OnTime When:=Now + TimeValue("00:00:01"), Name:="keepAlive",
Tolerance:=0
End Sub Tag: I would like to add hebrew lanquage to my translation list Tag: 79285
page numbers using sections - how do you get physical page number?
Section 8 - Page 1 of 4 is Physical page 84. how can i get the Physical page
number. I want to use both section page numbering and phycical page numbering.
exsample: Section 8 - Page 1 of 4 Page 84 of 132
I am using MS work 2002. Tag: I would like to add hebrew lanquage to my translation list Tag: 79283
What files do I need?
Hi all,
I wrote a VB6+VBA program that uses both WORD and EXCEL to generate reports.
In a machine without WORD (for example) - my program wont run, because it
cannot create word objects.
I wish to know what files to include (must + allowed to) in the package I
deliver to the client.
Thanks in advance.
Guy Tag: I would like to add hebrew lanquage to my translation list Tag: 79282
Getting the user profile folder
Hi
I need to get the signature folder for the current folder such as;
"F:\Documents and Settings\Dave\Application Data\Microsoft\Signatures\"
except that instead of Dave I need the correct name for the current user, s
that my code works generically regardless of who is logged in. Is there a
way to do that?
Thanks
Regards Tag: I would like to add hebrew lanquage to my translation list Tag: 79279
Template VBA form and Code Missing
Hi out there.
I am Access programmer just learning VBA in Word. I spent last two days
learning how to develop an input form use the VBE, controls, command buttons,
etc. And I also added code to add data to combo boxes, initialize defaults,
etc. This was all done at my client site.
I returned to my office, and via gotomypc, I downloaded a copy of the
template.
When I open the template, the bookmarks are there, and document stuff. But
no vbe form, or controls, or code.
In access, I just move a database and everything goes with it.
Help
--
microbus Tag: I would like to add hebrew lanquage to my translation list Tag: 79277
Get user info from AD with VBA
Hi,
I,d like to create a Word template that reads current user information (such
as name, addresses, phones, department and so on) from Active Directory. I've
searched the Net without luck for code samples. Do you know where I can find
examples for this kind of solutions?
Best regards,
Dominique Tag: I would like to add hebrew lanquage to my translation list Tag: 79276
Why isn't template with macros located in startup folder not loaded?
Hello,
I've written a template containing macros. Now, a user of this template
complained to me that it won't load automatically even if located in the
startup path. It can be loaded during a Word session via
"Tools->Templates and Addins", though. Unfortunately I don't know which
word version my user is using but she wrote that changing the macro
security settings had no effect.
So what else can cause this?
Christian
--
Christian Zietz - CHZ-Soft - czietz (at) gmx.net
WWW: http://www.chzsoft.com.ar/
PGP-Key-ID: 0x6DA025CA Tag: I would like to add hebrew lanquage to my translation list Tag: 79267
Inserting Excel charts "as link" into Word
Please advice:
I have Excel workbook with many charts (20-30). I need to insert all charts
in the Word document (in the same order that in Excel).
To perform this I saved Excel â??as WEB pageâ?? and after that I use the macro
command to insert all the pictures from pictures folder into the Word.
Now I have to insert all the charts â??as linkâ??.
How can I do it? Sample code would be great.
Thank You.
Eduard Tag: I would like to add hebrew lanquage to my translation list Tag: 79262
Macro to convert revision text to ordinary formatted text
Does anyone have a macro they can share that does this?
To clarify what I need, the macro will convert revisions in text
written with change tracking to ordinary text with underscores and
strikeouts.
My email address is LLM041103 at earthlink dot net. Tag: I would like to add hebrew lanquage to my translation list Tag: 79258
How to download microsoft word
I purches a lap top from Dall, but it did not have microsoft word on it.
I was trying to download it. Please help me to do that. Thanks Tag: I would like to add hebrew lanquage to my translation list Tag: 79257
Creating Module that Runs When Document Opens
Word 2003. I want to create a subroutine or macro that runs when my document
is opened. How may I set this up? Thanks for the help.
--
Dr. Doug Pruiett
Good News Jail & Prison Ministry
www.goodnewsjail.org Tag: I would like to add hebrew lanquage to my translation list Tag: 79253
Only A-z in range selection
I have a macro that goes through documents and deletes spaces that were
accidently inserted in the middle of words.
How can i make it so that the range selection, that's a spelling error, can
only be alpha characters? Tag: I would like to add hebrew lanquage to my translation list Tag: 79250
Create TOC for comlex Chapter pages
I'm writing a book. The Part and Chapter pages are distinct from other pages,
and employ complex styles. I'm having trouble get the TOC right.
The Chapter page is like this:
---------------
1 <--- The Chapter Number (Style: "H2", auto-numbered)
Introduction <--- The Chapter Title (Style: "My Chapter Title Style")
to This Topic
---------------
Part Number and Title are similar ("H1", "My Part Title Style").
Now, I inserted TOC using H1/H2/H3. Obviously, only Part/Chapter Numbers are
show in TOC; I need the Part/Chapter Titles there as well. How to do this? If
w/o programming, even better; if programming, how to do this?
Thanks a lot in advance!
-James Huang Tag: I would like to add hebrew lanquage to my translation list Tag: 79248
Formatting
All,
This question is simple but someone can help me out
i have a checkbox and a label, when user selects the checkbox,
the caption of the checkbox (aaaaaaaaaaaaaaaaaaaaa) and label caption
(abc...etc) should be printed in the document here label caption is
spread accross 4-5 lines, how i want to see in the document is
aaaaaaaaaaaaaaaaaaaaa (checkbox caption)
abcccccccccccccccccccccccccccccccccccccccccccccc (label caption)
abcccccccccccccccccccccccccccccccccccccccccccccc
abcccccccccccccccccccccccccccccccccccccccccccccc
when i used vbtab control in the code (strbody = strbody + chkbox
caption + vbtab + label caption) the result is
aaaaaaaaaaaaaaaaaaaaa
abccccccccccccccccccccccccccccccccccccccccccccccccc
abccccccccccccccccccccccccccccccccccccccccccccccccc
abccccccccccccccccccccccccccccccccccccccccccccccccc
Pls help. Tag: I would like to add hebrew lanquage to my translation list Tag: 79246
Automatic Document Template & Userform checkbox
I have designed a document template and userform. On my userform I have
placed several text boxes and a "chkHistory1" checkbox. There are several
other checkboxes also but I need help on 1 so I can do the rest. I have on
my document template a checkbox with a bookmark named "History1". When I
finish entering information and have placed a check in the checkbox
"chkHistory1" on the userform then click OK everything prints on my new
document except my checkbox. I am relatively new to VB and I need some
help. I have tried several different codes and I'm lost. Tag: I would like to add hebrew lanquage to my translation list Tag: 79245
Find Error?
When using VBA code to find "U.S." (for example), the Find range returns four
words with the first three being as expected ("U", ".", "S").
However, the last word may contain not only the final period but also the
next character in the document if the next one is a space or another
puncuation mark such as ".)". The user interface version of the Find does not
do this.
Is the code version a bug or have I overlooked something? Tag: I would like to add hebrew lanquage to my translation list Tag: 79240
Can I use a Macro within a Word Formula? How?
Currently, I use a formula to interpret a bookmark used in a form to display
a converstion. The formula is currently one of two options, so I use an if
statement. I would like to change it to one of 20 options. I would like to
use a Macro and pass thh bookmarked value to the Macro and have the Macro
return the value. Is this possible? how? Tag: I would like to add hebrew lanquage to my translation list Tag: 79239
How to call a module for returning an excel picture to the .ActiveDocument.Bookmarks("bookmarkname")
Hello all
I created a module which copy an area of excel cells (e.g. A45:D51).
How can I call this module and use
.ActiveDocument.Bookmarks("bookmarkname") to paste the copied area of
cells into the Active Word document under the bookmark?
If a module is returned a text string, I can use
.ActiveDocument.Bookmarks("bookmarkname").Range.Text =
ModuleThatReturnText
How about the module which has already copied a range in Excel
worksheet and want to paste it under the bookmark?
Cheers
Bon Tag: I would like to add hebrew lanquage to my translation list Tag: 79236
Word Font Size in VBA Help
Can anyone suggest an easy way to increase the font size of an
entire document (including headers/footers) by a certain percentage?
I know I can do it by going through word by word and setting the
font size to the original font size multiplied by a factor, but this
seems slow and tedious. Is there a better way?
I have a document that needs to print in different font size under
dofferent circumstances and I do not want to maintain two versions
of it.
Any ideas?
TIA
--
----------------------------------------------
Posted with NewsLeecher v3.0 Final
* Binary Usenet Leeching Made Easy
* http://www.newsleecher.com/?usenet
---------------------------------------------- Tag: I would like to add hebrew lanquage to my translation list Tag: 79233
Saving a document in multiple locations at one time.
I would like to be able to save a single document in multiple folders at one
time. So I guess that means all these folders must be linked.
Thanks Tag: I would like to add hebrew lanquage to my translation list Tag: 79231
word intellisense?
does anyone has sugestions for creating intellisense in word just like the
visual studio intellisense?
for example, writing a specific tab after writing a word will open a combo
box with all the related words from the DB.
i know there is a way to do this with vsto 2005, is it possible in 2003 and
does anyone has sugestions on how to do this? Tag: I would like to add hebrew lanquage to my translation list Tag: 79228
Scheme-text-fields inside textboxes - tab-order issue?
Hello I scanned a scheme with text-fields and I am using it as a
background in a word document.
As I want to use the scheme-function in word, I have added text-boxes
(to accurately fit the textfields to the scanned background) with
scheme-text-fields inside of the boxes.
The problem is;
Using the tab-key to move between the boxes is a pain in the ass, as
one have to press tab 2 times to move between the first two fields,
then 4 times to move to the next field, then 4 times to move to the
next field, etc..
How can I change tab-key-sequence/order?`
Thanks,
=D8ystein Tag: I would like to add hebrew lanquage to my translation list Tag: 79226
original settings?
My MicrosoftOfficeWord 2003 program has all sorts of strange settings on it
as soon as i open a new document. I wonder if there is any way I can change
everything back to its original settings when the program was first
downloaded? Tag: I would like to add hebrew lanquage to my translation list Tag: 79218
Matching if not a particular color
What I want to do is to find and replace if the text if not red in
color. I mean:
with activedocument.range.find
.text="test"
.font.color <> wdcolorred
with .replacement
.
.
.
end with
Of course, I can't say ".font.color <> wdcolorred", so is there any
possible way to match any text so long as it is not red in color?
Thanks,
Vince Tag: I would like to add hebrew lanquage to my translation list Tag: 79215
Sequential word parsing
I just want to transform Word document to a text. I need to pickup all
words and recognize all objects for proper layout. Let's say I have on
a page a mixture of paragraphs, tables,lists.
No nesting. After getting a Range for this page how can I parse this
Range to pickup all elements in a proper order.
paragraph1
paragraph2
table1
paragraph3
table2
paragraph4
lis1
paragraph5
TIA
Michael Tag: I would like to add hebrew lanquage to my translation list Tag: 79213
Populating a Word doc table from Excel
I want to poulate a Word doc table with data from Excel. The Excel data is
held in two adjacent 10 row columns (say A1:B10) where some Excel rows may be
empty.
First column contains text, the other a value.
Is it possible to create a two column table in Excel, that automatically
adjusts its size to the number of "occupied" data rows in Excel. i.e if there
are only three rows of excel data, there are three rows in the Word doc table.
Am new to VBA so any assistance with code would be much appreciated.
Cheers,
Peter Tag: I would like to add hebrew lanquage to my translation list Tag: 79210
Word form textbox size
I had been attempting to create a Word-based (Word 2003) form wherein
by virtue of selecting a certain entry in the first text box various
other text boxes down lower in the form are pre-filled in with
relevant text (i.e. elephant > big, gray, majestic; mouse >small,
brown, verminous, etc.). Anyhow, despite the fact that I can manually
enter an unlimited quantity of text into any given text box, when I
attempt to do it by code I get a message indicating that there is "too
much" text. I haven't counted to characters involved but presume it to
be >~126. Are there any work-arounds for this problem? Should I skip
the secondary text boxes and simply add text at a predetermined
bookmark instead? Would that work? I'll provide more details if you
need them.
Sorry, I had posted this in the wrong forum. It's probably more suited
to VBA as the meat of the work is done by VBA. Tag: I would like to add hebrew lanquage to my translation list Tag: 79208
Stopping users Saving a form
I have a question about employees on a network being able to save a form once
finished with. The current concept is that my Company has various forms that
employees can fill in online, print off and send in to be processed. As many
of these forms are to do with claims, various rates they are allowed to claim
change on a regular basis. I want to be able to stop customers downloading
these forms to their desktops, and re-using them. I want to effectively
force them to log onto our website and use the forms that are current and up
to date. Is this possible?
Thank you
Charlie Tag: I would like to add hebrew lanquage to my translation list Tag: 79206
moving textboxes from one frame to another?
Hi gurus,
My application has a small vertical frame that runs along the left side
of the main document area. The main document area will hold a Word
doc. When the user selects text within that Word document, I have a
macro that creates a textbox holding the user's comments on the
selected text. Now I need to take that textbox and move it to the
other frame along the left side of the work area. Can this be done?
Or better yet is there some way to just create that textbox within
Frame B (the vertical frame on the left), horizontally aligned with the
selected text in Frame A?
Thanks very much!
Mike Tag: I would like to add hebrew lanquage to my translation list Tag: 79198
Word should allow "link to section#" not just "link to previous".
In the Header/Footer sections of Microsoft Word, there should be a variable
link option instead of just a "link to previous" section. I create many
documents in my profession where portrait and landscape are mixed throughout
the document along with other section differences. If I could link any
header or footer section to another header or footer section, then it would
be a lot more usefull tool than just "link to previous".
Example: I am in section 3, which is portrait, and I want to link to
section 1, which is portrait, but the section inbetween is landscape and has
a different header. In the section 3 header I should be able to choose "link
to section 1".
----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.
http://www.microsoft.com/office/community/en-us/default.mspx?mid=5337cc95-44c1-4619-bb2b-3f1f4364e2ca&dg=microsoft.public.word.vba.general Tag: I would like to add hebrew lanquage to my translation list Tag: 79197
HOW TO CANCEL FOR THE ALLOCATED PARAGRAPH ARRANGEMENT OF CARRIES
HOW TO CANCEL FOR THE ALLOCATED PARAGRAPH ARRANGEMENT OF CARRIES
--
çÒÉÇÏÒÉÊ þÅÈ
"áï îÏÒÄ" äÏÎÅÃË õËÒÁÉÎÁ
chech@aonord.donetsk.ua
icq:118106001 Tag: I would like to add hebrew lanquage to my translation list Tag: 79195
Closing FileProperties without error
Hi, when I use the following code:
x = Application.Dialogs(750).Show
If x = "-1" Then
MsgBox "Cancel"
Else: MsgBox "OK"
End If
I get an error when I hit Cancel. How can I fix this ? I just want to close
the damned dialogbox when I hit Cancel :-) Can anyone help ? Tag: I would like to add hebrew lanquage to my translation list Tag: 79192
Automation Error
Hi,
My users are randomly getting an automation as follows:
Run-time error '-2147417848 (80010108);:
Automation error
The object invoked has disconnected from its clients.
Some users never get this message while others get it at random points
running our templates. Our templates have been in existence for several
years and use a mix of Wordbasic and VBA. The main file new dialog is
created via Wordbasic - I'm not sure if this is connected.
We are running Windows XP / Word 2003 - we've had the problem for (I
think) since upgrading to Word XP.
It is one of those terrible intermittent problems which we cannot
recreate at will, we just have to wait for the phone to ring!
Once the error appears we cannot close Word as there is a second
message about a dialog still being up, so we have to ctrl-alt-delete
and end the process.
Many thanks for any ideas,
James Tag: I would like to add hebrew lanquage to my translation list Tag: 79190
Hiding and UnHiding text
I need some help with hiding and unhiding text with VBA.
I have defined some bookmarks in a master document that a user can hide with
a macro that selects the bookmark then hides the selection by changing the
font to hidden. I can't make an undo function as VBA can't select the hidden
bookmark.
Short of selecting the whole document and unhiding, can anyone suggest how I
can easily get around this? Ie programatically select a hidden section of
text.
Thanks
plkijn Tag: I would like to add hebrew lanquage to my translation list Tag: 79189
formating sections in a loop
hello
I have a document with many many short sections which looks like that:
---------section break (continuous)------------
text ^p
text ^p
text ^p
---------section break (continuous)------------
text ^p
text ^p
text ^p
text ^p
---------section break (continuous)------------
text ^p
text ^p
---------section break (continuous)------------
text ^p
text ^p
text ^p
etc.... - there are usually 3 sections per page.
It goes on for many pages. The thing I need to do is to format each section
as 'keep with next' so that sections are not split between pages when
printing. I recorded macro using find ^12*^12 and formatting one paragraph
but cant loop it. Do not know where to put while or loop or do until, still
do not know enough about VBA.
Any help appreciated.
Thanks Tag: I would like to add hebrew lanquage to my translation list Tag: 79179
Get Embedded objects original path
Hi,
How can i find path of an image which inserted by user in the document ?
i want some information about objects which user insert in document to
identify those objects ...
is there any way ?
Thanx Tag: I would like to add hebrew lanquage to my translation list Tag: 79177
AutoNew macro doesn't run
Word 2002
I'm starting word from command line with /t<template> switch.
The AutoNew macro doesn't start.
It does start when I open a new doc based on the template from windows.
I've tried using the /m<macro> name switch as documented on web but this
also doen't run the macro.
What clever trick am I missing? Tag: I would like to add hebrew lanquage to my translation list Tag: 79176
macro to send doc as attachment, "to" and "subject" fields filled
I want a button in my document that when clicked activates a macro that opens
an email with the document as an attachment, with the "To" and "Subject"
fields pre-filled. Tag: I would like to add hebrew lanquage to my translation list Tag: 79164
Problem with Dynamic Array and listbox
I am trying to move items between two listboxes and am using an array
to do it. Here is the code in question. I have no problem copying the
listbox contents to the dynamic arrays. The problem seems to be that
when one of the listboxes is empty and I copy it to my dynamic array
there is no problem -- however when I attempt to redim it I get a
subscript out of range (error '9') error. If the listbox has data when
I copy it to the dynamic array there is no problem -- what gives?
This is code in an Office 2003 macro for Excel.
Thanks much.
Dim source() As Variant
Dim destination() As Variant
Dim i As Integer
Dim j As Integer
ReDim Preserve source(0 To UBound(lstAvailableMSCs.Column, 1), 0)
ReDim Preserve destination(0 To UBound(lstAvailableMSCs.Column, 1),
0)
source = lstAvailableMSCs.Column
destination = lstSelectedMSCs.Column
For i = 0 To lstAvailableMSCs.ListCount - 1
If lstAvailableMSCs.Selected(i) Then
ReDim Preserve destination(0 To UBound(source, 1), 0 To
UBound(destination, 2) + 1)
' ReDim Preserve destination(0 To UBound(source, 1), 1)
For j = 0 To UBound(source, 1)
destination(j, UBound(destination, 2)) =
lstAvailableMSCs.Column(j, i)
Next j
Else
ReDim Preserve source(0 To UBound(source, 1), 0 To
UBound(source, 2) + 1)
For j = 0 To UBound(source, 1)
source(j, UBound(source, 2)) =
lstAvailableMSCs.Column(j, i)
Next j
End If
Next i
lstSelectedMSCs.Column = destination
lstAvailableMSCs.Column = source Tag: I would like to add hebrew lanquage to my translation list Tag: 79163
Asigning a macro to a formfield on exit
I am creating a template for Word 97 upwards
I have created a dropdown formfield with code as follows, but I need to add
some code which assigns to that dropdown which runs a macro on exit which is
"occasion2". Please can someone assist me with some code:
Set myfield = _
ActiveDocument.FormFields.Add(Range:=Selection.Range, _
Type:=wdFieldFormDropDown)
With myfield.DropDown.ListEntries
.Add Name:="on NOT MORE THAN... "
.Add Name:="on an UNLIMITED number of occasions."
End With
--
Mark Tag: I would like to add hebrew lanquage to my translation list Tag: 79162
Referencing a library programically.
Hi. I have office 2000. I wanted to reference the DAO 3.6 library in word
programically. How would I go about doing this?
My problem occurs when I use the organize feature to move modules, a form,
and a class module from a template to a document that wasn't based on that
template.
Then, when I go to compile the project in the document I get the error "user
defined type not defined" until I add the DAO library.
Any help would be much appreciated. Tag: I would like to add hebrew lanquage to my translation list Tag: 79160
Folder exist
I know that you can test if a file exists but can you test if a folder
exists. if so what is the VBA code for it?
Any help appreciated especially examples of code
Thanks Tag: I would like to add hebrew lanquage to my translation list Tag: 79156
Glossary
I'm working on a a help manual which consist of several seperate Word
documents. As part of the formatting, each document includes a definitions
section. There is also a master Glossary maintained in Excel and all the
definitions should be consistent. Right now, I have to manually go in and
change everything if I edit a definition in the master Glossary.
Is there anyway I can set up the documents so that a change to the master
Glossary definition ripples to the other documents? I'm trying to simplify
maintenance. Thanks for your help!
ammon023 Tag: I would like to add hebrew lanquage to my translation list Tag: 79153
Creating Word Doc from Access
Perhaps this should go in Access forum, but I'll try here first.
I am creating a routine in Access that will create a doc in Word based on
fields in Access queries.
I found how to open word, create the doc, and send text.
How do I do things from the menus (sorry, my reference is from using
SendKeys to do these things (choke, choke))?
Examples:
how do I set tabs,
change font size,
make 2 columns,
Insert <name> from Access table
(I can probably figure that one out, but haven't done it yet.)
Thanks. I've looked all over MS web site and on many others and cannot find
this info.
Wanna be Tag: I would like to add hebrew lanquage to my translation list Tag: 79147
I would like to add hebrew lanquage to my translation list