I have a workbook developed in Excel 2007 (compatibility mode) that contains Userform4. This form can be displayed (or not) depending in the wishes of the user. What I am trying to do is return focus to the worksheet after the UserForm is displayed.
When the worksheet is activated, I have the following .........
I have a spread sheet where i want to display help text when cells are activated. I do not want to use comments as i both do not like the red triangle and also have not found a way to controll the position of the text box. When I use the event Worksheet_SelectionChange I can display a custom box but the box "retains focus" and i can not enter the data until i "reclick" on the cell in the sheet. The box then goes away when i select another cell. Is there a way to fix this or a different method entirely. I am using Excel 2007.
View 9 Replies View RelatedI 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 RelatedIn using Autofilter on a Date column in Excel 2007 compatibility mode (Vista) and in Excel 2000 (XP), I receive different selection criteria (see pictures attached). In Excel 2007, I can select by year, by month. In Excel 2000, I am presented with all dates available in the filtered column.
I realize I can do a custom filter in Excel 2000 with a range of dates to select only the month I wish to query but this is cumbersome for the user. Is there VBA code available that will allow the same or similar selection criteria in Excel 2000 as is available in Excel 2007?
I have made a couple of Macros in VBA for 2007 that resize re-font etc a graph, and another one that exports te graph as an image. I want to use these macros on a few other machines but they are running older versions of Excel and i get an error when i try and use the macros.
Would someone mind taking a look and showing me how to adapt them to work in excel 2000/2003
First macro:
Attribute VB_Name = "Module11"
Option Explicit
Sub ModifyChart()
Attribute ModifyChart.VB_ProcData.VB_Invoke_Func = "u
14"
ActiveChart.ChartArea.Width = 900
ActiveChart.ChartArea.Height = 600
ActiveChart.ChartArea.Interior.Color = RGB(233, 233, 233)
ActiveChart.PlotArea.Interior.Color = RGB(233, 233, 233)
If ActiveChart.HasLegend Then
ActiveChart.Legend.Font.Name = "Verdana"
ActiveChart.Legend.Font.Size = 16
End If..........................................
We are currently on Office 2000, but our IT group are considering a company wide switch to 2007. I've played around with it just briefly, but noticed that it is night and day difference in both look and feel.
We use Hyperion Essbase, and have a custome built planning tool that utilizes Excel 2000, enhaced with a few thousand lines of VBA coding. One of the main purposes of the VBA code, is to control the Excel menus and replace with custom built menus that are specific to our Planning System.
Does anyone have any idea if VBA controlled custom menus from Excel 2000 will even work in 2007? Will I have to do complete rewrite?
One last question, If you are running 2007, is there a transition function (simlar) to prior versions, where you make the menus look like the legacy version?
I would like to know if there's an easy way to transform an excel file from 2000 version to 2007 version or if I have to redo completely my file
View 9 Replies View RelatedI am working on a sheet that will copy a specified number of sheets, rename them, set a cell within the equal to a cell from another sheet and (the problem) set cells on my input sheet equal to cells in the newly copied and renamed sheets.
I want the cells in sheet "Data Input" to look something like "='newsheet'E26"
I can make it return the actual number in the cell and return the formula in the cell, but not make the cell in "Data Input" reference the cell in the new book.
Here is what I have:
Code:
Sub CopySheetsTest()
Dim i As Integer
Dim wks As Worksheet
[Code]....
I am running Excel 2007 on my Windows Vista laptop. A workbook I've developed in Excel 2007 (compatibility mode) on my Windows Vista laptop has a macro that runs as expected on my laptop but will not run on my desktop which is running Windows 2000, Excel 2000.
I've addressed this question previously under the thread "Macro Bombs Excel 2000". I've not received a response as to why it won't run under Windows 2000, Excel 2000. I don't know if it's an Operating System issue or an Excel 2000 issue.
I'm developing this workbook for my children for their personal financial management. I'd like to determine if this is an Excel 2000 issue or an Operating System issue. Most of my children run Windows XP, Office 2000. I have a dual system on my laptop (Vista and XP).
I have a legal software license available for Office 2000. My question is, can I load Excel 2000 on my Vista, Office 2007 laptop. I've looked at http://support.microsoft.com/kb/218861/ and they talk about installing oldest versions first. I have Excel 2007 already installed. I don't particularly want to uninstall it. Can I install Excel 2000 without uninstalling Excel 2007?
1. Can it be done?
2. Can it be done without MAJOR operational issues.
3. What is the process?
4. Can I load ONLY Excel 2000?
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 RelatedOn 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
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).....................
I'm creating a userform for editing membership records of a small organisation. So I want the focus to default to textbox tboxFind which is used for searching the data.
I've put tboxFind first in the tab order, and in subroutine Userform_Initialize, the last line is tboxFind.SetFocus
Using Excel2000 on Windows Vista, it works OK.
Opening the same workbook in Excel2000 on WinXP, no textbox has the focus when the form opens, but once the user has started to use the form, the focus defaults back to tboxFind, as it should.
So why is the focus not where it should be when the form opens in WinXP?
I am trying to implement a simple userform using the RefEdit control.
So I have the RefEdit control and an Ok (which has code attached to it) and a Cancel commandbutton.
For some reason, I can't get the focus on the RefEdit control (i.e. when I activate the form, I have to actually click in the RefEdit box before it gets the cursor). Which property sets the focus in this control?
Right now I have the Ok button Default property set to True.
I have a commandbutton on the spreadsheet that activates the userform.
I've got a userform for entering data in a workbook with sheets for each month. ie: Jan'06 , Feb'06, etc. I've added a combobox that looks at my list of these sheets and when a certain month is chosen I would like that months sheet to come up behind the userform, so that the data is entered there when the form is completed.
The other option is to not change the sheet focus but to direct the data to the appropriate sheet based on the combo box. (No matter what sheet is currently selected)
On a related note, I have a text box showing the last date entered and I would like to make shure that it is updated based on the sheet selected in the combobox.
I created UserForm with one TextBox and "Close" Button. And it's works like a real-time search with my criteria. He is using AutoFilter to show what he found. And when I'm pressing Close Button the Focus isn't on Application, but on Hidden window (know because when I'm clicking alt+space form's menu shows).
To show window I'm using (running from hot-key):
DoCmd.OpenForm "UserForm1"
to hide
Private Sub CloseButton_Click()
UserForm1.Hide
End Sub
I am trying to SetFocus on a single textbox in a simple form. I am not sure if I am doing it right.
Private Sub UserForm_Initialize()
' On Error Resume Next
' Dim rheadings, cl As Range
'
' Set rheadings = Worksheets("CONTACT").Range("A1:F1")
' For Each cl In rheadings
' Me.cbxSearchWhere.AddItem cl.Value
' Next cl
With Me
tbxSearchCrit.SetFocus
End With
End Sub
Kind regards, Mentor Auto Merged Post Until 24 Hrs Passes;Hi: I answered my own query - just commented out the setfocus instruction and it defaults to the first, and only, textbox by default
I have lot codes in which the first 2 digits represent the year.
9801585623643 would be 1998
01143143143 would be 2001
00103431431343 would be 2000 etc.
I am trying to find out how to create a formula to return the correct year in 4 digit format.
I have tried a few different things combining length, left and year functions but cannot get the appropriate result.
I am using a technique to display a modeless userform to display to the user that the cell data validation has failed (or not) after checking cell data entry (with checks coded as required).
I am using this method for a number of reasons -
- enables more flexibility and more characters over that of in cell data validation error messages
- to reduce repeat of validation data (to reduce file size) as worksheet has large qty of rows with large qty of columns with variation of validation requirements for each column.
But in the event that data is invalid (fails validation), once the modeless userform is displayed, i want the focus to be on the current cell, not the userform, otherwise the user will always have to click the worksheet to to get focus to enable entry to cell of corrected data.
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 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'm having some trouble setting up my Userform. It's used for someone to insert a password to open up some sheets. I have it working except for 2 problems.
First off it gets started by a sub which has a shortcut key, CTRL + W.
When it opens I would like the TextBox to be ready to be typed on... and I would like the submit button ready for Enter. So when it opens, you just type in the password really quick and press enter without using the mouse at all.
The TextBox starts on the first try, but when I press cancel and then open the UserForm up again, then the cancel command is still selected and I have to select on the textbox.
There is 3 things on this userform... TextBox1, CommandButton1, CommandButton2. All I want is for the TextBox always to show up ready for typing, and the Submit(CommandButton1) to always be ready to press enter.
A userform to move the curser to a column then activate the Excel App and keep the userform visiable.
The problem is when excution the code step by step (F8) works fine, but when excution the code by F5 the cursor moves to the Range("A65536").End(xlUp) and doesnot then move to the required column.
also this line
AppActivate ("Microsoft excel")
does not work , it gives me Invalid proceduers or call argument.
Private Sub ComboBox1_Change()
Range("A65536").End(xlUp).Activate
If ComboBox1.ListIndex = 0 Then Cells(ActiveCell.Row, "I").Activate
If ComboBox1.ListIndex = 1 Then Cells(ActiveCell.Row, "J").Activate
If ComboBox1.ListIndex = 2 Then Cells(ActiveCell.Row, "K").Activate
AppActivate ("Microsoft excel")
End Sub
As part of a UserForm I am Validating and Formatting in one pass. The problem I'm having is that when the Validation fails, I get the error message, and the focus moves on to the next text box.
I want to trap the user in a loop until they have acceptable data
I currently have a small userform placed at the bottom right of the screen (with a command button on it) and this opens up on top of excel instances and other applications/windows and it is set so that you can't interact with anything except the userform.
I wanted to minimize the userform and give focus to immediate next window (can be excel or non excel applications) for 10 seconds and then activate/show the userform back again, when the "Button 1" on the userform is clicked.
I tried hiding the userform, but this doesn't give focus to the immediate next window. Below is the code
Private Sub Button_Click()
Me.Hide
PauseApp (10)
Me.Show
End Sub
I could only find answers for adding minimize and maximize buttons to userform.
When the button is clicked, it should perform
Step a - Minimize the userform
Step b - Give focus to the next immediate window behind the userform
Step c - Wait for 10 seconds
Step d - Bring back the userform its to state.
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 RelatedI have twelve sheets in the book called "Jan", "Feb" to "Dec". Now I will use value in the two sheets by this format:
Row1 will contain columns, "jan", "feb", and etc.
Row2 should be like "=JAN!b2", "=FEB!b2", etc till "=Dec!b2".
Now the question is, how can I use reference, but not directly put in the sheetname such as "Jan!b2"?
In another word, what I want to use is like "=Worksheets(cells(...))!b2".
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 RelatedI recently launched a model that uses filtering on protected worksheets. The model was developed in Excel 2000, and everything works perfectly for the users who are also on 2000, but my Excel 2003 users get an error on opening the workbook.
The error asks for the password to unlock the sheet and is difficult to clear. Users have to hit Cancel 8 times to clear the error, at which point, the model appears to function perfectly. (There are 12 worksheets in the model, 2 with filters, all locked and password protected.)
The follwoing code is in the 'ThisWorkbook' module:
Private Sub Workbook_Open()
With Worksheets("Initiatives")
.Protect DrawingObjects:=True, contents:=True, userInterfaceOnly:=True
.EnableAutoFilter = True
.Protect contents:=True, userInterfaceOnly:=True
End With
Because the error occurs when first opening the model but not at other times, I'm thinking that there's something in the Workbook_Open procedure that is causing the error.
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?