The userform takes the data to a worksheet, then i run a pivot table on the worksheet to provide an easy to view summary of entries....
I'd like the user to be able to amend a record if they see an error ... so from the userform how do i do that ? I've read a bit about refedit ( completely ) and a bit about Find...
I have created a userform and a command button to bring up the user form but when I click on the command button and the user form pops up I am not able to enter any data, the entire page freezes
This is the code
Private Sub CommandButtoncancel_Click()
unloadme
End Sub
Private Sub CommandButtonOK_Click()
With Workbooks("RETS results version 2.xlsm")
[Code] ......
I have a multipage on a userform and wanted to change the back color. I can change this color fin for buttons and the userform itself, but I don't see the option in the properties for a multipage. And I didn't see it as an available command from vba. Am I missing something here?
View 9 Replies View RelatedI'm not sure how too set this up, here is a example of what I would like too do. This would make adding data too my list easy, I use Vlookup on my main form and it works great, had a lot of help on that from this site. I might be asking too much for this, if so tell me too go away.
View 14 Replies View RelatedI've created a userform that will pop up automatically when opening my workbook. My workbook will have many worksheets identified by the employee's last name, then first name (i.e. Doe, John) Etc. I ideally would like the name entry in my user form to locate the correct worksheet based on the sheet name and then all of the other data in the user form be put in the next available/appropriate row and column, etc. of that particular sheet. This user form would save me a ton of time keeping my training logs up to date, instead of having to locate each employee tab manually and then enter the data and then look for the next tab, etc.
At the end of the year I'll manually go to each worksheet and balance that year's training time and cost (as you'll see from the attached example), but I'm hoping that the user form entry will identify that "yearly balance row" as having data and would skip to the next row to begin the next year's training entry. The "Enter Data" Button would place all of the user form data (other than the name) into the appropriate row/column and I believe my refresh button will empty the user form fields, but I'm hoping it won't delete the data that was just previously entered into the worksheet. (See attachment)
see in atteched file User-form "frmEntry" work fine to update the data in Trader worksheet. but i need help to program.for the "frmExit" which i program. u can look in to the database "Trader Worksheet" .it enter the data in next available row.instead of up dating the corresponding existing stock ticker.to sell the stock.also when i enter the second sell of stock it change the row which is already their.not in new row.
View 4 Replies View RelatedI have managed to put together a userform to input the data from a safety audit card to populate a spreadsheet so that i can generate stats etc (every ticked check box inputed a tick onto the spread sheet into the correct colum for the data, on resetting the form it went to the next line as per the userform database example available here). This was working fine as it only had 5 check boxes and although my code was probably a bit rough, it did the job. The code I was using is:...
View 9 Replies View RelatedI have the following code in a userform, assigned to a command button.
Private Sub CommandButton1_Click()
Select Case TextBox2.Text
Case Is = ""
MsgBox "Please enter the Name of recipient."
Case Else
End Select
Select Case TextBox3.Text
Case Is = ""
MsgBox "Please enter the E-Mail Address of recipient."
Case Else
I modified this code as it was starting at the bottom of the worksheet & checking for the 1st vacant row from the top. I wanted it to start at the top & look for the first vacant row down. That way, if there was a entry that was deleted, it would find that row 1st & keep the list in order. This code worked fine for the last 2 days, but, this morning, nothing is being entered on sheet2.range A2 or lower.
I have a userform with two pop up calendars (calendar1 and calendar2). Calendar1 is the "start date" and must be a Monday. I have this portion working fine. If they select a date other than a Monday an alert message will pop up notifying the user a Monday must be selected. I need to limit the user to a date selection in calendar2 to be a minimum of three years out from Calendar1. I would like an alert message to pop up in Calendar2 should the user select a date inside of my three year minimum. Am I even in the ballpark with the following:
If Trim(Calendar2.Value) < (Calendar1.Value + "not sure here") Then
Calendar2.SetFocus
MsgBox "Select End Date 3 Years Out From Start date", vbExclamation
I just need to make a user form for entering data in one of the sheets ( Pending Confirmed Orders ), requested user form should be used to enter the orders information in columns ( each column in new entry ) and just the rows ( from 6 - 21 ) with noting that row no 16 is to link external pdf file as you will see.
File : [URL] ........
I have created a userform with a texbox and a "continue" button. In my macro I first ask the user to input name, date, etc then I have a line that says "frmDiscrepancies.Show". This code shows the userform but I am unable to type anything into the textbox. How do I activate the textbox so that I can type in it? Of course the next step is to be able to click on the command button "continue" and have it continue with the macro...
View 9 Replies View RelatedI am trying to get my User Form to work whereby I choose a pre-determined date entry. I have tried some coding but cannot get it to work. What code I need to add in VBA for this to work? I have tried to alter the time entry from my previous post that was solved but are doing something wrong.
View 11 Replies View RelatedI have a requirements to do a simple monitoring data entry. Composed of 1 admin and 10 users. These 10 users are assign to a different lines basically every lines have assigned user.
These 10 user will do a data entry. once they are done on the data entry the Admin will update those entered by the users based on ticket number and the users can browse those updated records.
Every users per line have assign ticketnumber that start in "L1"&YY&MM "-"001" this compsed of lines + year+month and numbers.
For the users side. Right now i have already created a workbook with userform to perform data entry by user (samplefor line1 and line2 user).
It has also a viewing form to view by the users if its already updated by the admin. i put also an events if the admin work book is open by other user they cannot access the workbook.
For admin side. I created also a userform for updating the records entered by the users to update records admin will enter ticket number to textbox.
This is the reference to find and search those records that belong to a particular ticket number and lines which will be updated by the admin.
Right now, I am doing records consolidation for both user and admin records. I have a button for both admin and userlines to perform consolidation. Once the user entered the records admin will capture those records and copy to the workbook used by admin to perform update. Then once the admin perform update the user will capture those updated by admin and copy to the workbook under the user.
Basically they have separate workbook for their entry and database.
Right now I encounter some issues which I think this will affect the integrity if records. Sample like once i perform consolidation it create duplicates records.
I have a userform
1. On my userform I've got 9 txt fields, 18 opt boxes and 3 buttons (please see attached form)
My problem is: If I intput a principal name, spouse name and child/ dependants I seem to work just fine.
However, if I input just a principal name and child/dependant instead of just placing one child/adult dependant on the sheet it places 2.
As a matter of fact, if no spouse is selected and child/dependant is entered then the last dependant is always repeated.
I have used the following code:
Private Sub CmdAdd_Click()
LR = Cells(Rows.Count, "A").End(xlUp).Row + 1
Range("A" & LR) = txtPrin
Range("I" & LR) = txtTotal
Range("A" & LR + 1) = txtSpouse
If opt1.Value = True Then
[Code] ......
I have a list of account entries on sheet1 that go from 1/1/2014 to 2/05/2014. I want a userform that prompts for a cutoff date, where I will enter 1/31/2014, and it will then clear all entries AFTER the date that I enter into the userform.
I will be doing this on a monthly basis, and the number of rows will change each month.
Is this possible to do using VBA?
I am trying to find out whether you can restrict the rest of the userform from being available, unless a certain field is entered.
I have a tax invoice userform, I want to restrict the user from entering any other data unless they have selected a customer.
There are other fields such as Customer Address, Customer Number, Disc% and Terms that populate through vlookup code once the customer is selected, so still need that to work once the customer is selected. I just don't want them to be able to enter any other data on the userform without the customer being selected.
I wasn't sure whether I needed to enter code into every other textbox or combo box that if cboCustomer = "" then pop up an error message, but that would require a lot of code to be entered. I have 30 comboboxes and 53 Textboxes that I want to restrict to not being available unless a customer is selected from combobox.
I have a userform, UserForm1, which lives in a spreadsheet called 'Data Entry.xls' There is nothing else on the spreadsheet itself, it's just for the use of a userform.
I would like the user to populate textboxs in UserForm1 but have that update cells in a separate spreadsheet 'Training.xls' in the same directory.
I have this code at the moment to find the next empty row and to input data into it, which is working perfectly to enter data to sheet1 in Data Entry.xls:
[CODE]Private Sub CommandButton1_Click()
eRow = Sheet1.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
Cells(eRow, 1) = TextBox1.Text
Cells(eRow, 2) = TextBox2.Text
Cells(eRow, 3) = TextBox6.Text
End Sub[CODE]
How can i modify it so it would do the same thing, i.e find the next empty row and then populate with what the user types in the textbox but in Sheet1 of 'Training.xls'
Would 'Training.xls' need to be open?
I have 4 columns, If column B (Ref No) is filled in, the adjacent columns, C,D and E become mandatory and an input box pops up on screen one after the other for entry into each column.
My problem is that I require a drop down list and not a input box for the final column (status). So i have created a userform with a combobox dropdown. I am having problems connecting the combobox selection to the final column, and for the selected combobox item to go into the right cell like the input box entry currently does.
Attachment 53209test743.xls
I have attached a sheet and also you can see the code below.
Code in Sheet
VB:
Public SaveVal1
Public SaveVal2
Public SaveVal3
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
[Code] .....
I am looking to modify my combobox from a userform to Filter the list based on the first entry on what the user will add.
I have a code that will search for all entries in my "Control" sheet and passed this on to my combobox:
[Code] ......
I have, within a module, the following function code that the user find the entry by adding the first 3 letters of the search they need:
[Code] .....
I would like to know what to change in the function to filter the list, once the user adds a first letter and then press the dropdown from the combobox, to filter the list based on all entries from the first letter to only show entries with that letter.
If A is entered, then, show only the entries strating with the starting letter A, but at the same time if the user adds more letter to filter to the first then second letter:
If AB is inserted, then, show entries with AB only.
Where do I add this code also, is this another function or this could be inserted within my function?
I have created a userform with 3 text boxes. It also has three buttons - clear, Cancel and Generate record button.
User form takes entries in the three text boxes and on clicking the Generate Record button, the values of the three Text Boxes are inserted in Column A, B and C of sheet1. The columns keep on populating with new data on each submit in the row below the last record.
Now it is required to enter data only if the value entered in TextBox1 is new and has not been entered previously in column A. If textbox entry is already aviailable in column A, a message box of 'Record available' shoud be prompted and the text entry must not be allowed until the data entered in TextBox1 is not unique.
I have a userform with several textboxes and 2 comboboxes. The data that I need protected from duplication is based in the comboboxes. If I ignore the other fields and presume the following it may be easier to understand:
The comboboxes are populated by the data stored in sheet1 and when the userform is complete, the OK button populates all the data into sheet2
Combobox1 contains names eg, John, Julie, Bob etc
Combobox2 contains colours eg, Red, Blue, Green etc
I want the userform to allow the data to be entered into sheet2 only if it is not an exact duplicate of the choices in BOTH of the comboboxes
For Example
John Red
Julie Red
Bob Blue
John Blue
These are all ok, however, to try and enter John Red again would bring up a message box indicating a duplicate entry and prevent the data from being entered.
I have a percentage in R3.
If I make an entry in D13 then I want the R3 to be duplicated into C27 otherwise C27 should be 0.
I have a spreadsheet on sheet 1 with a list of customers and their information. So on column A I have the customer number (i.e. k968, e37, p528,...), on column B i have the customer's name, on column C the street's name, on Column D the house number, on column E the zip code and finally the city on column F.
Right now there are around 600 customers in this list.
I have made a userform with a combobox in which I want to select an existing customer (pulled from the spreadsheet). On the same userform I have textboxes (customer number, name, street, number, zip, city). When I select a customer in the combobox, I want this customer's info to show up in the textboxes. I want to be able to change the info and hit Next to store the changes in the spreadsheet. When I do not select a customer from the combobox, I want to add new info in the textboxes and hit Next to store this info as a new customer. The userform also has a delete button. Then I select a customer in the combobox, this customer (and it's info) should be deleted from the spreadsheet when i hit Delete. So the spreadsheet is variable in length.
I am having a sheet where I keep track of when online surveys have been sent to users. The users enail address (column K) may be on the list for several times, but I need to make sure that there is at least a 7 days pause between sending the first mail and the second, depending on the visit date (column G).If there are less than 7 days between two entries with the same email address, the user is not qualified for taking another survey.
I was thinking to write an IF formula which returns either 1 or 0 and then let conditional formatting highlight and HIDE the row via a VBA loop.
Is there a formula that will allow me to look for the existence of any number value in a row of one worksheet and then return a specific number value in a cell on another worksheet? For example, if the formula finds any number value it will always return the number 15 to a cell on another worksheet.
View 3 Replies View RelatedI used a form with textboxes for data input for one of my vb macros. Currently I have the private sub from the form transfer those entries to a remote cell on the spreadsheet, (like in column "HZ"), so that the macro that will actually utilize them can retrieve them. Is there a way to pass that data directly from what is entered in the form in the textboxes to the macro that will actually use them?
View 4 Replies View RelatedI am attempting to pick up a date with time entry on a worksheet and place it into a TextBox on a UserForm. Format on the sheet is mm/dd/yyyy h:mm AM/PM. The UserForm is placing the value as mm/dd/yyyy 12:00 AM. here is the
Private Sub UserForm_Initialize()
If Not Range("dDate").Value = "" Then
TextBox2.Value = Range("dDate").Value
TextBox2.Text = Format(DateValue(TextBox2.Text), "mm/dd/yy h:mm AM/PM")
Else
TextBox2.Value = ""
TextBox2.SetFocus
End If
End Sub
"dDate" is the named range where the date is sitting. The format is also set on the TextBox2 exit event. Can anyone see why only the date portion is being transfered with the default 12:00 AM for no time component of the value?
I am looking to create a macro that will create a new sheet when data is added on a summary sheet. Example.
1. Summary sheet called "Variations" contains columns that will contain the information needed for new sheet (Columns A to D)
2. When data is entered on "Variations" sheet: Column B, then macro automatically creates new sheet renamed to e.g. VO1 (Number used on "Variations" tab) and is a copy of "Master" tab.
3. Data entered in Column A to D on "Variations" tab is automatically entered onto new sheet created (e.g VO1). Shown is blue on attached file. Additional data is updated on "VO1" sheet and this then links back to "Variations" tab
say sheet 1 has 2 collums A & B
collum A is Names Collum B is Dates
A B
Bob Fenton 05/04/08
Rob Smith 05/06/08
Al Feth 05/08/08
Al Feth 05/18/08
Al Thomas 04/23/08
Rob Smith 05/23/08
Bob Smith 04/22/08
Bob Fenton 05/15/08
Al Feth 05/10/08
sheet 2 has unlimited collums in collum A is the name of the person in collum B to Z (or more) i would like a fomula that will search sheet 1 and return the dates for each entry of that name.
so sheet 2 would be like ....
I have a forecast spreadsheet with 10 data tabs and a summary tab.
On the summary tab, cell R131 contains the year end profit figure.
What I would like to do, is whenever this value changes and I am in a different tab, a small pop up appears in the current tab telling me what the R131 value has changed by. eg "Profit up £1000"
At the moment I keep having to go back to the summary tab to see the effects of changes across the whole spreadsheet.