Mouse Focus Changes After Script Runs
Dec 10, 2008
I have an annoying issue that occurs after running a reasonably long script involving a number of spreadsheets. The script all runs fine and leaves 4 output spreadsheets open for final manual formatting. However the mouse focus is changed by the script (somehow?) and no matter what I do the mouse wants to multi select cells. Clicking in a single cell always selects at least 3 or 4 cells and sometimes the whole column.
The only place in the code where I set any rules realted to selection is to set a file dialog to allow multi selection of files. That is
View 5 Replies
ADVERTISEMENT
Apr 2, 2009
I have the following code which copies specified cells from one sheet to the next available row on another sheet. I would like to keep the next available row somewhere near center focus on the display. Can I use the variable 1Row to do this, or maybe 1Row plus or minus 20 depending on how I want it displayed on the screen?
View 2 Replies
View Related
Jan 6, 2004
I am writing some VBA, and this is what is going on:
I display a form which asks the user to insert the desired number of invoices. After inserting the number, I would like a the cursor to appear in a textbox labeled "Invoice Date" (ref A28). Additionally, I would like the user to only have to key in the day and month. Therefore, I would like to have the cell be defaulted to / /2004.
View 9 Replies
View Related
Nov 2, 2007
I am using the following code to validate text entry in Textbox1 of a userform. I want that if the user enters a numeric value than a msgbox should popup and then cursor should get focus on Textbox1. But with this code, it is setting focus on textbox2 and not on textbox1.
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If IsNumeric(TextBox1.Text) Then MsgBox "Please enter TEXT value only.", vbInformation + vbOKOnly
TextBox1.SetFocus
End Sub
View 9 Replies
View Related
Apr 25, 2006
I have an application in excel in which a “combobox1” has been created on the main sheet of excel. Somewhere during the code execution the program requires input from the “combobox1”. What is the code required to highlight the “combobox1” allow the user to select from the box and then return control back to the regular code?
View 4 Replies
View Related
Jun 2, 2006
I've got a worksheet with a cell called "cellName" and a button "cmdSearch". When I enter a string in cellName and press cmdSearch a query is done on a database and the result is returned to the form. Now, when I enter text into cellName I then have to click on a different cell before I can click on cmdSearch. What I'd like to do is have cmdSearch take focus if I press enter in cellName. I know how to do this with a UserForm, but I like having all of this on the worksheet and not dealling with a popup box.
View 4 Replies
View Related
Jun 17, 2008
is there any way to know if a COMBObox has the focus?
* * *
I have a ComboBox and when I press ENTER inside this comboBox a run a Macro
Private Sub CbFormularios_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
some times I am inside the ComboBox and one of the Item whithin this combobos is Selected, but stead of pressing the enter keyboard I press a commadButton but to run the macro attached to this command button I have to know if the cursor of my mouse is whithin the ComboBox "Over the comboBox". kind of:
If ActiveSheet.Cbox1.Value Is Not highlited Then call Macro1
View 4 Replies
View Related
Dec 9, 2008
I have an active form that is always in focus. I would like to be able to seamlessly transition back to the worksheets under it, and move back and forth between the worksheet entry and form entry. Is there some way to alter the focus between events to do so (like a mouse over type event)? Currently, I can only exit the form to get back to the worksheet. excel 03 sp3
View 2 Replies
View Related
Jan 8, 2009
I am running software that calls an Excel macro using DDE. The macro populates a sheet with information to be printed, then prints the sheet.
I would like for this to take place in the background with Excel never taking focus from the software that calls the Excel macro. Currently Excel some times takes focus from the software and some times does not. The macro also takes the information it prints and stores it to another sheet, but I don't think that's the culprit stealing focus from the other software.
View 7 Replies
View Related
Jan 12, 2009
The following code gives me a 'Method' Range of Object'_Worksheet' failed error. I'm using Excel 2003.
View 7 Replies
View Related
May 2, 2009
I have 3 workbooks in XLStart. I want to change the workbook that gets the focus after they are all open. The workbook i want to have focus is DG_Tourny.xls
View 2 Replies
View Related
Jun 24, 2009
I've made a non-modal 'Toolbox' form that floats over my worksheets. When a button is clicked a graphic item is copied from a hidden sheet and pasted into the current sheet. The graphic remains selected but the toolbox form takes the focus away from the sheet. When the user wants to move the graphic there is no problem in mouse-dragging but I'd like the user to be able to nudge the graphic using the keyboard arrow keys without having to click to give the sheet the focus. So, I guess the question is: How can I give focus to the worksheet following the Paste action?
View 3 Replies
View Related
Jul 7, 2009
I have a userform that is called by clicking on a button and it copies the value in cell A to my userform. This works great it is called via:
View 5 Replies
View Related
Jul 21, 2009
I have a userform with several inputs which are validated, and should the input be invalid an ErrorProcedure is run. This basically displays a message telling the user what is wrong, and it should also be highlighting the text in the relevant field, but for some reason it is not doing that.
View 6 Replies
View Related
Sep 28, 2009
I had to reset my excel on friday now today I'm getting an error when opening up an workbook. The error is " Cant move focus to the control because it is invisible ,Not enabled or type that does not accept focus. I have this code in a workbook when the workbook opens
View 2 Replies
View Related
Apr 10, 2012
How to change focus back to Excel from other applications, how simply to report what application currently has keyboard focus - there is no need to change it?
View 2 Replies
View Related
Jan 18, 2014
How do I isolate "FOCUS" in the following string
FORD FOCUS TOYOTA CORROLA
View 9 Replies
View Related
Mar 18, 2014
I have a macro that launches another program (Windows Title - Storm). I then use sendkeys to have it export the file to an excel file. (This launches another instance of excel.) I want to be able to focus back to (Storm) so I can sendkeys to close the program down. I can get it to the end result using sendkeys, but I am trying to have it switch back to the Storm application so the user does not need to close it manually.
View 2 Replies
View Related
May 10, 2007
I've got a Macro that generates three reports for me, one at a time.
After a report has been generated it creates an Email and attachs the report to the Email, I then check the report is ok before sending out.
The problem is, that once the first Email has been generated Excel is pushed into the background and the macro sloooooooows down.
I believe (though I will quite happily be wrong) this is because Excel is no longer the PC's main concern.
What I was wondering was, is it possible to bring Excel back to the foreground once the Email has been generated.
View 9 Replies
View Related
Nov 7, 2008
I have a userform with several fields located in it. For the most part, it looks like a user information form, Name, Date,, stuff like that. There is a field that the user enters some information, and using the afterUpdate function for the field, it searches to see if the value is unique. The problem is that when I tab from that field, if the value is not unique, I want the cursor placed back in that field (textbox). SetFocus doesn't seem to do what I want, unless I am using it incorrectly.
View 9 Replies
View Related
Oct 16, 2006
On the summary page click on 'Enter Sale' and notice that Customer Advisor' text box gets the focus and the cursor is flashing. (Which is what I want). Enter any name and a sale value (say 'A' and '1') and click the 'OK' button
But when I tried to enter another sale the OK button still had the focus. So in the VBA Project / Forms / frm_sale / OK Click event - near the bottom
I added a set focus before the 'frm_sale.hide' - This removed the focus from the 'OK' box - but the cursor is still not in the text box, and it needs to be clicked in order to enter text. This is clearly something trivial I am missing - but the blinkers are on and I cant spot it
View 5 Replies
View Related
Jan 20, 2007
is it possible to always have the entire combox highlghted?
View 3 Replies
View Related
Feb 14, 2007
I have SS that I have 3 levels of users using/viewing data and at the moment it does not allow for errors when inputing password & sheet number to access. What I need is that if there is an error in password or sheetnumber ths user gets the choice to re-enter correct data with vbYesNo or similar. The problem I have is with these lines of code not getting the focus back to txtSheet to re-enter correct data (>0 & <13).
Private Sub CommandButton1_Click()
Dim shtNo As Integer
Dim R 'Response to msgbox
Dim rS As String
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Please enter a number 1-12." ' Define message.
Style = vbYesNo ' Define buttons.
Title = "Choose Month" ' Define title.
rS = Range("Scode").Value 'Staff password
Application. ScreenUpdating = False
If Not (txtSheet.Value > 0 And txtSheet.Value < 13) Then
Response = MsgBox(Msg, Style, Title).....................
View 6 Replies
View Related
Apr 12, 2007
I am using MS Word to create a list to go into Excel, it seems advantageous to do it this way because I'm using the Heading Outline Numbering feature of Word.
Presently my macro assumes the word document is closed. How do I modify the macro to:
1. check if the file is open?
2. if already open, switch the focus to word?
3. switch the focus back to excel?
Sub GetDataFromWordDoc()
Dim FileToOpen As String
FileToOpen = ThisWorkbook.Path & "5Whys.doc"
Sheets("Data1").Select
' MsgBox "Active sheet is " & ActiveSheet. Name ' My check
ActiveSheet.Range("WordClear").Select ' Existing data to remove
Selection.Clear
Set appWD = CreateObject("Word.Application")
' here I would like to check if the word file is open
appWD.Documents.Open Filename:=FileToOpen '
appWD.Visible = True
appWD.Selection.WholeStory
appWD.Selection.Copy
Range("WTarget").Select ' Single cell range to start paste
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
False
'Range("D3").Select
'ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Sheets("5_Why_O").Select
' At this point word in the fore, excel in the back,
End Sub
View 3 Replies
View Related
Aug 21, 2007
I am using excel VBA userform and have the following elements:
1) .textboxA
2) .textboxB
3) .commandbutton_insertdate
(clicking on this button will insert today's date into either textboxA or textbox B. I use an accelerator 'D' so user can use Alt+D to insert the date conveniently.)
My question is: How can I determine which text box (A or B) is in focus when i execute Alt+D?
My objectives are: When focus is on textboxA, and user Alt+D, today's date will be inserted into textboxA When focus is on textboxB, and user Alt+D, today's date will be inserted into textboxB
My problem is: It seems that when I use Alt+D, the focus will jump to the command button instead, so none of the text box are in focus!
View 6 Replies
View Related
Dec 31, 2013
I wrote this VBA for a particular sheet:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("H5") = "Y" Then
Columns("L").EntireColumn.Hidden = True
Else
Columns("L").EntireColumn.Hidden = False
End If
End Sub
If the value of H5 is "Y" it hides column "L". It was working fine at one time. Then I wrote a bunch of UDF's at the workbook module level. I then went back it use the "hide" function and it didn't work.
I created a couple new worksheets in the same workbook, and the same VBA works fine on them. I created a copy of the "non-working" worksheet and added the VBA to the copied sheet and it fails to work.
If I create an error in the VBA (like: Column("L").EntireColumn.Hidden = True), I get an error when I change the (non-working) worksheet - so I know it is "trying to run", at least sort of.
View 6 Replies
View Related
Jun 9, 2009
I have written a number of UDFs, which work fine in my spreadsheet. Two of these are more complex, and I'm having a few problems...
When I run any VBA routine (i.e. control passed to VB), these two UDFs return #VALUE! errors, but I can't see why. As these are Functions, I can't think of a way to test where the error is being generated, like I would in a Sub
When I return to Excel, any recalculation fixes the problem, which makes me think something is declared incorrectly. All named cell references relate to other VBA functions, calling the relevant row / column numbers, and I think these are all correct. I've tried removing AS INTEGER etc, to avoid type mismatches, and adding APPLICATION in front of worksheetfunction...
Function precedentStart(Target As Range) As Integer
Application.Volatile
With ThisWorkbook.Sheets("sheet1")
Dim splitPrecedent As Variant, lookupI As Integer, rowI As Integer
precedentStart = .Cells(Target.Row, colOrigStart).Value
splitPrecedent = Split(Target.Text, ",")
For i = LBound(splitPrecedent) To UBound(splitPrecedent)
rowI = WorksheetFunction.Match(splitPrecedent(i), .Range("schedRefs"), 0)
lookupI = .Cells(rowI, colAdjEnd).Value
If lookupI > precedentStart Then precedentStart = lookupI
Next i
End With
End Function
View 9 Replies
View Related
Nov 28, 2009
I can't seem to find an answer for this, but as an alternative, on Worksheet Activate the code runs and places a 1 in Range("A1") and therefore the next time the macro will not run.
This works fine for me, but just thinking if somebody who doesn't know why the one is in A1 and deletes it this macro will run again on sheet activate.
Private Sub Worksheet_Activate()
Dim LR As Long
Dim rng As Range
If Sheets("Charts").Range("A1").Value = 1 Then Exit Sub
LR = Sheets("POD").Cells(Rows.Count, "B").End(xlUp).Row
With Sheets("Charts")
.Range("I129").FormulaR1C1 = "=ROWS(R1C1:R[-128]C[-8])"
Set rng = .Range("A129").Resize(, 10)
rng.Copy rng.Resize(LR - 4)...............
View 9 Replies
View Related
Mar 30, 2014
I am creating an Add Contact form. There is a checkbox for Individual (if left unticked then contact is a business entity - not an individual).
If Individual = True and If the txtNameFirst control has no value in it Then after the end user tabs away from the txtNameLastRegistered, the form should SetFocus on the txtNameFirst textbox (entry for this field is mandatory only if the contact is an individual - otherwise this field is made invisible)
But it is not working. I tick chkIndividual, I enter a name in txtNameLastRegistered, I tab away, code is called from txtNameLastRegistered_AfterUpdate (which includes the SetFocus code) but the form appears without focus in any of the controls!
My code below:
[Code] ......
View 8 Replies
View Related
Apr 1, 2014
I am aware that what I am hoping to do may well be impossible because it is possibly application-dependent.
Anyway, I wanted a piece of code that would allow me to open a default browser window from an Excel Macro.
Google turned up the following solution from here [URL] .....
[Code] .....
This seems to work just fine.
What I want to do now, however, is something like this:
[Code] ....
Is it even possible to write the two hypothetical functions described above?
In addition, I notice that they example given in the link that I posted also suggests ActiveWorkbook.FollowHyperlink. This seems to work just as well, without needing the ShellExecute prototype. Is there any way that I can get a "handle" for the window that was opened with FollowHyperlink and re-focus on that window?
View 7 Replies
View Related
