Specify size and location on screen of Notepad opened by VBA?

I'm using this code to open a text file. Is there a method to specify the size and location of the window that opens with the textfile?

I'm sure there may be a better method to open the textfile, so feel free to tell me how bad this code is.

Please Login or Register  to view this content.

Excel 2000

Thanks for helping me.

Hello proepert,

You can do this using the Windows API, but there are few properties or methods built-in to VBA to move and size a window or dialog. What do want to do and why is the position and size important?

Hello proepert,

Sorry this took so long. I have been sick for a few days. A cold makes it difficult to keep all the minutia of API code straight. You will need to change the name of the UserForm in the macro to what you are using. It is in red font. The UserForm width and height (in pixels) is also marked in red . You can change these to set the size you want.

It is important that the UserForm be activated within this event to capture the window handle. It you need to do something different, please let me know and do not try to modify this code on your own.

Please Login or Register  to view this content.

Hello Leith,

Thanks so much for doing all this work for me. I hope you feel better soon.

Does this code get split up, or pasted all together?

If it will help I have attached a sample workbook and textfile for us to work with. I'm not sure where to put this code. I would also like to open the Notepad from a command button placed directly on the Excel sheet if that is possible with similar code?

I didn't see any red in the code you posted, by the way, but I think I found the pixel values and the UserForm1 name.

Hello proepert,

Thanks for attaching the files. That saved a lot of time. I revised the macro and made the changes needed to UserForm and worksheet command buttons. Everything works on my end. If you have any problems, let me know. Here is the revised macro code.

Please Login or Register  to view this content.

Hello Steve,

My fault. I thought I had saved the change. The problem is a space is missing at the end of "Notepad.exe". Here is the corrected button code.

Please Login or Register  to view this content.