I have a userform, when using the form it has focus, once I click on my "Ok" command button I want to return focus to the workbook while I leave the userform open. I already have the userform open and on top of the workbook.
View 2 RepliesI have a form that displays when i open a workbook. I enter data into the form's fields (listbox & textbox). When I click the form's "OK" button, the focus doesn't return to the current worksheet, and in fact, focus doesn't return to any of the open windows / applications I have open.
View 9 Replies View RelatedI'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.
Code:
Private Sub ComboBox1_Change()
ActiveCell = Me.ComboBox1.Value
End Sub
How do I get focus back to the sheet or cell instead of the ComboBox ?
I call a userform (modeless), and then i'm trying to set the focus back on the range that was selected when i showed the userform. you would think i could just define the range and then use rnge.select like this....
set prevrnge = selection
UF.show (vbmodeless)
prevrnge.select
but it doesn't take the focus off the userform....
I am needing to create a form that exports data (a quote) to an Excel Db (table) and is then able to recall the data back into the form. (the default form in excel does this and I want to copy that.)
Once the data is called back in, I can then export it to another Table to show that the quote has been approved and will be used.
I am having trouble with the VBA coding that copies the inputted quote in Cell C2 (the reference for the quote number) of the "Form" sheet and looks it up in the "Database" sheet. I have tried several variations of code, but nothing works so far.
-SS
Sub RecallQuote()
'
' RecallQuote Macro
'
Sheets("Form").Select
Range("C2").Select 'this is the cell that holds the quote number to look up from the table
[Code] ......
I'm working on a spreadhseet which has several macros that can take up to 5 minutes to run. When the macro(s) complete, I pop up a userform to provide instructions and collect some additional data from the user.
The "problem" is that when the user moves to another application to do other work, the user form remains hidden behind the active app. I've added some text to the status bar to let the users know the processing is done, but they would like something more obvious - so, is there any way I can force focus back to Excel?
I made a command button on the worksheet from the Tool box. This is not made on a form. When I click on the button I would like to get focus set to a certain cell and made active on the same page. Like cell H2 for example.
View 2 Replies View RelatedI 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 RelatedNeed the way of getting the name of the text box that currently has focus on a user form?
View 5 Replies View Relatedi would like to retain the focus of the current cell before the user clicks on a button to run a macro (see below) to open a userform...?
userform.show
(the cell focus seems to disapper...after the button is clicked, but does stay on the cell when i run the macro from tools macros...)
I have a TextBox and 2 Commandbuttons. I need the cursor to return to the TextBox when the Userform is loaded without the user selecting the TextBox.
View 3 Replies View RelatedI'm listing through sheets and have Sheet2 for drop-down lists.
Sheet2 is not visible, but when I click on Cmdbutton It appears so that I can change values in drop-downs. When I hide Sheet2 again, I want to be back on sheet before Sheet2.
My code for open and close sheet2 :
[Code].....
How can I do that ?
let's say I run a macro from a button on sheet 3, macro process on sheet 10. Is there a way that the macro would automatically go back to sheet 3? Like a "Back" button on IE. I can't code Sheets("sheet 3").Select because I want it to do the same thing on sheet 4,5,6...
View 3 Replies View RelatedI have a form in vba with two tabs. Both the tabs are different sizes.
The first tab is quite large and the 2nd tab is smaller.
When I click the 2nd tab it shrinks the form but then when I click back to the first form it makes it the same size and the 2nd tab and cutting out key info.
Is there anyway I can resize the 1st tab again to go back to its original size?
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 Relatedi am creating an add in that will allow me to display all pivot tables in a workbook, their name, sheet location and source data in al listbox (called LBPivot) on a form (called FrmPivot)
My problem is that i am not sure how to make sure it points the focus to the activeworkbook and not the actual add in workbook?
Overview: I have a workbook named MainPage.xls. This mainpage has several buttons and serves as a switchboard to launch other workbooks. Attached to this Main Page are two worksheets, "Source" and "Value1". The "Source" worksheet is graphical in nature and is used to collect data via a DDE channel to some production industrial processors and then on a timer "log" the data to cells in the "Value1" worksheet. Once the VB code is launched from the "Source" worksheet (via a start button), the code continues to run until it is stopped (via a stop button). The data is then graphed and printed out, etc.
This works very nicely and provides "live" graphing of some constantly changing data.
Once the "Source" worksheet data VB code is running, I need to be able to minimize the worksheets and return to my Main Page and further be able to open any one of the other workbooks on the Main Page and work with that page(s). Thus far, I can minimize the "Source" and "Value1" worksheets and return to the Main Page and the VB code runs along nicely in the background.
However... IF I attempt to open any other workbook from the Main Page, my data collection/graphing code stops and I get a Run-time error 9, subscript out of range... and Excel completely shuts down.
I know this must have something to do with the worksheet that runs the VB code losing focus when another workbook is opened.
I have an excel program that uses a modeless userform. often times i will open other spreadsheets while the form is active or minimized. if i return to the form and run it without manually bringing focus to the appropriate workbook, i get an error because it references the wrong workbook. is there a way to keep that form tied to that workbook no matter what? also, it is important that this procedure works despite the workbook name changing.
View 5 Replies View RelatedI have a workbook that prompts a user with a msgbox and then a SaveAs dialog. It works but when users intend to open the workbook from Internet Explorer, the SaveAs dialog stays behind the browser and everything freezes. Ideally I would want the workbook SaveAs to stay on top till user saves the workbook. Any help?. Here is my Open and Save code.
Private Sub Workbook_Open()
'Unhide Function for Macro protection
UnhideSheets
Dim initialname As String
Dim varAnswer As String
initialname = "DataGathering.xls"
When the workbook opens, sheet 1 is selected. There is an activex textbox on sheet 1 that should receive focus.
using "textbox1.setfocus" or textbox1.activate" does not accomplish what I need. I have also applied this the setfocus and activate to the worksheet open event but without success.
VB:
Private Sub workbook_open()
Worksheets("regular sku").Select
TextBox1.SetFocus
Worksheets("regular sku").ScrollArea = "I1:T36"
End Sub
I am trying to make one of my macros open a file then switch back to the orignal file and then running the macro.
here is my
I got a couple of userform and want to make sure all form are closed before opening the next one.
I'm trying to pass the active user form as a parameter to a subroutine that will ensure the form is close before opening the main menu, but I'm doing something wrong.
Code:
Private Sub CmdMainMenu_Click()
Call gotoMainMenu(FrmInventoryMain)
End Sub
Code:
Sub gotoMainMenu(acsheet As String)
Unload acsheet
Unload FrmMainMenu
FrmMainMenu.Show
End Sub
I have a form that loads and depending on the word selected in the drop down the following code loops through cells Q2:AC2 until it finds the word in one of those cells (the word will always be in one of the cells)
Code:
For Each c In Range("Q2:AC2").Cells
If c = period Then
c.Select
[Code]...
The active cell it finds will always change, i know I need something to code the active cell back but I don't know what it should be.
I recon, IF Excel is hidden than Windows doesnt see it with ALT Tabs as program and doesnt put it as program in the taskbar.
Is it possible to set a form active as a program? While hide Excel?
why the text box "txtjobnum" wont populate with the active cell in my "COMPLAINTS" sheet. The green code below is in the userform and the red text below that is in module 3.
Private Sub cancel_Click()
Unload Me
End Sub
[Code]....
I have a Excel database and a userform to look-up reocrds. I want to be able to connect a Data Sheet which is a PDF file to every product in the daatbase.
I have created an additional column and created hypelinks in front of each product. these hyperlinks are connected to the datasheet of that product which is saved on the drive.
I have created a field on the userform to display the respective hyperlink when a record is searched by user.
My problem is that the user form displays the hyperlink name, but its dead.
I want users to be able to click on the hyperlink to view the attached Datasheet. I have tried using Textbox and labels to display this hyperlink,
I am trying to add something to a spreadsheet. I want to do some Conditional Formatting but I am not certain on what the formula would be to accomplish it. I am putting the Cond Format in cell E5 and I need a formula to say: IF F5 AND G5 are BLANK then do the format I set up which is simply to fill the cell with RED. (.ColorIndex = 3)
The next portion of my problem is I need to revise my VBA Coding to check and make sure that there is not any cells in Column E that have the Formatting Active. This is the portion of code I need to alter. I have changed the wording of the message but am not sure on how to change the IF statement:
'Checks to see make sure there are no Actions or Resolutions WITHOUT a Topic
If Sheets("Meeting Minutes").Range("C1").Value = "" Then 'NEEDS TO CHANGE
MsgBox "Oops! You forgot to enter a Topic for Discussion in a cell(s). You MUST have a Topic in order for your Meeting Minutes to transfer to the Master sheet." & vbCr & vbCr & "Please click OK to return to the Minutes sheet so that you may fill in the Topic(s).", vbOKOnly, "CAUTION! PLEASE Note!"
Range("D5").Select
Application.ScreenUpdating = True
Application.StatusBar = ""
Exit Sub
End If
I've been using the following code to bring in individual cell values from one closed workbook to an active one. I would like to modify this is possible to bring in multiple cells at once and also pull them into a different worksheet in the active workbook. Basically, my command button is on Sheet1 but I'd like the data to pull into a cell on Sheet2.
Private Sub CommandButton1_Click()
With Range("Q9")
.Formula = "='C:Users[Workbook Name.xlsm]Worksheet Name'! N27"
.Value = .Value
End With
I have a macro that unprotects a worksheet copies data from that worksheet and pastes it into a newly created and saved workbook. However I have two problems
1) I'm attempting to copy the data from the first workbook by selecting all cells and then when switching to the new workbook, select all cells and the paste special (values) then paste special (formats). This works when recording the macro but when I attempt to run it it bombs out.
Cells.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
2) How do I get the macro to switch back to the workbook it got its data from. The name of the source workbook varies and there may be from 2 to 15 workbooks open. Is there a previous active workbook command? or do I need to create some kkind of temporary value to hold the file name of the source workbook.