Close Program

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - An example to automatically create a document in Word I need to create in automatic a new document through VB code. The document text is a merge between text and variables that I get from a database. I have some trouble to format text and put it in the right position, chosing fonts, and so on. Has anybody an example that create a document from scratch? Thanks for your help. Marco Tag: Close Program Tag: 46487
  - 2
    - Document_Open don't work Hi, I have a word document with a Document_Open macro in it. My document is filled with a Intranet Forms (when I send the form, it writes a text document on the hard drive and then launch the word document. The word document reads the text file ti fill the field). The Document_Open don't work when I open it from my Intranet, I must go in the vb editor to launch the macro manually. It seems to look like this : KB329815 All the security are set correctly, I have try with Word 2002 with all the patchs and with none. The same document works fine under Word 2000. IS anyone could help me ? Thanx in advance. Tag: Close Program Tag: 46486
  - 3
    - Track Change Parser Hello everyone, I'm working on creating a procedure that will basically parse an entir word document and whenever it comes across a review change (create with the Track Changes option) it will add the page number to an array In the end, I want to simply print all of the pages off that ha corrections or changes on them. I have thought through some of th program and I am using Word's built in function to find the nex change/comment. I run into problems though when it gets to the end o the document...the dialog comes up asking if i want to repeat from th beginning of the document and if i click cancel it just crashes th script. I hope this is making sense, if anyone knows of an easier wa to do this, it would be very helpful. Thanks, mar ----------------------------------------------- ~~ Message posted from http://www.WordForums.com/ Tag: Close Program Tag: 46478
  - 4
    - manual pagination and/or find sentences at bottom of a page and top of a page. Are there any ways to manipulate the pagination functions besides the keepwithnext and keeptogether. For instance Say I have a paragraph with 3 sentences that split from the bottom of the page to the next page. Word will handle that automatically but I want it to split the paragraph say after a completed sentence, and sometimes add a message on the next page with a label from the previous page at the beginning of the paragraph. Otherwise is there a way to find out what the last sentence on a given page is or any other functions that could help in that process so I can manually figure out how to split the data by position. Tag: Close Program Tag: 46475
  - 5
    - any way to capture keypress within the document not form control Is there an event for when a user presses a key? Any key, regardless of how it may slow down any performance, to pick up every keystroke and do stuff w/ the entered keystrokes and typing out the keystrokes I want only. Tag: Close Program Tag: 46473
  - 6
    - If statement does not recognize empty cell. Thanks Peter for help with my previous post. Ok, I have this code below, however it doesn't seem to recognize when there is an empty cell. I have tried using cell <> "" and I get the same result. It seems to think there is something in the cell. I only want the code to execute if it finds a value in xCell. I have also tried Val(cellref).text <>. Any suggestion? ' Declarations Dim qty As Cell Dim prc As Cell Dim extPrc As Cell Dim ttl As Long Dim tbl As Table ' Initialization Set tbl = ActiveDocument.Tables(2) For i = 2 To tbl.Rows.Count Set qty = tbl.Cell(Row:=i, Column:=2) Set prc = tbl.Cell(Row:=i, Column:=4) Set extPrc = tbl.Cell(Row:=i, Column:=5) If Val(prc.Range.Text) <> Null Then ttl = Val(qty.Range.Text) * Val(prc.Range.Text) extPrc.Range.Text = ttl Else extPrc.Range.Text = "" End If Next Tag: Close Program Tag: 46470
  - 7
    - HELP!! MY MACROS ARE GONE Can anyone help me! I'm using Word 2002 and my Macros were there 15 minutes ago and now they are gone! What should I do? Tag: Close Program Tag: 46467
  - 8
    - Count instance of a specific word I need to count the number of instances a specific word is used in a very large document. Hopefully using something that will return a "count()" result.... Tag: Close Program Tag: 46459
  - 9
    - Move end of range to where I am? I think I've got this right, but I'm not sure. I'm used to using Selection, and I'm trying to do this in Range. I want to set a range that starts at the beginning of the document and extends until the end of the paragraph containing a specified text string. So far, I've got: ' Start at beginning of doc rngTemp.SetRange(Start:=0, End:=1) ' Find end of range With ActiveDocument.Range.Find .Text = "^pFormNo. " .Forward = True .Execute End With Okay - that should put me where the Form No. is at the bottom of the range I want. Except I need to extend this to the end of the paragraph, then reset my rngTemp parameters from the beginning to that point. First, I'm not sure I did the Find okay. I thought I read somewhere that you can't mix Selection and Range, so I tried this with Range. Second, with Selection, I have a visible cursor insertion point that makes things easier. And I can MoveRight to the end of the paragraph. What am I moving with Range and how do I move it? Third, how do I return where I am so I can do another SetRange to include everything from the beginning to where I am? Or is there a better way? Tag: Close Program Tag: 46455
  - 10
    - Moving a graphic I have a graphic in a Word XP file. Text wrapping for this image is set to "Tight", but I can also change it to "Square" with the same results Every time I try to position this image it jumps back up and aligns itself with the very top edge of the page. What is going on????????????????????????????????? I move it and it jumps back To make it even more crazy, I can position another similar image in the location I want, just not the one image. WHAT IS WRONG!?!?!?!?!?! Please advise and help....thanks very much in advance. Tag: Close Program Tag: 46453
  - 11
    - Shortcut key doesn't run macro properly In Word 2000 I have a macro in an Add-in template that finds the next @ symbol. It moves one character to the right before performing the Find in case an @ symbol is currently selected. The macro works correctly when run from the VBE or from a toolbar button. However, when run from the Alt+2 shortcut, it does not move right before performing the Find (so once it has found the first @, it stays on that @ each time Alt+2 is pressed). The weird thing is that if the template itself is opened, Alt+2 works correctly on text inserted into the template - it just doesn't work in other documents. What is the explanation for this and how can I make Alt+2 work correctly? TIA, Vivian Carroll Tag: Close Program Tag: 46451
  - 12
    - Trying to reach Malcolm Smith I've been trying to send an email to Malcolm Smith at his Dragon Drop address and it keeps getting bounced. If anyone has an updated address, I would appreciate getting it at delete.kenyonck.remove@nospam.execpc.com. (after purging the delete, remove, and nospam markings). TIA -- Charles Kenyon See the MVP FAQ: <URL: http://www.mvps.org/word/> which is awesome! --------- --------- --------- --------- --------- --------- This message is posted to a newsgroup. Please post replies and questions to the newsgroup so that others can learn from my ignorance and your wisdom. Tag: Close Program Tag: 46449
  - 13
    - removing code from document I have a Word document that contains code in the ThisDocument section. The code allows people within my department to make changes and email the document between one another (along with a few other minor functions). However, at some point the document will need to be emailed outside of our department. At that time, I need the ability to email a copy of the plain word document without any code. I want the code completely removed so they do not receive the security message when they open the doc (it is not possible to change our security settings). The original document should remain intact, with code, so it can still be used within the dept. Can anyone nudge me in the best direction? Thanks! Tag: Close Program Tag: 46446
  - 14
    - Clunkie Macro I use the follwoing macro to fill in two fields following the checking of a box... it works but not smoothly or consistently... how could I improve it? Is the a way to write one short macro which handles many checkboxes (and related text fields)? Tag: Close Program Tag: 46445
  - 15
    - Table Cell Formatting via VBA Hi Everyone I'm trying to create a piece of VBA code that will apply preset cell shading and border formatting to either a single cell or a group of selected cells, see below code: Sub BlueCell() With Selection.Shading .Texture = wdTextureNone .ForegroundPatternColor = wdColorAutomatic .BackgroundPatternColor = RGB(200, 225, 250) End With Options.DefaultBorderLineStyle = wdLineStyleSingle Options.DefaultBorderColor = RGB(0, 125, 200) Options.DefaultBorderLineWidth = wdLineWidth050pt With Selection.Borders .OutsideLineStyle = Options.DefaultBorderLineStyle .OutsideLineWidth = Options.DefaultBorderLineWidth .OutsideColor = Options.DefaultBorderColor End With For Each Border In Selection.Borders If Border.Inside = True Then Border.LineStyle = Options.DefaultBorderLineStyle Border.LineWidth = Options.DefaultBorderLineWidth Border.Color = Options.DefaultBorderColor End If Next Border End Sub What I'm finding is that the codes works fine if I have more than one table cell selected however, if I have a single cell selected the code falls over within the IF... Then... Else... statement at the: Border.LineWidth = Options.DefaultBorderLineWidth Can anyone help? Big thank you in advance Al Tag: Close Program Tag: 46443
  - 16
    - Assigning event handlers to dynamically created controls Hi there, I have searched recent messages however I did not find any answers to a very simple question - is it generally possible to assign an event handler to a control that has been created during run-time??? Example - I have a form with multipage control on it. I dynamically create pages and populate them with controls like TextBox(es) and Image(s). How would I assign an event handler, e.g. Change() to those text boxes? Is it possible at all in VBA (I use Office XP). Thanks in advance Alex Tag: Close Program Tag: 46440
  - 17
    - How to add a menu and manu items with VBA? Hi, How can I add a menu named "Correction" to the menu bar, and then add with some menu items (to this new menu) that activate procedures from a VBA module? I can do this manually of course, with Tools > Customize, but I want to do it by VBA code. Now I have this recorder code that doesn't seem to work: CommandBars("Menu Bar").Controls.Add Type:=msoControlPopup, Before:=CommandBar.Controls.Count + 1 'the Count + 1 is written by hand, of course CommandBars("Aangepast snelmenu 23187796").Controls.Add Type:= _ msoControlButton, Before:=1 CommandBars("Aangepast snelmenu 23187796").Controls.Add Type:= _ msoControlButton, Before:=2 CommandBars("Aangepast snelmenu 23187796").Controls.Add Type:= _ msoControlButton, Before:=3 Any Idea? Tag: Close Program Tag: 46438
  - 18
    - SAVED-property is true, but ... Hello I use Word 2002 and load documents in the internet explorer 6. (like file:\\C:\test.doc) This is not really a problem. My problem is this: In my document are a lot of fields. I unlink the fields with vba and print the document. After this, i set the saved - property "TRUE" and would close the document. Befor the document closed, word ask me: "Would you save the changes?" What is this?? The saved - property is TRUE and word ask me to save changes? I don't know where the problem is ... Can someone help me ??? Thomas Tag: Close Program Tag: 46423
  - 19
    - Templates I just upgraded to Office 2003. I want to be able to click start then go up and click on "New office document" and choose from selected templates but I can't seem to get that part on my computer. Any suggestions! Tag: Close Program Tag: 46422
  - 20
    - Run autoexec macro on loading a template? Hi, I am looking for a way to run a "Sub AutoExec" on loading the template that contains the macro (by checking a template in the Tools > Templates and Add-ins dialog box OR by placing the template in the Startup folder of Word). How can this be done? Tag: Close Program Tag: 46415
  - 21
    - Office Assistant We have just installed XP. I want to change office assistant but when i put Office 2000 Disk in like before it doesnt work. Why? Tag: Close Program Tag: 46414
  - 22
    - String variabla to Integer of Long Hi, What is the function for converting String variable with number to Integer or Long variable? Thanks. Sasa Tag: Close Program Tag: 46412
  - 23
    - Searching for text in all the documents in a folder and its subfolders I have a couple of macros that can run a macro in all the documents in a folder. But I want to do something that those macros can't handle. I want to do a Find (not a replace, just a find) that will stop at each occurrence of the found text in all the documents in a folder (and optionally its subfolders). This is difficult because the code in the below macro to close the current document and move on to the next document must not run until all the searched-for strings in the first document are found. In the below code, I've commented out the Close Document code. Normally, if I do a Windows Find for the documents that contain the text, I still have to open each document individually and search again for the text. I want to make it all one continuous search, opening a document, stopping at each instance of the found text as I repeat the command, and then when there are no more to be found in that document, closing it and opening the next document. Can that be done? Thanks, Larry Dim sFileName As String Dim sFolder As String 'Replace with your own foldername sFolder = "C:\Documents\Tests\" sFileName = Dir(sFolder & "*.doc") While sFileName <> "" Documents.Open (sFolder & sFileName) 'run macro Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "powerful" .Forward = True .Wrap = wdFindContinue .MatchCase = False End With Selection.Find.Execute ' commented this line out. ' ActiveDocument.Close savechanges:=wdSaveChanges sFileName = Dir() Wend Tag: Close Program Tag: 46403
  - 24
    - Price calculations in Word I need to calculate prices in a table in word, and my VBA needs to be able to start at the first row, look at aCell and multiply it by bCell and place the value of that in cCell. My problem is that I don't know how to reference each cell location. I have done quite a bit of work with excel/vba but nothing with word. Tag: Close Program Tag: 46396
  - 25
    - Sending function to VBA from VB6 Hi there I want to create a function in VB6 that can be copied from a VB6 application to the VBA area in a Word 2002 file so that it works as if I had created the macro in Word itself. The functionality provided will create a menu item that can perform specific duties. Any one know how to do this? I have read somewhere about VBE, VBProjects but there is not enough detail Thanks in advance Tag: Close Program Tag: 46394
