I currently have an ActiveX scrollbar on a spreadsheet that's tied into a chart. Move the slider on the scrollbar, and the chart instantly updates.
I then put a scrollbar on a muli-page UserForm and the chart will only update after the form is closed. Is there a way I can get the chart to update instantly just like with the ActiveX control?
I am trying to get a scrollbar on a MultiPage UserForm to provide instant results on the active spreadsheet. The spreadsheet is full of charts, and as you move the scrollbar, the charts change. Trouble is, the code I have is VERY slow. Moving the scollbar turns the cursor into an hourglass and that little scrollbar graphic lags about a centimeter behind. Is there faster code out there?
Here is what I have:
NOTE I use both the change event and the Scroll event because using only one gives me only half the functionality of the scrollbar...that is, without both, either the arrows on the scrollbar work or only the slider works.
I've got a formbox that has scrollbars and when the userform starts up the vertical scrollbar is centred, meaning people can't see the top of my form. How do get the scrollbar to be at the top when my form loads?
View 2 Replies View Relatedthere is a sheet out there called E.I.M but this needs access to the d:/ drive of which i dont have. see link
HTML
http://programminglibrary.com/Programming%20Library/DOWNLOAD/downloads.aspx#DOWNLOAD1
I have a userform that simply filters data on a spreadsheet through checkboxes. The form is filtering columns (B through N) to shorten the list of possible outcomes (data in column A.) After the user is done with the form I'd like to populate the data in column A (the results from filtering and there is no way to pre-determine how many rows will have data) with the user pressing a button on the form, into something the user can see without going back to the spreadshet. I was thinking I could populate the results into some field on the form; maybe a list box, txt file, using the camera function in Excel?
View 2 Replies View RelatedWhen the user choose a customer from a combo box then i need to get some statistical results in the text boxes, such as last amount of credit-charge, last date, and amount that he has to pay us until now.
When user adds a new amount in the grey textbox then this has to be added in the previous amount.
I have the expected results of my example in my sample sheet.
I've put together a workbook that has 2 sheets that contain stock details and location info (i.e. part number, description, Location & stock level). I need to have a search function outside of the 'built-in' Ctrl+F (or Edit > Find) search function, i'd assume this would mean using VBA?I invisiage making a userform embedded within the very first sheet of the workbook and having this form be opened when accessing the worbook - maybe hide the other two sheets containing the data? Within the search userform, i would have a 'part number' & 'description' search input boxes for data input, either one could be blank but atleast ONE must be inputfor the search to work. On pressing the 'Search now' command button in the userform, any reults found would be displayed in a listbox at the bottom of the said userform. If no results found, a dialog box would pop-up saying 'No Items Matched"
View 7 Replies View RelatedIs it possible to combine the results from 1 Text Box and 2 Combo Boxes to return to 1 Cell?
For example, i am using this code to write username to Sheet 2
Sheet2.[c9].Value = txtFullName.Value
and this code to write account number to Sheet 2
Sheet2.[d8].Value = txtAccountNumber.Value
BUT - i would really like to take the Value from txtFullName and take the Vaule from txtAccountNumber and combine that into (1 cell only) with space separators please.
Example : (username & account number combined)
Slim 12345678
I am trying to populate a UserForm with data from a spreadsheet using a search function instead of just providing a Next and Previous search function (which works). The following code is able to search for and select the correct row on which the data resides.
Private Sub cmdBlankFind_Click()
Dim FindMe As Variant, FindCell As Range, FindCell2 As Variant, Data As Variant
With Range("BLANK")
FindMe = InputBox(Prompt:="Please enter search criteria:")
Set FindCell = .Cells.Find(What:=FindMe, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)
FindCell.EntireRow.Select
Data = FindCell.Value
tbxBlankAccount.Value = Data(1, 1)
End With
End Sub
My data resides in a workbook in sheet2 and sheet3. I have 4 comboboxs refering to different columns in sheet2 and sheet3. Basically when the user selects all the four comboboxs, the criteria should be satisfied and the results in terms of rows matching those values should be shown in the textboxs below.
Each three of the textboxs refers to individual columns in sheet2 and sheet3. All I want to do is simple search criteria on both sheet 2 and sheet3 and put the results in textboxs.
I have populated my comboboxs but dont know the macro to do the search results .
my userform,which has 4 comboboxs
combobox1 = sheet2 column C
combobox2 = sheet2 column BL
combobox3 = sheet3 column K
combobox1 = sheet3 column F
The results which satisfy the above 4 criteria should come from ,when user presses POP UP DETAILS BUTTON,
textbox1= sheet3 column C
textbox2= sheet3 column N
textbox3= sheet2 column T
Actually I have many records which satisfy the above 4 criteria, dont know how to display them whether in textbox or any another method.
I have a database of 13 columns and ever increasing rows.
I want the following to be there on my userform.
1 combobox: showing the list of categories from which to search.(The categories are the column headings in columns A1 to A13.The user will have to select one category.
1 textbox:Here the user will enter the search term.
1 Command Button: When the command button is clicked/entered, the code shall be such that it will search in the column corresponding to the category mentioned in the combobox and display the results( The entire 1 row x 13 cloumns containing the search term) in a Listbox. If the search term does not matches then a message box should appear with the message "No entries found"
[b]
1 Listbox:to display the search result as mentioned above.
I'm using a userform to report on set of worksheets. Two of the functions are:
- reporting on the number of contacts with a client
- displaying the details of all contacts with selected client in one textbox.
I can't work out how to concatenate the text of all the contacts relating to one client in a text box (txtContactHist) on the userform.
Using the countIf function I'm trapping zero matches.
The worksheet containing the contacts has the following data columns:
Col A - Customer ID
Col B - Detail of contact
Col C- Date of Contact
Columns B and C contain the data I want to capture
Column A (the customer ID) is the column that is searched for a match ( via the userform text box (txtLic.Value))
To work out the total number of contacts, I use this bit of ...
Any way to use a search form I've created to delete data from the original sheet. What I'm doing here is using advanced filter to copy data from the original database onto a temporary sheet to display in this list box. I've gotten almost everything to work properly, but since this is populated by advanced filter, I don't really even know where to start on my delete button.
Code:
Private Sub Search()
Dim Criteria As Range
Dim SearchRange As Range
Dim SearchResults As Range
Set Criteria = Range("Values!Criteria")
[Code] ......
So I was thinking something like this:
Code:
Private Sub cmdDelete_Click()
lstResults.Value.delete
End Sub
But I know this won't work.
I am creating a database using excel and I've created a userfrom for ease of data entry and searching the database. But now I am stuck at the searching part.
The sheet is Sheet1 and the userform is UserForm1. Based on the pic that i have attached, user needs to key in the keywords in any of the textboxes and comboboxes in the group box labelled "Organizational detail" and when he/she clicks on the Search button, the userform will display the whole rows where the search results reside onthe listbox. When the user click on the search results on the listbox, the textboxes and comboboxes will be updated with the data on the listbox.
I have a wordlist (65000 words in Column B*) in a worksheet “w1” and poems (about 21000 rows) in another worksheet “w2” where first verse is always in B and second one in C. The column D of w2 contains of information such poems name, author’s name, book’s name and so on.
I want to search for those verses through a macro which contain words from my wordlist B* w1 and add references to my words that way. It’s about making a dictionary in which each word has a reference to a poem and verses in which it is used.
Column A of w2 has number in it which shows how many times these rows have been already used as reference. Column A of w1 contains of a value “1” or “0” in which “1” means this entry has already been processed or already has a reference and “0” means it has yet to be done.
If my word B* from “w1” exists in verses B or C of “w2” the results should be shown in an userform containing 5 text boxes with 5 results. In each text box a result should be shown “(verse B; verse C); (value of Col.A)” and a checkbox (or a button). That would mean 5 result, 5 textboxes and 5 checkboxes (or 5 buttons). I would like then to choose one of the results by checking the checkbox (or pressing the button) in front of the text box. After I have chosen the result the whole row from w2 should be pasted in following columns of B*. That means the cells from w2 column B,C,D would be pasted to column C,D,E of w1.
The criteria for the search in B and C should be the lowest value in A of “w2”. I mean the w2 rows with lowest A value should be preferred if there are more results. The result showing user form with 5 text boxes and 5 checkboxes(or 5 buttons) which gives me the choice to choose one of the results should also contain a button “search for further results“. For the case none of the results is useful.
As far there are many poems (verses) I would like to prevent using the same verses many times. The more different verses I use as reference for the words in w1 the better it is. Therefore every time a result is picked by me “1” should be added to the value in Column A in w2. And every time search is started the lowest A values should be searched first.
As soon a word has successfully got it’s reference the value in A w1 should be changed from “0” to “1”. And by next search all words with A value “1” should be ignored and only “0” words should be searched for.
Each time a row from w2 is used as reference, the B* word w1 should be added to col. E of w2. If used for many ";" should be the seperator.
can u hide the xl vertical scrollbar or stop it working
View 4 Replies View RelatedI have a table with numeric information with only one column in the table having text information ( which is basically notes from a telephone conversation). My question is how can you add a scroll bar in a cell with text information. I do not want to resize the row height as it makes my table look untidy.
View 1 Replies View RelatedI have Userform with Combobox for listing all days of active worksheet. Worksheet is very long and I would like sheet to scroll left or right, according to what day I pick from Combobox. Days on worksheet are listed in range from E2:AI2.
How could I do that in VBA ?
I have a Combolist box that has 39 entries. The screen isn't big enough for the entire list to be shown when the box is clicked and it truncates the top of the list. How can I add a scrollbar to this?
View 2 Replies View RelatedOn a userform, is there a way in which to set a scrollbar's slider postion to the ListIndex value of the item chosen in a ComboBox?
In other words, if the total ListCount for this choice is is ten, and the item chosen in the Combobox is in the fourth position, can the scrollbar slider automatically be set to the fourth position rather than be all the way to the left or right? I would think that this would make it visually easier for the user to understand in which direction they can scroll the list. Here's what I've got so far:
I want a control to be updated when I scroll a scrollbar. The scrollbar is linked to "B25" and the control, tboYYWW2, is then updated via a HLookup of the "B25" value. By the code below I just get the control updated when the worksheet is activated and not when the "B25" value is updated by the scrollbar. How to make this work ? I also attach the workbook file I'm doing the tests in.
Private Sub Worksheet_Activate()
Dim varYYWW2 As String
Dim varWeekNr2 As Integer
varWeekNr2 = Range("B25")
varYYWW2 = WorksheetFunction.HLookup(varWeekNr2, Worksheets("EDUtest").Range("WeekNrWeek2"), 3)
tboYYWW2 = varYYWW2
End Sub
I have scrollbar control on excel sheet, I want to make maximum value of this control to be linked to a cell on the sheet. So, when the cell value changes, the scrollbar maximum changes automatically with this value.
View 3 Replies View RelatedI have a TextBox in a Worksheet with a ScrollBar defined and its working perfectly! The only problem is that everytime I click outside the TextBox, the ScrollBar goes to the lowest position and I only can see the bottom of the text in the TextBox...
Is there any way of keeping the ScrollBar on its position everytime I click outside the TextBox?
I have been using a scroll bar in my project to select a value from 0 - 3
Is it possible to have a customised slider (whether a form control or something created from scratch) whereby the numbers 0 1 2 3 are displayed in a grey, red, yellow and green box respectively adjacent to eachother and a slider can be moved over the top to select a value?
I've got a large spreadsheet with many cells that need user input. A bunch of calculations are performed on subsequent worksheets, but I want the user to only see the fields they need to enter. I'm trying to write some code that will use a scrollbar (form control, not activex) to only show one group of columns at a time. For example, if ScrollBar1.Value = 1, then show columns "A:D" and hide colums "E:Z". If ScrollBar1.Value = 2, show colums "E:H" but hide columns "A:D" and "I:Z", etc.
Here's the code I'm trying to get going, but I keep getting various errors when I try to execute.
Code:
Private Sub ScrollBar1_Change()
Dim v As Integer
v = ScrollBar1.Value
[Code].....
As it stands now, when I click the scrollbar I get the error: "Compile error. Method or data member not found," and the ".Value" in Line 3 is highlighted.
Let's say my horizontal scrollbar is 2/3 of the way to the right and I'm currently viewing columns EA thru EZ. If I turn on VBA macro recording, the Excel auto-generated VBA macro code that gets saved when I press Ctrl-Home is Range("xx").Select, where "xx" upper-left-most cell based on frozen panes [e.g. Range("T3").Select]. While recording the macro, when I press Ctrl-Home my Excel view horizontally scrolls all the way to the left such that cell T3 is selected such that I'm now viewing columns T thru AS (which is what I want). If I start with the horizontal scrollbar 2/3 of the way to the right again and I use Range("T3").Select in a VBA macro, cell T3 gets selected like before -- but Excel doesn't horizontally scroll all the way to the left to where I would be viewing columns T thru AS; it just stays with columns EA thru EZ in view. Is there some way to force the horizontal scrollbar all the way to the left with VBA code? I tried searching the FAQ and didn't find anything there. I'm using Excel 2007 on a Windows7 PC.
View 2 Replies View RelatedI am using excel2000 on WindowsXP. I have a 2D surface plot pointing to data that can be continuously updated using a scrollbar from the Forms toolbox. For some reason, when I place the plot over the continuously changing cells, the plot does partially update when I scroll, and then fully refreshes once I let go of the scrollbar handle. If I move the plot far from the changing cells, it doesn't refresh at all until I let go of the scrollbar, so I'm forced to use it to page, instead of smoothly scroll. How can I get the whole surface to refresh continuously? Seems some kind of magic "event" logic is at work here....
View 9 Replies View RelatedI have a scrollbar and a textbox for selecting a value. Everything works fine but it's irritating when someone types 100,000 into the textbox then decides to increment or decrement using the scrollbar. The position of the scrollbar doesn't change with the textbox so (supposing the previous value was 5000 and set using the scrollbar) instead of making adjustments to 100,000 it jumps to 5000 and makes adjustments there.
Private Sub BootstrapScrollBar_Change()
BootstrapTextbox.Value = Format(0, "0")
BootstrapTextbox.Value = BootstrapTextbox.Value + BootstrapScrollBar.Value * 100
End Sub
Private Sub BootstrapScrollBar_Scroll()
BootstrapScrollBar_Change
End Sub
I've tried doing something like making a sub for changes to the textbox with code like BootstrapScrollBar.Value = BootStrapTextbox.value but I keep getting the error "error 308, could not set value".
So is there a way to have the position of the scrollbar tied to the value in the text box?
I need to know when the SmallChange and LargChange have been trigered, scrollbars don´t support this events
View 2 Replies View RelatedI have just encountered a very peculiar problem when using Scrollbar_Change Event for Controls Scrollbar (in a worksheet). I have tree scrollbars and assigned Event code for each one: ScrollBar1_Change, ScrollBar2_Change and ScrollBar3_Change.
Events works perfectly when I click on the arrows to adjust the scrollbar. What is strage however, event is not executed when I adjust the scrollbar itself (pulling the bar with a mouse) if I try it first time after adjusting another scrollbar. In such situation Scrollbar is adjusted on the screen, even linked cell is changed, but the Change Event is not executed. But when the same scrollbar is adjusted second time Change event is executed. To sum up: Scrollbar_Change event is not executed when adjusting the scrollbar with the mouse the first time after "switching" from one scrollbar to another, but is works perfectly in any other situation. It has nothing to do with the code istelf. I get this effect when I create a new workbookm add 3 scrollbars and a code like:
Private Sub ScrollBar1_Change()
MsgBox "ScrollBar1 changed!"
End Sub
Private Sub ScrollBar2_Change()
MsgBox "ScrollBar2 changed!"
End Sub
Private Sub ScrollBar3_Change()
MsgBox "ScrollBar3 changed!"
End Sub
What may be the cause of this selective "disobedience"? Note also, that I get this error on Excel 2000 (not tested it on Excel XP or 2003).