I've found a great userform on this site that allows you to populate a datasheet as well as delete or amend datasheets. It was by dodger7 within Database. Very useful. I've adapted this to my needs and it works great apart from i cant amend the userform that shows data when you select delete or amend. I've had a go but don't understand how i can create my own feilds and set it up in order. When i go in to the code i can veiw the delete and create/amend userforms but this is a search function relating to a reference number. Once you select Find it brings up another form and that is the one which i need to adapt to show my new feilds. I have attached the sheet so you can see my problem. I was wondering if anyone can advise as i love this userform/database method but can't complete the changes to my needs.
I am working on a label printing set-up for my work. So far I have completed the userform that formulas will be entered on and printed from. I had an idea of being able to save these formulas for recall later. I included “Save” and “Recall” buttons on the userform. My plan is to have my co-workers click on the “save” button and be able to enter an additional piece of data and have everything saved to another worksheet labeled “database”. If you look at the said sheet you will see a column for “customer”, “color” and then the colorants. Due to the wide variety of colorants and quantities available, I set it up so that I have the colorant and under that Oz and 48ths. I am trying to figure out a code that will populate that across the row.
Then I want to be able to push “recall”, find my customer and then color in a combobox and have that populate my label.
At this time I am stuck. Part of my problem is I don’t quite know the terminology to google.
Attached is the file I am working with. The only sheets that need concern anyone are "main" and "database". The others are from the original file and I will be deleting those once I am done.
I have a userform that stores data (1 row record with 20 columns) to a worksheet.Is there a way to grab the data back in (other or the same)userform, ambent(correct) data and store them back in the same row in the worksheet?
example of a database user form that will allow me to list records in a sheet as well as search for records in a sheet. I know excel has a built in feature for this but it is menu driven and I need something that is button driven and will allow me to resize the form layout. I was not able to figure out how to do that with the built in form.
I've been trying to resolve an issue with the userform that i created. It adds new records to the sheet "Data" but i can't seem to add a search/edit function to it.
It could be either a combobox with the existing Project Id's or a text box + a control button, so a user could enter Project Id and hit a button.
The spreadsheet example is attached : Project Entry Form.xls
I have a userform with several textboxes and listview. I have a ticket number with multiple trasaction, when saving the first transaction to temp table(sheet). It was terminated (unload) which it should be back to textbox2 (ticketnumber for additional transaction.
I am very new to Excel/VBA. I have created a "Customer Complaint System" in excel and have designed a user form for users to enter new complaints.
My next step is to design a Search or Look up form for viewing the complaints where users can choose to look up complaints by either Complaint No or Customer or Month.
The worksheet that stored my data is called "ComplaintData" which is hidden. In the sheet "COmplaintData" I have following 10 Columns:
Column A - Complaint No Column B - Date Column C - Customer Column D - Contact Person Column E - Product Column F - Batch Column G - Category (This relates to Complaint Category) Column H - Description Column I - Account Manager Column J - Month (This just takes value from B and converts to month, so hopefully I can sort by month if required..)
I did see a few examples of look up forms but am struggling to customise them to suit me.
Ideally I need a combobox & textbox in serach field. So user can choose the "Search by" category using combobox e.g. Complaint No, Customer or Month and then enter the relevent text in the textbox to carryout the search.
and then use labels & listbox to display the related fields on the form. The reason I prefer labels is that I do not want users to edit the info. and listbox to show multiple results out of which user can choose specific one....e.g. when user does a search by Customer, I want listbox to show the various products that customer has logged complaints for.
I need to create a simple edit VBA script to allow user to search and edit existing excel row records. I had created the add record button with reference to some of the site in the web.
I am having difficulty getting a script to work that manages duplicates being added to a worksheet from a userform. Each record is assigned a unique ID when it is added to the worksheet initially. The problem that I am having is that the user wants to add non-unique information to the worksheet in unique records periodically. I can do that, but I am looking to make the application more user-friendly by reducing the number of msgboxes he has to respond to in order to do this. I have some code below which works, but it needs to be smarter.
Private Sub UpdateContact() Dim strAnswer As String 'Copy values from Customer Form controls to Data array tbxWrkTel.Text = Format(tbxWrkTel, "000 000 0000") tbxMobile.Text = Format(tbxMobile, "000 000 0000") tbxHomeTel.Text = Format(tbxHomeTel, "000 000 0000") If Not WorksheetFunction.CountIf(Sheet1.Columns(1), tbxCompany) > 0 Or _ Not WorksheetFunction.CountIf(Sheet1.Columns(2), tbxContact) > 0 Then 'To avoid duplicate data If tbxCompany = "" Then tbxCompany = "-".........................
Is it possible to autonumber records created with data entered with a user form? If it is possible - I would also like to know how I could display the current record number on the data entry form....
I have a worksheet with a header row.the data is from B2:B25.I have to accomplish two things.
i)I want to get only 8 records (viz record nos-5,6,11,12,17,18,23,24)from the entire worksheet.serial numbers are shown only for illustration purpose.i want to eliminate all other records from the worksheet.then i will get the records from seriel numbers 1-8 as shown in E2:E9.
(2)I want the content of row3 to come up in C2 and then row3 should be deleted. now the content of row4 should come up to C3 and then row4 should be deleted.it should continue.the result will be 4 records as shown in G2:H5
I have to complete information providing dates and names for a long number of individuals. Is it possible to set up the spreadsheet so that if you enter a date next a persons details in on worksheet their information is automatically updated in the relevant ones?
I need to do sorting and filtering the similar records to new worksheet. I need you help to do this job, give some idea or command to use for the following steps.
I have attached the worksheet newtran.xls.
1. I need to find the last column, the column will be increased or decreases. so that we need to find the last column at time of running the macro. Now the value is there till column DD
2. I need to concatenate the column B, D, F to last column find out at 1 step. Insert a new column and place the concatenated value.
3. Entire row will be Sorted based on concatenated value column.
4. Find the similar row on concatenated column and entire row need to be moved to new worksheet.
I have a product Database with 11 columns. I am trying to build a Search/look-up userform.
I found a brialliant example of the same posted by Roy, UK. I have copied the same and its working well, but with a few little problems.
Here's what I've got:
I have a userform with a Combobox (called Combobox2) where it shows all the products from column B in the worksheet "ProductData". In the worksheet "ProductData" , I have 11 Columns with headings from B1:L1.
When user selects a product from the dropdown list (from Combobox2), all the details related to that product from other columns are displayed on the userform via labels.
This part is working fine....except that the values in Combobox2 are taken from activesheet and I want them to come from worksheet "ProductData". I have hidden the sheet "ProductData".
Second Part is, I have about 20 products in the Database and all of them have a Product Specification Sheet in PDF format. I am just wondering, if there is any way I can have a button on the userform that can used to open this PDF datasheet for the product thats being lookeed up by user.
What I mean is, if user selects productA from the combobox2, then it displays all the info about the the ProductA on the labels on the usewrform. and if user clicks on the "View Data Sheet" button then it opens the Datasheet PDF file for ProductA.
Below is my code for the first part:
Option Explicit
Private Sub ComboBox2_Change() Dim ws As Worksheet Set ws = Worksheets("ProductData") Dim Ncell As Range With Range("B2", Range("b65536").End(xlUp)) Set Ncell = .Find(ComboBox2.Value, LookIn:=xlValues)
It is so nice to check-in once in a while to see all these new ideas and solutions of people's problems. So, I would like to ask a question that really bothered me for some time, and it looks like I cannot find a full answer to it. So here it goes:
How can I import data which is either more than 65000 records long or it will sum up to be more than 65000 when imported? I need all my data to be on one worksheet, and I don't care if these data will be imported let's say in columns A B C, then once it reaches the 65K, it will be imported to the neighbouring columns D E F, etc.?
I searched the Ozgrid for an answer and I found a thread
See attached for explanation of what I need. I basically need a user form to appear asking for an specific time and services provided and transfer this data into another sheet. In sheet 1 there will be several time codes in pink for each service provided.
I want it to populate a combobox in a userform. Should it go in the code segment for the userform, in a module, or some other place? The following is code I originally found (by Leith Ross of this board) to find the last row in column "A", and load the combo box "ComboBox1"
Userform1 is a basic search and find using the text the user enters in a text box, followed by 'ok' commandbutton.
If a matching cell is found in the worksheet, the row is selected and the second userform asks for text via textbox2. This text will be placed in the end column of that row (column L) that was found to have the text input in Userform 1.
What's important is that if on that row some text already exists in column L, that this appears in textbox2 allowing the user to modify it.
I am searching a database for a particular date and want the data corresponding to that date to be populated into a userform. So in short I want the data to be displayed in the userform. I am looking for ideas on how to do this efficiently. I currently do it with a list box, but it is only able to display one column of information. I hope this is clear.
When I put order number into "txtOrder" it finds that order and populates the labels in userform. But the problem is, it populates only first row with that order number. How to show all other rows with the same order number in userform labels?
For example : i want to find all rows with that order number and populate them into labels like that:
I am trying to populate (via VBA) a textbox/combo box from one user form to another user form.
The first user form has a room number in a text box1. If certain conditions exists, a button is selected to bring up another user form (both forms are modeless).
I want to pass/populate some of the 1st user Form info into the other user form.
I have tried the on initialize textbox1.value = textbox other.value but no dice. I can populate a user form text box from a spreadsheet but from box to box in separate user forms has me a little stumped.
I have a userform that pops up upon opening a file. The user form has 5 text boxes names Zero, Two, Four, Seven and Nine. I would like each of these text boxes to automatically populate with the values last used. The values last used are stored in Worksheet "Index Settings" in Cells "C3:C7".
I would like to populate the captions of checkboxes in a userform with the items listed in a drop down menu located in cell A1. Lets just say I don't know exactly how many items in the dropdown there will be, but I do have an estimate number. Maybe between 20 and 25.
What I am trying to achieve is to get the UserForm to populate from information in the Database. In column AD I have a formula which produces a number when an item becomes due. I would then like label1 (lblReg1) to populate data from the same row in column A and label2 (lblDate1) from column S.
I then have a CheckBox (chk1) next to each pair of labels for the user to confirm the task has been actioned and when the CommandButton is clicked I would like the result placed in column AE in the corresponding row.
I have tried utilising code from another userform I have but I cant get it to work and I believe this is to do with the 'ActiveCell' reference as there is no Activecell (you can probably guess I am new to this). Example:
Sub UserForm_Initialize() If Sheets("Database").Range("AD3:AD5000").Text = 1 Then lblReg1.Caption = ActiveCell.Offset(0, -29).Text lblDate1.Caption = ActiveCell.Offset(0, -11).Text Me.chk1.Visible = True End If End Sub
(All the Labels are blank and will be filled hopefully by code, all the CheckBoxes are set to Visable = False at Initialize stage, I will be using Me.Height = ?? to expand the form to visible check boxes)
I have attached a small selection of my workbook where I have set up the userform and named the labels.
Can anyone amend the code to achieve the desired result or alternatively put me straight on the correct way to do this.