- Next
  - 1
    - "property not available" error in macro Hey there, I wrote a macro to prompt for the location of a few pictures using wdDialogFileOpen and insert them into a Word document. It works great, but now the user is opening this document in an application that imbeds Word as an OLE object. Now I get run-time error '4605': This method or property is not available because this document is in another application." The code snippet is below; it gives me the error on the first (With Dialogs) line: With Dialogs(wdDialogFileOpen) .Name = "*.jpg; *.gif; *.bmp" If .Display Then strFileName = CStr(Trim(WordBasic.FilenameInfo(.Name, 1) & "")) Else strFileName = "" End If End With Any suggesstions on how to return control or focus to the document so I can instantiate the "open dialog" window? Thanks, C kaczmar2@msu.edu Tag: Close Program Tag: 46393
  - 2
    - Mouse Pointers One of the properties options for a command button is a great big list of different types of mouse pointers that will display when the cursor is run over the button. As luck would have it, the one that I want (the "hand" -- or maybe better, the "finger" -- pointer finger, that is) isn't in the list. As ubiquitous as the finger is in daily operation, I am curious (1) why it's not one of the choices and (2) can I still call it via "Custom Pointer (#99). Thanks, Tag: Close Program Tag: 46392
  - 3
    - Word App which is compatible with both Word 2003 and Xp Hello: I am working in VB.Net 2003. My company is in the process of making a program which will interact with the users version of Word on their machine (basically open a document, replace some characters, etc...). Currently I have made my solution work with Word 2003. I am now trying to make it work with Word XP. I guess the first question I 'd like to ask is if it is even possible to make one solution which will use the correct Dll's which coincide with their version of word? I have totally redone the app and used only the XP dll's (office.dll and word.dll) and it works. But i really dont want to have 2 versions of my code due to the fact that it will be much more difficult to maintain. I do have the office tools for visual studio 2003. If anyone has some answers, suggestions or even examples, they will be greatly appreciated. Thanks for your time. Brian Tag: Close Program Tag: 46390
  - 4
    - Find Styles in Footer What is the best way to find a style in use within all footers of a document, AND TO BE NOTIFIED? In other words, cycle through all pages of a document and look in the footer to see if a particular style exists. If it does, then msgbox me. Thanks, Doug Tag: Close Program Tag: 46388
  - 5
    - How to make a variable persistent? Hi, Does anyone know how to make a variable persistent over a long time? I have a macro that manipulates words that are selected in a document. Therefore I retrieve (from the registry or an ini file) the name of a database file and store this name into a variable. I prefer to do this only once, when the macro is initiated/started for the first time, rather that retrieving the database name each time a word is manipulated. Any idea how I could achieve this? How I can keep my macro "alive" while no words are selected or manipulated? The macro's are written only in "Sub" procedures, there are no functions and no forms. Kind regards, ANDy Tag: Close Program Tag: 46382
  - 6
    - Runtime Error 4605 I use Office 2003 on XP Pro. I did a mail merge to construct a file from which to print labels for about 200 addresses from my OL Contacts. I then recorded a macro as I went through the same steps. When I ran the macro, I got runtime error message #4605. "This method or property is not available because the current mail merge main document needs a document source." How do I correct this condition, so the macro will run? Thanks for the help. Tag: Close Program Tag: 46379
  - 7
    - Find Char and Replace with a Symbol Also posted in "General Questions" Greetings ! I have this, generated by recording a Macro : Selection.Find.Replacement.Font.Name =3D "MS LineDraw" With Selection.Find .Text =3D "=B3" .Replacement.Text =3D "=B3" .Forward =3D True .Wrap =3D wdFindAsk .Format =3D True .MatchCase =3D False .MatchWholeWord =3D False .MatchWildcards =3D False .MatchSoundsLike =3D False .MatchAllWordForms =3D False End With Selection.Find.Execute Replace:=3DwdReplaceAll but now that MS LineDraw won't work, I thought I could=20 substitute this, wot I got also by recording a Macro: Selection.InsertSymbol _ Font:=3D"Courier New", _ CharacterNumber:=3D9508, _ Unicode:=3DTrue but I can't seem to marry this snatch with the previous=20 code, to do the lot. Help ! RClay AT haswell DOT com Tag: Close Program Tag: 46377
  - 8
    - Breaking Links in Word using VBA I am trying to find away to automatically break linked data from excel with out having to use the "edit" menu, and after much searching have drawn a blank. If anyone has any ideas if it's possible, i'd be very appreciative Tag: Close Program Tag: 46375
  - 9
    - Save to Network Hey Gang, I am assisting individuals with developing their resumes using Word Resume Templates. There could be up to 20 students with a wide range of computer experience. The students are given a disk to save & keep a copy of their completed resume. I also need a copy of their resume. I need a macro that will: 1. Use the file name already assigned to the document. (It will be a unique name). 2. Save the file to a network location: P/cisco/resume 3. Again save the document 'A' drive 4. End the macro. Your help appreciated - Thanks, Jerry Tag: Close Program Tag: 46370
  - 10
    - Macros running much slower than before I have a very large and complex library of macros which I developed largely under Word 2000 and Windows 2000 on a computer with a 733MHz Pentium 3. I'm now running them under Word 2002 and Windows XP on a laptop computer with a 2.2 GHz Pentium 4. I find that certain operations run much slower on the new machine. "Much slower" means that a macro which used to display its first dialog box in a second or less now typically takes 20 or 30 seconds to display it. Much of the slowness (but not all of it) seems to be associated with some type of initialization. That is, the second time I run a macro it starts much more quickly than the first time, although still not as quickly as it did on the old machine. The machines have the same amount of RAM (512MB). I can't identify any differences that might account for this problem except that since the new machine is portable, it has a slower disk, and its CPU might have a smaller cache. I have a hard time believing that either of these factors accounts for the drop in performance. I have watched the laptop computer's disk activity light while these macros are starting, and it seems to be no more busy than when the computer is idle. What might be the problem here? How can I identify it? . Tag: Close Program Tag: 46369
  - 11
    - Msworld9.old ok but not Mso9.dll Hello everybody, (particular Tom) For Tom : I have tested the problem with an unprotected version of the document (I have sent it to my customer), and it's effectively a compilation error because of Mso9.dll missed. For Everybody, I explain the problem : I write macros VBA on Word 2000 and in a PC full XP (Office XP Pro, Win XP...) in one of my customer, it doesn't works because of dll missed whitch is finaly Mso9.dll. If I check the VBA references in this document in my configuration (Office 2000, W98) I see 4 dll referenced : VBA, OLE Automation, Mso9.dll and msword9.olb. Those references are the default references... In one of my customers whitch has Office XP, Mso9.dll and msword9.olb don't exist => Compilation error... because Mso9.dll is missed (only it). The code is protected so he can't change the references. What can I do to pass this problem and to make macros whitch works on the 2 systems ? A solution would be to make 2 files : 1 for Word 2000 and 1 for Word XP but it's not good to maintain So, Is there a service pack whitch fix this problem or a method to "prepar" the VBA environment ? Thanks for your answer. Francois Ps : sorry for the mistakes :-) Tag: Close Program Tag: 46365
  - 12
    - how to store a picture of msword into a visual basic picture box control using a visual basic for applications i have a picture in ms-word and i want to store the picture in visual basic object using visual basic for applications through that object i want to show in a picture box control in visual basic 6.0 and is there a method which will take a picture and store it in a jpeg or bmp file format in memory Tag: Close Program Tag: 46357
  - 13
    - Listview Hi all, Can anyone help? I need to set the properties of a listview control so that one column shows item numbers (1, 2, 3, ect)up to a pre- stated number of items. with a corressponding column allowing the user to enter a description of the item next to the relevant item number. The whole lot is then to be printed on a word doc. I have not encountered this control before. Can anyone assist? Kind regards Adrian Tag: Close Program Tag: 46350
  - 14
    - How to pass a Two Date parameter to a report at runtime using VB .NET hi, How to pass a Two Date parameter to a report at runtime using VB .NET 1. How do we pass multiple values eg. Startdate, EndDate to crystal reports parameter. 2. I have a report to filter by two dates like FromDate And ToDate my Code is following which i have written. It shows Error like " Date time Required" Dim SelectFormula1 As String SelectFormula1 = "{tblSample_Master.DateOut} in '" & StartDate & "' to '" & EndDate & "'" CrystalReportViewer1.SelectionFormula = SelectFormula1 CrystalReportViewer1.RefreshReport() CrystalReportViewer1().ReportSource = "D:\KOTITI\RptSummaryReportFromDateToDate.rpt" thanx Raj -- Raj Kumar Mishra jcast Networks Ltd. New Delhi. India. 91-51678212,13,14 Tag: Close Program Tag: 46348
  - 15
    - How to pass a Two Date parameter to a report at runtime using VB .NET hi, How to pass a Two Date parameter to a report at runtime using VB .NET 1. How do we pass multiple values eg. @Startdate, @EndDate to crystal reports parameter. 2. I have a report to filter by two dates like FromDate And ToDate thanx Raj -- Raj Kumar Mishra jcast Networks Ltd. New Delhi. India. 91-51678212,13,14 Tag: Close Program Tag: 46347
  - 16
    - Read the filename from the wdDialigsFileOpen dialog? Dear all, Does anyone know how to read the filename the user selects in the default FileOpen dialog, into a variable? I've tried this (in vain): ================= Dim dlgA as Dialog Set dlgA = Dialogs(wdDialogFileOpen) With dlgA .Show varB = .Name End With ================= TIA, AND Tag: Close Program Tag: 46345
  - 17
    - Error message received when accessing the clipboard using VBA I'm looking to be able to access the clipboard contents using VBA. Here's some code which I got from this forum (guy name of Helmut posted it) Sub R_clipboard_to_variable( Selection.Cop Dim o As DataObjec Dim s As Strin Set o = New DataObjec o.GetFromClipboar s = o.GetText(1 MsgBox End Su Now this doesn't really do a whole lot of anything, but the end result will have to do with re-writing the headers and footers of about 300 odd documents. When I run this code, though, I get a Compile Error: User-defined type not defined. As I understand it, the dataObject object should be integral to VBA and not something I have to declare a class for. My copy of VBA says it's version 6.3.8863. If anyone can shed any light on this (add-in needs installing, maybe?) then I'd be most obliged Ganeth Tag: Close Program Tag: 46332
  - 18
    - Using {MACROBUTTON} fields to insert information from Outlook Using Word 200 and XP, what is the code for using {MacroButton} fields to insert Name, Address, (or information from any other field) from Outlook into a Word document? Tag: Close Program Tag: 46320
  - 19
    - Header/Footer Maybe I was not paying attention but the code I used to create the header of a document on the first page is not being used on subsequent pages. Is there a way in code to tell it to do so? Tag: Close Program Tag: 46318
  - 20
    - Macros and persistence of Web tools modification I received a Word 2000 document that contains macros. It is a form with many checkboxes. The checkboxes are too big. I can change their width and length using Web tools properties, but when I save and close the document and launch it the next time, the changes are gone. I suspect that the document's macro(s) may be overwriting my changes. I have tried to find these macros using Tools/Macros, but with no success. Can anybody out there help Tag: Close Program Tag: 46317
  - 21
    - Context sensitive help Are there any good tools for building context sensitive user help in VBA applications ? /BosseH Tag: Close Program Tag: 46312
  - 22
    - Step through template AutoNew macro? I have a Word 2000 template with an AutoNew macro. This is called by a macro in Excel. I need to make some changes to the Word macro, but I can't seem to figure out how to step through it to see what's happening. I can step through the Excel macro, but when it hits Set WD = CreateObject("Word.Application") WD.Documents.Add the Word document and actions are invisible, and I can't see the steps. Any suggestions? Ed Tag: Close Program Tag: 46305
  - 23
    - Tables with borders.... i wish! When I run a macro from my document in Word 97 a table is created and the borders are automatically added but when I perform the same operation in word XP the borders are non-existant. I do not understand why, even though if you insert a table manually the border are there (in XP). Is this a bug or do I need to write a macro to draw the lines back in. Is there a setting i'm missing? I just don't know!!!! Please help. Regards Rob Tag: Close Program Tag: 46304
  - 24
    - adding text to a object Would like to add a text string to the ThisDocument Document_Open() procedure in a number of word documents that have already been created. Would do this from a main word document looping through the other docs. Need a start on how to get the vba to recognize the procedure Document_Open thanks Tag: Close Program Tag: 46299
  - 25
    - How to add a "cloned document" Hi all, i have a word document and want to add a new one in Word. This new should have the same text and format, the old one has. I am trying since two hours, but have no idea how to "clone" documents. I tried to "wholeselect" the old one and copy it to the new, but format-differences from template, made in the old document, will not be copied. In Borland Delphi i would do someting like this... procedure Clone; begin NewDocument := WordDocument.Create; NewDocument.Assign(OldDocument); end; but dont know how to do that in VBA. Maybe anybody else has an idea... -- Erstellt mit M2, Operas revolutionärem E-Mail-Modul: http://www.opera.com/m2/ Tag: Close Program Tag: 46294

Is it possible to close a program window, after opening it
with the shell command in vba?.

Re: Close Program by Perry

Perry
Fri Feb 20 11:33:45 CST 2004

You can't ... Shell() doesn't return a handle of use.

Workarounds:
You could run through the Tasks collection like in:
Dim t As Task
For Each t In Tasks
Debug.Print t.Name
If t.Name = "bla" Then t.Close
Next

I wud favour using a couple of API calls to accurately determine
the process(thread) and really terminate the process of your choosing.

Use Google to get more info on:

Private Declare Function TerminateProcess Lib "kernel32" _
(ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long

and the accompanying other API calls needed to accurately terminate
processes/applications.

Krgrds,
Perry

"mark" <mark.bzowski@ntlworld.com> schreef in bericht
news:MEmZb.15$b_4.0@newsfe1-win...
> Is it possible to close a program window, after opening it
> with the shell command in vba?.
>
>

Top