Auto Control Of Dialog Window (SendMessage)

Jul 8, 2006

I'm trying to use Excel VBA to control a dialog box spawned from another application (in this case MS Word). The code below will obtain the window handle of the "Save As" dialog, and the SendMessage command will return the text length of the window name. This proves I can identify and communicate with the window, but I don't know how to provide a filename and click the save button. I can't find the SendMessage parameters needed to perform these actions.

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long
Private Const WM_GETTEXTLENGTH = &HE

Sub Dialog_Control()
Dim lngHwnd As Long
Dim strWindow As String
Dim varTemp As Variant
strWindow = "Save As"
lngHwnd = FindWindow(vbNullString, strWindow).......................

View 7 Replies


ADVERTISEMENT

Auto Control Of Dialog Window (SendMessage)

Jul 8, 2006

I'm so close. I'm trying to use Excel VBA to control a dialog box spawned from another application (in this case MS Word). The code below will obtain the window handle of the "Save As" dialog, and the SendMessage command will return the text length of the window name. This proves I can identify and communicate with the window, but I don't know how to provide a filename and click the save button. I can't find the SendMessage parameters needed to perform these actions.

VB:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long

[Code]...

View 9 Replies View Related

Closing The Workbook From A Dialog Control

Jun 28, 2006

I have a spreadsheet that automatically opens a dialog box when the workbook is opened. This is a little disclaimer intended for other users of the spreadsheet, which if they click ok it simply closes the dialog sheet, but if they click cancel I want it to kick them out of the Workbook without asking them to save changes. I only want it to close that specific workbook incase they have others open that they haven't saved, etc.

The dialog box is opened as follows:

Private Sub Workbook_Open()
DialogSheets("Splash Screen").Show
End Sub

The code I have tried for the closing of the workbook is done by assigning the following macro to the cancel button (note, all but one of the sheets in my workbook is hidden and protected, including the dialog sheet):

Sub Splash_Close()
'
ThisWorkbook.Close SaveChanges:=False
'
'Also tried ActiveWorkbook.Close SaveChanges:=False
'Application.Quit (This closes all excel documents)
'
End Sub

I know there is something I am missing, keeping in mind I am quite experienced with excel, but relatively new to macros and VB programming.

Just a bit extra on this problem. I am creating the file as a template *.xlt, and the error I get when trying to run the example macro I gave at the start is a 1004 error Method close of object _workbook failed.

Also, in an ineresting (baffling for me at the moment) twist is that once you hit end on the error and it just goes to the first page of your spreadsheet, you can then go to ToolsMacros and run the macro from there, and it closes the workbook exactly the way I want it to!

View 8 Replies View Related

How To Display A Gif File In A Dialog Box Using An Image Control

Jan 11, 2010

my code brings up an empty dialog box.

The file I am trying to view is saved as follows: C: Test.gif

What I have done.Added a image control to a dialog box, called image1
Added the following event handler to image1:
x = c: test.gif
Image1.picture = loadpicture (X)Pressed F5 to test the code and brings up a dialog box with a blank image box.

