Document Map
To change the document map, Word help says to right-click on the map, but
when I do, nothing happens (my right click works every where else). Any
ideas? Also, can the Document Map be changed with VBA? Thanks. Tag: Why can't I post, answered Tag: 66586
How do I get the current line number in a macro?
In Word 2002, I need to locate and list locations at which a string is found
in the document. Once find locates the string, how do I assign the then
current line number to a variable?
Thanks for any suggestions,
Larry Tag: Why can't I post, answered Tag: 66585
Macro Security Level !
HI !
I know it's not possible to check the security level with VBa when the
doc is open by a user.
...but I want the user changes this security level and so ...I would
like to avoid the user doing anything else in the opening doc
excepted:
- reading a message explaining the user must change the security level
to the "middle" level if an above level is checked
-checking the security level
-closing the doc without saving it
..or anything else to get similar results ...
...until the security level is middle or under ...and so the doc will
open normally at this time !
Any help to try writting this?
Thanks in advance!
Thierry Borgne Tag: Why can't I post, answered Tag: 66577
run some code before doc opening
Hi I would like to parse the doc name to be opened and run some code before
document opening if when parsing the document name I found some particular
stuff..
Within the (document_open event)
if instr("key string",activedocument.name) >0 then
run some code
else
end if
I can't get it working , can someone give me some help ? Am I doing
something wrong ? How can I achieve that ? Tag: Why can't I post, answered Tag: 66576
Insert date and time?
I have one textfield in my word document. I want when I open my document to
automticly insert date and time in textfield. Tag: Why can't I post, answered Tag: 66574
checking if a folder exists before using rmdir to delete it
Calling RMDIR to delete a folder that does not exist results in an error ...
what is the easiest way to test if a folder exists?
Thanks, in anticipation of assistance,
Peter E Tag: Why can't I post, answered Tag: 66572
Disappearing bookmarks
Hello,
I've encountered strange bookmark behaviour.
The code is in C# but it should not matter:
// myWordApp variable points to the Application object
// myBookmark variable points to a bookmark.
myBookmark.Select();
Word.Selection selection =3D myWordApp.ActiveWindow.Selection;
selection.Text =3D "\xD6";
So far so good, but if I do:
selection.Font.Name =3D "Wingdings";
or
selection.InsertParagraphAfter();
The bookmark disappears.
Can anyone explain what's going on and how to overcome this issue?
Thanks,
Alex.
--=20
Address email to user "response" at domain "alexoren" with suffix "com" Tag: Why can't I post, answered Tag: 66562
prevent template macros copying to new documant
I have macros in a template used to create a specific naming convention when
saved. I do not want these templates in the newly created document. Is it
possible to set Word to not copy the macros? If so how?
Please respond to my email address preflyght-1@yahoo.com
Thanks! Tag: Why can't I post, answered Tag: 66560
UserForm Data Capture in Word
I have designed a UserForm in a word document that has a couple of comboboxs
with drop down lists and a few text boxes. What do I need to do in VBA to
transfer the data the user has entered into specified places in the document?
Am I also able to insert other documents depending on the result of a
combobox?
--
Dave Tag: Why can't I post, answered Tag: 66550
GetSpellingSuggestions -- 9132
Hello,
I have successfully used the wdWildcard and wdAnagrams
constant with the SuggestionMode argument for the
GetSpellingSuggestions method for Word in Office 98.
But these constants cannot be used with Word 2000
and Word 2003 (see:
http://support.microsoft.com/default.aspx?scid=kb;en-us;224722
).
Is there any way I can use the dll and other files from
Office 98 to beef-up my Word 2003 so that I get support
for these constants? If so, how?
Thanks,
--Suresh Tag: Why can't I post, answered Tag: 66546
Problem with previous post re: individual footers for each copy ma
I asked the question Friday if I could create a macro that would print 3
copies of a one page document with each copy having different footer text.
Greg instructed me on the macro and it worked great. The problem I am having
is that the document has form fields in it, and when the document form field
are protected and the macro is run I get an error with no text. I assume
it's because of the protection. How can I avoid the error from appearing
while still having the document protected? Tag: Why can't I post, answered Tag: 66543
Create submit button to trx to Access
I have created a form in word and would like a "Submit Data" button to
transfer all the data from the form to an access table in a database. I'm
being a bit adventurous as I am a new user and have no idea where to begin.
Can anyone help me through step by step? Tag: Why can't I post, answered Tag: 66538
Bookmark
Hi,
Each paragraph in my document is a bookmark:
Paragraph 1 = bm1
Paragraph 2 = bm2
Paragraph 3 = bm3
...
The user can delete paragraph. This mean that paragraph
numer 4 not necessarily means bm4. It could be bm2.
When I click a button, I want the macro to show me in
which bookmark I clicked in and show a messagebox that
correspond with that bookmark. How is this done?
/ Ulf Tag: Why can't I post, answered Tag: 66531
Syntax doubt - Find and Replace
Hi,
Some time back I had a requirement where I had to REPLACE some text in EACH
PAGE of the MAIN STORY IN MS Word. The text was of the form -- Page 83 --
or -- Page 62-- and so on and the replacement text was the related to the
actual word page number.
The below macro I got from NG for this purpose works great. Only change is
that previously I had to find and replace text with 2 digit numbers
following "Page ". But now I want to be able to replace 3 digit numbers
also.
I have tried changing the syntax -- .Text = "Page [0-9]{1,2}" -- to --
.Text = "Page [0-9]{1,2,3}" -- thinking that this would extend the search to
one more character, but Im getting -- Runtime error '5560': The find what
text contains a pattern match expression which is not valid.-- and the above
error occurs at the -- .Execute Replace:=wdReplaceAll--.
Strangely if I change it to .Text = "Page [0-9]{3}" -- then am able to
get it working (that is am able to search for -- Page 768 -- and replace it
with the desired text).
Why is it that .Text = "Page [0-9]{1,2}" works well for finding -- Page
83 -- or -- Page 62-- but .Text = "Page [0-9]{1,2,3}" -- gives syntax
error. Isnt the number within the squiggly bracket meant to indicate the
extent of the search?
Thanks a lot,
Hari
India
Sub ReWritingPageNumbersByHelmutWeber()
'Swiped from NG by Hari Prasadh
ResetSearch
Dim lPgs As Long
Dim lTmp As Long
lPgs = Selection.Information(wdNumberOfPagesInDocument)
For lTmp = 777 To lPgs
Selection.GoTo _
what:=wdGoToPage, _
which:=wdGoToAbsolute, _
Count:=lTmp
Selection.Bookmarks("\page").Select
With Selection.Find
.Text = "Page [0-9]{1,2}"
.Replacement.Text = "Page " & lTmp - 20
.Wrap = wdFindStop
.MatchWildcards = True
.Execute Replace:=wdReplaceAll
End With
Next
ResetSearch
End Sub
'---
Public Sub ResetSearch()
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = ""
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
' plus some more
.Execute
End With
End Sub Tag: Why can't I post, answered Tag: 66528
How do I create text that if you type within it it will be repaced
Hi guys,
I'm trying to create a word docment with a series of "blank" areas in it. At
present they just have pink writing within them. I am looking now at being
able to label these blank areas. I.E what powerpoint does with its faded text
when you insert a text box. So that it will say for example "Insert Date
here" then when a user puts the date in it will remove the string of text and
replace it with what ever has been typed. Anythoughts would be greatly
appriciated.
cheers,
steve Tag: Why can't I post, answered Tag: 66525
Fixed Size Table
Hello
I use C++ to automate Word. Here is the code to insert a table with 1 row
and 1 column
BOOL CAutoWordDlg::AddCoverPage( Selection WordSelection)
{
WordSelection.TypeParagraph();
Range WordRange = WordSelection.GetRange();
WordRange.Collapse( vtCollapseEnd);
Tables WordTables = WordSelection.GetTables();
Table WordTable = WordTables.Add( WordRange, 1, 1, vtFalse, vtTrue);
}
The parameters of the Add function allows the AutoFit of the table ...
OK but I would like to set a fixed size for this table, say 80% of the page
with and 80 % of the page height.
Is it possible to do this ?
Thanks for your help
Thierry Tag: Why can't I post, answered Tag: 66515
new document counter: how to change?
Hello,
I want to change default name for new document (like "Doc1", "Doc2", ...
in Polish and German version it is "Dokument1", "Dokument2"). Is it
possible?
I need it, because my VBA application creates one "hidden" document for
each newly created document. So, user creates first document ("Dokument1")
and one hidden, linked to first one, is created (not visible, but it uses
name "Dokument2"). Then, user closes document ("Dokument1") -
automatically hidden document ("Dokument2") is closed - and creates second
one. He is suprised, that its name is "Dokument3" (should be "Dokument2").
Is there any property to set counter of documents?
Regards,
Tomasz Swedrowski Tag: Why can't I post, answered Tag: 66510
Fax programming via Ole automation for sending faxes over a LAN enviroment
I search lot of time for the best fax program with candy COM interface
for send faxes from my APP, over the LAN... I would apreciate some
confesions/comments via email about this...
Thanks from Cordoba, Spain !!
........ Tag: Why can't I post, answered Tag: 66508
Registry setting for Proof directory?
Options.DefaultFilePath(wdProofingToolsPath) returns
\program files\common files\microsoft shared\proof
Is there a registry setting, or some other means, to get a pointer to
\Documents and Settings\username\Application Data\Microsoft\Proof
when there are no custom dictionaries?
--
http://www.standards.com/; See Howard Kaikow's web site. Tag: Why can't I post, answered Tag: 66507
AutoText fields inserting as static text
Program: Word 2003
Not sure how to describe this correctly, but when one of our users inserts
an AutoText entry that contains a field code, such as Filename and Path or a
date field, Word is inserting the *text* of the code, i.e. _ FILENAME \p _
(except there are boxes instead of "_").
I've made sure the user's language is set to English, but I'm not sure where
else to begin with this problem. It's as though Word is not inserting the
brackets enclosing the code, or it's automatically unlinking the field. Where
the brackets should be enclosing the code, there are the boxes Word usually
inserts for characters not included in a font set. So the code for pathnames
and dates are inserted but not a working field code. Where the pathname
should be, you just see the pathname code text in the document and that's how
it prints (even when unchecking any options that cause the field code to
print or be viewed in the document). I'm at a loss and am hoping for a
resolution other than reinstallation.
OTOH, the user *can* insert both the date field and pathname via Insert ->
Field.
Claudia Tag: Why can't I post, answered Tag: 66496
Auto Fill Contracts
In a contract I have the same name appearing over and over on the signature
pages. How can I type it in once and have it copied throughout the document? Tag: Why can't I post, answered Tag: 66494
delete section breaks
Hi,
for word xp, how could i delete all the section breaks in a document in vba?
thank you,
william.
-- Tag: Why can't I post, answered Tag: 66493
Strange Delineation of Sentences
Consider the a document containing only:
John Doe, Ph.D., is a scientist.
As expected, "ActiveDocument.Words(1).Text" return "John". However,
"ActiveDocument.Sentences(1).Text" returns "," and the second sentence is
returned as "is a scientist".
Is this a bug? Am I missing something here? Tag: Why can't I post, answered Tag: 66489
How do I hide information in a Word document for different docume.
Our team would like to create information once and use it throughout multiple
versions of a document. Since we did not receive approval for a CMS, I am
trying to optimize Word 2003 to gain us the same benefits. I guess you call
it applying conditions to text.
Thanks! Tag: Why can't I post, answered Tag: 66488
Merging Two documents and have them print duplex as one document
Here is what I need to do - I have a word document with several pages (grade
reports), usually in the thousands. Each page is a separate grade report. I
have a generic letter that I would like to print out on the back of each
grade report (duplex printing). How can I add this generic letter to the
back of each of the grade report? Is there a way to do this without using a
macro...and if not how can I do it with a macro? Thanks. Tag: Why can't I post, answered Tag: 66483
Specify Number of copies and individual footer for each copy.
I have a document that I need to print exactly 3 copies of. On each copy I
want a different footer, like "Customer Copy", "Our Copy", "File Copy". How
can I do this programatically? Tag: Why can't I post, answered Tag: 66480
Spelling suggetsions in Word should be in reverse order.
In MS Word: When you right-click over an incorrectly spelt word, the spelling
suggestions should list the most likely word closer to the mouse; the list
should begin with the least likely suggestion and end with the most likely.
Reversing the order that the words are currently listed in would make this
feature more convenient. Tag: Why can't I post, answered Tag: 66473
Spelling suggetsions in Word should be in reverse order.
In MS Word: When you right-click over an incorrectly spelt word, the spelling
suggestions should list the most likely word closer to the mouse; the list
should begin with the least likely suggestion and end with the most likely.
Reversing the order that the words are currently listed in would make this
feature more convenient. Tag: Why can't I post, answered Tag: 66472
Find/Replace of Phrases: How to Avoid Nesting?
I need to run a series of find and replace operations on phrases. The idea
is to standardize the wording of phrases but I am having trouble avoiding
"nesting". Consider the following phrases that might be found in my
document:
Research Data Sharing
Data Sharing
I want to replace instances of "Data Sharing" with "Research Data Sharing".
The desired result should be:
Research Data Sharing
Research Data Sharing
However, if I do a search and replace, searching for "Data Sharing" and
replacing with "Research Data Sharing" the text would become:
Research Research Data Sharing
Research Data Sharing
How can I avoid this "nesting"?
Thanks! Tag: Why can't I post, answered Tag: 66469
Can I force a SAVE
Hi
I have designed some Word userform templates (based on
Word 2000) and I am wondering if I can force people to
Save a document as soon as it has been generated, and
before they begin to add additional text to the document
etc.
I am very much a newbie, so if this is possible, I would
appreciate lots of detail on how to please! Sample code
would be even better!
Thanks
Dave Tag: Why can't I post, answered Tag: 66466
Delete tables in the page footer
I have two tables in the page footer and want to delete one of these,
depending on what optionbox in the form is selected
This code is not working so I need something similar.?
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.GoTo What:=wdGoToBookmark, Name:="bSidfStrategic"
With ActiveDocument.Bookmarks
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
Selection.Tables(2).Select
Selection.Tables(2).Select
Selection.Tables(2).Delete
Selection.Delete Unit:=wdCharacter, Count:=1 Tag: Why can't I post, answered Tag: 66451
adressing cells in table
Dear experts,
how can I select a cell in a table, some cells of which are 'connected' in
the column next to it? The error message reads that an addressing of any cell
is not feasible in a table whose cells are connected in any of its columns.
But my selection confines itself to only one column, where the number of rows
and cells should always be well-defined.
Thank you
Martin Tag: Why can't I post, answered Tag: 66449
Need help in Find and Replace function
I have a large Word document and I need to Find certain text and Replace it
with a pre-defined bookmark. How? Thanks. Tag: Why can't I post, answered Tag: 66444
Create User form
I'd like to create a form to e-mail to users so that when they type in the
spaces provided, the text behind their input does not move. Tag: Why can't I post, answered Tag: 66440
Can't believe they did this? Easy way to fix?
This table looked rather odd. On closer inspection, it was not a table, but
totally created from individual drawing objects!! Each cell is its own text
box, and each border is a separate line!
Anyone got a rabbit in their hat for fixing this and making it a real table?
Ed Tag: Why can't I post, answered Tag: 66439
Macro to format pictures
Hi,
I find that I often need to copy pictures (for example screen prints) to
Word and then format them. Often I use the same formatting over and over.
I'd like to write a macro to do this for me. Unfortunately I'm not very
familiar with the Word object model.
I found the "crop" functions in the PictureFormat object. I haven't yet
found the "Size" (I'd often like 100%) or the "in front of text" type
options. Can anyone give me a hint as to where to look - or even if this is
possible?
Thanks,
Art Tag: Why can't I post, answered Tag: 66436
Delete 'filename and path' field from footer
Hi There, I want to create a macro which deletes the field (File name and
Path- FILENAME \p ) from footer and then insert my customized footer.
I donâ??t know how to delete this fields I tried many different ways but none
work properly please help. thanks!
----------
If WordBasic.ViewFooter() = 0 Then
'Go to footer area
WordBasic.ViewFooter
End If
'This will clear the contents of the previous Footer
WordBasic.EditSelectAll
WordBasic.EditCut
-------------
' this doesnt work ??????
FooterAField = NormalTemplate.AutoTextEntries("Filename and path")
If FooterAField = 1 Then
'Marker exists, Delete it
NormalTemplate.AutoTextEntries("Filename and path").Delete
End If Tag: Why can't I post, answered Tag: 66435
How do I calculate a duration of time in Word using form fields?
I have three form fields that are bookmarked ... [start_date], [stop_date]
and [duration_months].
Both dates are text form fields of "Date" type and formatted "mm/yy".
[Duration_months] is a text form field of "Calculation" type with the
expression
"= datedif [stop] [start],m", length "Unlimited" and number format "0".
The [Duration_months] field is returning the character "t".
Example: [start_date] = 02/05 [stop_date] = 10/05
[duration_months] should come up with 8
Any help would be greatly appreciated!! Tag: Why can't I post, answered Tag: 66426
How do I permanently retain autotext entries?
An autotext entry entered and supposedly saved has disappeared from my
autotext twice now. After the second "disappearance" I deleted many outdated
and unused entries, thinking I had reached the storage capacity for Autotext.
Lost the entry once again today, and discovered that at least two of the
entries deleted yesterday appeared once again. Does anyone have an
explanation? And how can I correct this? Tag: Why can't I post, answered Tag: 66425
5149: the measurement must be between 1584 and -1584
Hi All,
The error message is coming up when a macro is run on word 2003 on XP
Professional.Works fine on some machines and failes on others with the
same configuration.
the macro is:
Any ideas?
I have marked the error with : the error is here!!!!!!!!!!!!!!!!!
Thanks
mskinnerNOSPAM@intellisoftgroup.com
////////////////////////////////////
Sub SaveFiles()
'Defsgn A - Z
Dim li_top_margin As Single
Dim li_left_margin As Single
Dim li_right_margin As Single
Dim li_bottom_margin As Single
Set fs = CreateObject("Scripting.FileSystemObject")
If Not fs.FolderExists("c:\intellicred\fax\") Then
MsgBox ("The folder c:\intellicred\fax\ does not exist. This
must be created")
Exit Sub
End If
ChangeFileOpenDirectory "C:\intellicred\fax\"
ActiveDocument.SaveAs FileName:="main.doc"
li_top_margin = ActiveDocument.PageSetup.TopMargin
li_bottom_margin = ActiveDocument.PageSetup.BottomMargin
li_left_margin = ActiveDocument.PageSetup.LeftMargin
li_right_margin = ActiveDocument.PageSetup.RightMargin
With ActiveDocument.MailMerge
.DataSource.FirstRecord = 1
.DataSource.LastRecord = 100000
.Destination = wdSendToNewDocument
.SuppressBlankLines = True
.Execute
End With
Documents(1).Activate
ActiveDocument.SaveAs FileName:="mergeddoc.doc"
Documents("main.doc").Activate
ActiveDocument.Repaginate
li_main_doc_page_cnt =
ActiveDocument.BuiltInDocumentProperties(wdPropertyPages)
Documents("mergeddoc.doc").Activate
'Used to set criteria for moving through the document by page
Application.Browser.Target = wdBrowsePage
ActiveDocument.Repaginate
'get the number of pages in the mergedoc
li_merge_doc_pages =
ActiveDocument.BuiltInDocumentProperties("Number of Pages")
p = 0
For i = 1 To li_merge_doc_pages
p = p + 1
'For p = 1 To li_main_doc_page_cnt
'go to the MERGE TO document
'Select and copy the text to the clipboard
ActiveDocument.Bookmarks("\page").Range.Copy
If p = 1 Then
DocNum = DocNum + 1
ls_new_doc_name = "fax_" & DocNum & ".doc"
Documents.Add
ActiveDocument.SaveAs FileName:="fax_" & DocNum & ".doc"
ActiveDocument.PageSetup.TopMargin = li_top_margin /// the
error is here!!!!!!!!!!!!!!!!!!!!
ActiveDocument.PageSetup.BottomMargin = li_bottom_margin
ActiveDocument.PageSetup.LeftMargin = li_left_margin
ActiveDocument.PageSetup.RightMargin = li_right_margin
'set margins
'With Documents("fax_" & DocNum & ".doc").PageSetup
' .LeftMargin = InchesToPoints(li_left_margin)
' .RightMargin = InchesToPoints(li_right_margin)
' .TopMargin = InchesToPoints(li_top_margin)
'.BottomMargin = InchesToPoints(li_bottom_margin)
'End With
End If
'Open new document to paste the content of the clipboard into.
Documents(ls_new_doc_name).Activate
Selection.Paste
If p = li_main_doc_page_cnt Then
'Removes the break that is copied at the end of the page,
if any.
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.Delete Unit:=wdCharacter, Count:=1
Selection.Delete Unit:=wdCharacter, Count:=1
ActiveDocument.Repaginate
If ActiveDocument.BuiltInDocumentProperties("Number of
Pages") > p Then
Selection.TypeBackspace
End If
End If
If p = li_main_doc_page_cnt Then
Documents(ls_new_doc_name).Activate
ActiveDocument.Save
ActiveDocument.Close
'Move the selection to the next page in the document
Documents("mergeddoc.doc").Activate
p = 0
End If
Documents("mergeddoc.doc").Activate
Application.Browser.Next
'Next p
Next i
Documents("mergeddoc.doc").Activate
ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
Documents("main.doc").Activate
ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
'Application.Quit _
End Sub
/////////////////////////////////// Tag: Why can't I post, answered Tag: 66423
Missing reference - Word Template - but it's there
I have fixed this problem but I'd like to know why it happened. Here
goes:
I created a document that contains a macro that basically merges the
document with a .TXT file. I transferred (if that's the right word)
into a new template called "projectabstract.dot". I sent the document
to other users along with instructions to save projectabstract.dot into
the subdirectory where their other templates were (found by Tools,
Options, File Locations). Most of the users did everything right and
the macro ran fine.
Then I needed to edit the document and the macro and send it out again.
This time, some users (all Word97 users) got the message "Compile
error: Can't find project or library". When I got them to stop the
macro and go to Tools, References, it showed that the
projectabstract.dot template file was MISSING. BUT it wasn't. It was
in the same place that it had been (I got them to check). They
unchecked the missing reference, saved the document and now the macro
runs fine.
BUT why did it say that the template itself was missing, which was
wrong? I'm pretty sure that I sent them another copy of the template
and told them to save it again, overwriting the one that was already
there. The users I was working with are pretty savvy and usually
follow the directions they are given. But if they hadn't replaced
projectabstract.dot, could that have made the difference? We will
probably be doing other things like this (i.e. one person creates a
document/macro and sends it to other users) so I'd like to know which
pitfall I fell into. Many thanks.
Carol. Tag: Why can't I post, answered Tag: 66421
How to Access Container from within an ActiveX Control!
hi!
i have an activex control for Word. i want to send Printing command to
my Container(Word) to print itself at specific location from within my
ActiveX (My be on clicking some context menu item.) is it possible to
do that. if so then plz help me.
A sample code will help a lot.
Thanks in advance.
Ahmad Jalil Qarshi Tag: Why can't I post, answered Tag: 66417
If Staement question
I have a macro
Sub Save2()
Dim vRefferingPhysician, vDate As String
If vRefferingPhysician = "Swain"
Then
Save
Else
SaveR
End If
End Sub
when I run the code it will always run the saveR macro, even if the field
is swain am I asking the right if question?
Thanks Tag: Why can't I post, answered Tag: 66410
How to detect if autotext entry is showing?
Hi,
I have defined some autotext entries: when I type some text, the autotext
entry is showing, and when I hit Enter the entry is inserted in the document.
Now I have created a KeyBinding for the Enter key: when the Enter key is
hit, a specific macro is executed. My question is: how can I detect in that
macro if the autotext entry is showing?
Thanks for help
Henk Tag: Why can't I post, answered Tag: 66407
Custom Document Properties - Writing Too
Hi
How can i write to a custom document property called TimesPrinted. This
document property already exists.
Many thanks
DMc Tag: Why can't I post, answered Tag: 66396
How can I reference another project as Normal?
i can call normal function,
Sub Foo()
normalfunc ' normal.normalfunc
End Sub
But If I reference a project, I only call that like below:
Sub Foo()
RefProject.testfunc ' Why i must writer RefProject?
End Sub Tag: Why can't I post, answered Tag: 66393
Selecting columns in table gives 5992 error
I have used the VB editor in Word 2000 to create a class that adds columns to
existing tables and sets text in the new column cells based on the contents
of the existing cells in the neighbouring column.
To Insert Column:
Create column object
Select it
Insert new column
Set oColX = TableX.Columns(lngCol)
oColX.Select
Selection.InsertColumnsRight
All went well till the program encountered a table split over multiple pages.
I then got run time error 5992 ..... cannot select.... column has mixed cell
widths!
So
a) how do I con Word into letting me select a column to insert a column
after it
or
b) how do I insert a column where the table is split over a page split?
Anybody solved this problem before.
Thanks Tag: Why can't I post, answered Tag: 66392
It turns out I had to disable ie's popup blocker.
Is it possible, that I'm the first person this happened to?
--
papagru