Search results for query: *

I have an .exe program that was created in VB6. When I try to run the .exe, it tries to install ExpertCAD, a drafting program. There should be no reason ExpertCAD needs to run for this program. Does anyone know what I need to do to fix this? The other weird thing is that ExpertCAD is...

Here is what I need, please be patient: PowerMILL(drafting program), is open a point is selected, when F1 is pushed a window comes up giving the coordinates of the point, I would like this window copied(alt+print screen) and pasted into a word document by this code so the user doesn't have to...

There is a form used where I work that four or five people use to create quotes. They can all access and create new quotes at the same time most of the time. One user had the form open for a while and no one else could use the form after some time(not sure how long he had it open). I closed...

I have an excel sheet setup with macros. There is a save button that when pushed should save the current page by printing it to distiller 5.0, creating a .pdf in a certain location. This was working fine until a couple weeks ago where now it errors out. It gives a memory error and doesn't...

This form, which I obviously didn't create, is limited and does not have a tools option. I went into a blank .mdb of access and all the settings were the same. Plus this only happens in one text box in the same form where in other text boxes it works fine.

I use an access form, off our server, and when I am in a text box and push the enter key, the cursor moves to the next text box, not down a line like it did in the past. The weird thing is that another user uses the exact same form off the server and it works fine on his box. I thought it had...

I have code that looks like this at the end: ActiveDocument.PrintOut ActiveDocument.Close False Kill OutputFile Application.Quit False The problem is that it runs too fast and it closes everything before the printout starts. Is there a way to run the activedocument.printout...

That worked thank you very much

I have a macro in word and I would like to insert a "(" at the end of the active document then go back to the beginning and run the macro as I have it right now. Can someone help with this? I am obviously a n00b so any help is appreciated.

Sorry I didn't mention the other thread but I didn't want to confuse people anymore than I thought I would. Obviously that was not the case. Mike, Thank you very much. That is exactly what I was looking for. It works great.

OutputFile = Mid$(CStr(ActiveDocument), 1, Len(ActiveDocument) - 3) & "doc" This code takes a .prg file and creates a file of the same name but it is .doc. I just want the OutputFile to be printed automatically. Sorry, yes this is in Word.

I have a macro that modifies an open document and creates a new document. The new document does not open. Is there a way to just have the newly created document print right away? It does not need to be opened or saved, just printed. Here is the code: Sub YoYo() Dim MyFile As Variant Dim...

Yes, I think that would be good.

It is not for me. An employee complained because in excel, the macro asks for a file, when you find it, it creates a word doc the way we want it. But it is too much work to have to open the word doc and print it. I think it is stupid but I gotta do it. The excel code opens a form when you...

I have a document that looks like this: % O0001 ( DIAMETER = 4. ) ( CORNER RADIUS = .125 ) ( STOCK ALLOWANCE = .03 ) G91 G28 Z0 H0 G49 T1 M6 G90 M3 S2500 G5 P1 G61.1 G0 X8.6251 Y-2.1484 G43 Z-1.4 H1 M50 Z-1.9 G1 Z-1.93 F150. Y8.0004 Z-1.9831 X2.5551 Z-2.0149........say 10 more PAGES of this...

Just so you know, I didn't write the code and it is in excel right now. I would just like it in word. I was hoping there was just a few different changes to make it work in word. And you are right that I want the first 20 lines and last 10 lines and repeated through the document. Sorry for...

Sorry the first code is a previous version. This is the one I am using now. Private Sub CommandButton1_Click() filopn1 = Application.GetOpenFilename("Text Files (*.prg), *.prg*") If filopn1 = "" Then MsgBox "Please select a file" Exit Sub End If If UCase(Right(filopn1, 3)) <> "PRG" Then...

I want to create a reference document from an existing document. The existing document starts like this: % O0001 ( DIAMETER = 4. ) ( CORNER RADIUS = .125 ) ( STOCK ALLOWANCE = .03 ) G91 G28 Z0 H0 G49 T1 M6 G90 M3 S2500 G5 P1 G61.1 G0 X8.6251 Y-2.1484 G43 Z-1.4 H1 M50 Z-1.9 G1 Z-1.93 F150...

Here is my code: Private Sub CommandButton1_Click() filopn1 = Application.GetOpenFilename("Text Files (*.prg), *.prg*") If filopn1 = "" Then MsgBox "Please select a file" Exit Sub End If If UCase(Right(filopn1, 3)) <> "PRG" Then MsgBox "This app only good for text files" Exit Sub End If...