Not called the userform in the main module (didn't seem much point considering the test failed)

My questions

where I am going wrong with this, the correct code?

Also in inputting the address of the file I could not use the C: format as this brought up an error. What is the correct format?

View 9 Replies View Related

Automatically Control File Download Dialog

Jun 29, 2006

complete the attached code (Excel VBA) to automatically process a File Download dialog from Internet Explorer. I want to click "Save" which will produce the "Save As" dialog. Then I need to enter a default filename like (C:Temp) and click "Save" again. When this is working, I will hide Internet Explorer to make the operation completely transparent to the user. The URL is a sample chosen specifically for this test case.

Public Sub Report_Test()

Dim objIE As SHDocVw.InternetExplorer
Dim strURL As String
Dim varItem As Variant

' Establish connection to the Internet Explorer application.
Set objIE = CreateObject("InternetExplorer.Application")

' Set Internet Explorer visible.
objIE.Visible = True

View 3 Replies View Related

Macro - Take Control Of Popup Window?

Feb 16, 2013

Just want to know if is possible control a popoup window through a VBScript Macro in excel? I don't know if I could click a button from a PopUp when it appears? I mean I cant go forward because a popup message appears and I dont know how take the control of it.

I mean how can the parent window take the control of the child window (popup window)

View 2 Replies View Related

Excel 2007 :: Control Positioning And Size Of Window?

Mar 13, 2012

My set up office 2007 win xp pro ie 8 I am using the code below to retrieve web pages etc it works fine, however it display in differ areas of the screen, so I was wondering if there is a way to control the positioning and the size of the window?

Code:
Set EXP = CreateObject("InternetExplorer.application")
EXP.Visible = True
EXP.Navigate (aurl)

[Code]....

View 2 Replies View Related

Calling Macro: API Postmessage Or Sendmessage

Oct 4, 2006

Using a different script application, I would like to run my VBA macros while working in Excel. I was wondering if I could achieve that using PostMessage or SendMessage calls. Part of the problem is that Excel only seems to allow either Ctrl + letter or Ctrl + Shift + letter as an assignable macro shortcut. My script gives me flexibility in that I can assign any key or combination of keys to trigger any kind of routine, like a PostMessage call, for instance. So while working on my workbook, I might want to press, say, ScrollLock followed by a letter of my choice, followed by another letter of my choice (a sort of super shortcut), resulting in the running of a Macro of my choice in Excel.

View 5 Replies View Related

Avoid Hard Coding Control Name Inside Control Event Procedure?

Mar 4, 2014

Is there any way in VBA to refer to a control in its own event procedure without referring to it by name/hard-coding?

It might be clearer to explain by a dummy code example:

[Code] ......

I'm seeking what I would need to replace Line1 with.

View 11 Replies View Related

Select Next Control / Cell On Worksheet After Enter In Control

Jan 9, 2008

Within the ComboBox properties, is there anyway to control after "enter" his hit, you move to the right instead of down (similar to the edit under Tools/Options)?

View 9 Replies View Related

Drag From Treeview Control To Spreadsheet Control

Jan 12, 2007

I have created a userform within VBA which has a TreeView Control and a Spreadsheet control on it.

I have populated the TreeView control with data and what I want to be able to do is to drag the nodes off the TreeView control to the spreadsheet control.

I can drag onto a normal worksheet but not onto the spreadsheet control (the no drop mouse pointer keeps showing).

View 4 Replies View Related

Determine Active Control On Multipage Control

Oct 4, 2007

How do I determine which control the user is currently modifying on a multipage form (either changing, enterying or exiting the specific control). when I use "userform1.activecontrol" i get "multipage1" as the control name but I need the actual control on the specific active multipage. (also the .TABINDEX is for the multipage regardless of the on-page control) I use a generic data-field change SUBroutine so need the control name (and the TABINDEX) to provide my SELECT CASE. (so every fieldname_CHANGE calls the same SUB [with no parameters])

View 3 Replies View Related

Add-In And Save Dialog-Box

Oct 21, 2008

I'm building my first Add-In, which I'm using to gather all Sub's that I've created through my small VBA writting career. The thing is that when I write new code and some reason exit Excel and forget to save the XLA, obviously the code is lost. I've used:

View 4 Replies View Related

Macro Won't Appear In Dialog Box

Jan 3, 2013

I have some code in a standard module. When I try to run it, it does not appear in the dialog box. The code's below.

Code:
Sub CopyCat(ByVal Target As Excel.Range)
If Target.Column 21 Then Exit Sub
If Target.Value = "Y" Then
Cells(Target.Row, "A").Copy Destination:=Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1)
Cells(Target.Row, "B").Copy Destination:=Sheets("Sheet2").Range("B" & Rows.Count).End(xlUp).Offset(1)
Cells(Target.Row, "C").Copy Destination:=Sheets("Sheet2").Range("C" & Rows.Count).End(xlUp).Offset(1)
Cells(Target.Row, "D").Copy Destination:=Sheets("Sheet2").Range("D" & Rows.Count).End(xlUp).Offset(1)
Cells(Target.Row, "E").Copy Destination:=Sheets("Sheet2").Range("E" & Rows.Count).End(xlUp).Offset(1)
End If
End Sub

View 9 Replies View Related

Opening A Dialog Box

Jun 17, 2005

ive created a spreedsheet for work calculating money etc from different tills. is there a way i can have a box appear when the spreadsheet is opened asking for particular information to be entered.

EXAMPLE: ....

View 9 Replies View Related

Dialog Woksheet

Feb 20, 2007

I have created a worksheet with Excel Dialog worksheet. I have Edit Boxes and have input data into them. Is it possible to add these data and put the result in another Edit Box,

View 9 Replies View Related

Act The OK Button On The Dialog Box

Aug 6, 2007

I've written a function macro that results in a dialog box popping up as in ....Application.Run "showsampdat"

What is the general Syntax for adding a macro line that will enact the OK Button on the Dialog box so that the user will never see the dialog box but the OK button functions?

View 9 Replies View Related

Dialog Boxes

Jan 13, 2010

I have created a dialog box for entering data into once that data has been entered i want the dialog box to store the data into a separate worksheet at A2 in then want the dialog box to clear and reappear ready for new data to be entered. This new data would then need to be entered at A3 etc etc etc. Is this possible and how would i go about doing this.

View 9 Replies View Related

No Macro But Dialog Still Appear

Jan 29, 2007

I am very sure that I have deleted all my macro in my excel spreadsheet and saved. However, when I tried to open the file, the macro dialog prompt me again..... I have press alt F11 and confirmed that there is no macro.

View 6 Replies View Related

VBA Calendar Control Without Control

Mar 12, 2003

Has anyone out their ever seen an Calendar type of control totally built in an Excel vba UserForm?

My problem that I’ve tried to resolve for some time is utilizing some type of pop-up calendar to eliminate format issues in my published Excel forms. I have tried a number of calendar controls but all have to be registered on the local machine and this cannot be guarantied for every machine.

If someone could direct me to a vba UserForm that has this built in that might do the trick. Or is their another way to deal with this?

View 9 Replies View Related

Unknown Popup (not A Dialog Box)

Dec 31, 2009

I'm modifying a template that originally shipped with Excel 2003 (I have not upgraded to 2007). In the template, there is a pop-up box (not a dialog box) that shows up when I'm on certain cells. I've attached an image of it. It's the yellow box containing the words "Company Information..." etc. I cannot find any way to remove it! It's not a comment, and selecting it doesn't allow you to edit it. What is it, and does anyone know how to remove it?

View 2 Replies View Related

Open Print Dialog Box

Feb 23, 2010

I would like a macro to print 2 sheets in a workbook. I can write the macro that will select the sheets I want, but I don't want it to just go and print because depending on if the user wants it printed in color, b&w, etc.

they have to choose a different color. What code do I use to open the print dialog box?

View 2 Replies View Related

Show Symbol Dialog

Jul 15, 2008

I want to show the insert symbol dialog through vba code. How?

View 12 Replies View Related

Dialog To Select A Directory

Oct 17, 2008

Is there a dialog box like the one used in GetOpenFilename that can be used to select a directory?

I'm trying to select a directory/folder which will change each month but the macro selects the files from inside the folder once it's specified. I don't need the name of the current path; the path name needs to be able to be selected.

View 2 Replies View Related

Save File Dialog Box

Jun 18, 2009

what command can i use to bring up the save as dialog box ( where to name your saved file) if my file is already named?

View 2 Replies View Related

Save Dialog Box Cancel

Jun 19, 2009

How can this be edited so when the savebox comes up when i hit save it saves the file but when i hit cancel it goes to error:

View 14 Replies View Related

Changing SaveAs Dialog Box

Oct 31, 2009

I'm hoping someone can stop me going crazy with what should be something very simple. To make things easier at the end of my code, all I'd like to do is bring up the SaveAs dialog box and have it default to a specific directory so that the user doesn't have to click through the mountain of various files and folders we have.

View 6 Replies View Related

Insert CR Into Word Art Dialog Box

Jan 19, 2010

I attached a file with macro7 that prompts the user for text that will get rotated and inserted into the top left corner. The text is in the form "batch xxxx." I need a carriage return between the word "batch" and the numeric string. I guess the input box should have two lines instead of one.

the code does some other stuff which is why it takes a while to execute ....

View 12 Replies View Related

Insert Symbol Dialog Box

Nov 20, 2006

Quick VBA question: does anyone know how to let VBA open the Insert symbol dialog box?

View 9 Replies View Related

Open File Dialog Box

May 3, 2008

I am looking for code that when cmdfile is click, it will open up the 'open file' dialog box, and go to a specified directory on the pc, and list ALL files in that folder, but not open it. I want the user to select the file manually.

I found the following code on the forums, but don't know if it is relavent in my case

Const myDir As String = "C:NAVIGATIONPERSONAL
ussNLN"

View 9 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved