I have a userform that has a control button that opens another userform that contains a listbox with a range of data. I want to click on an item and press a control button to add it to a textbox on my first userform. I do this via:
I have a column where i have to put document numbers, Column A, i want to avoid accidently capturing something twice, so the only thing thats unique is the document number. Can i get an error if i try to enter the same number twice?
I have a list of buses numbered something like this 320-360, 700-750, 800-899, 900-990. (but not always consecutive ie... 325 may be deleted). each day I want to enter them into a worksheet call "Shed" ( cells B3:E46) which is how they are parked ie.. bus 320 in B3, 321, in B4, .... bus 700 in E3, 701 in E5 etc....
I only want to be able to enter the bus number once so it won't be allocated in the shed more than once. (the code below provides this, but it also allows entries between the lowest and highest numbers which is not suitable.) The numbers are listed in column M to R
The numbers will also change after time, numbers will be added to and numbers will be removed. I hope I haven't waffled on too much. but that is basicly what I was wanting to do.
I have written a vba code which does some calculation on the data on sheet 1 and then puts this data on sheet3 and after the calculation is done it puts the result on a few comboboxes on sheet2. Now the issue is while this whole calculation is performed by excel, I can see the movement in between the sheets. I want to avoid seeing this movement ?
Is it because of multiple Sheet.Select statements inside the vba code ?
i have 15 textboxes in my userform (all with tags).
instead of having 15 seperate sub routines that call on one macro is there a way i can write some code that, on entering any texbox within a form, a specific routine would be called
i tried using the Userform_click sub like so, but with no joy:
Can someone help me to get the code to copy an existing workbook, with all the forms and code that exist with it, to a new workbook with the data from the cells, and name the file with a new name?
So I haven't seen this error before. It says "Automation error: the object invoked has disconnected from its clients." I think I know what's causing it but am not sure how to go about solving the problem. Barring any inefficiences that the code below contains, can someone please tell me what code I should used to fix this error?
I am looking for some code that dynamically (during processing) changes the height of a userform. What I am trying to do is this: I have ten worksheets but only five are being used. I am looking to have a userform with a checkbox for each of the active sheets labeled. I don't want to have to display a form that is basically ten checkboxes with five enabled and five disabled. I want to show only the five active sheets checkboxes with a userform only large enough for the five. If six are active then a userform displaying six checkboxes and a userform large enough for only the six to be displayed.
There are many Software and Add-in and Macro or Code to Delete or Eliminate the Duplicate Data. But, I want to Delete The Duplicate BLANKS Row.I means to Say that Delete Every Repeated Blank row Note : I Want to Use Formula or Function
I would like to: 1 - Highlight the row for the first duplicate/single "Ana M." 2 - Then skip the next duplicate/single row "Jane S." 3 - Then Highlight the row for next duplicate/single "Sam" 4 - .... and so on.
Sample Data: NameStreetPhone Ana M.12 A St333-3333 Ana M.23 Z St333-3333 Jane S.12 A St555-5555 Jane S.15 Z St555-5555 Sam A.55 A St222-2222 Tony J.45 A St444-4444 Tony J.11 B St444-4444 Tony J.66 Z St444-4444
i need to identify the first and last duplicat entrys and delete all rows in between. eg keep row 275 and 277 and delete row 276 all duplicates only in column C ..
I have trouble in deleting the duplicate rows. I have a code to find the duplicate values
Public Sub Unique_Proj() 'This is the first step which takes out the unique projects from the base data 'Call Work_Assignment 'this selects the unique projects in the sheet Application. ScreenUpdating = False Dim A, E, B(), n As Long Sheets("Projects").Select With ActiveSheet A = . Range("g2", .Range("g" & Rows.Count).End(xlUp)).Value Redim B(1 To UBound(A, 1), 1 To 1) With CreateObject("Scripting.Dictionary") .CompareMode = vbTextCompare For Each E In A If Not IsEmpty(E) And Not .exists(E) Then n = n + 1: B(n, 1) = E: .Add E, Nothing End If Next End With Sheets("Unique Projects").Select Range("G3:G" & Rows.Count).ClearContents Range("G3").Resize(n).Value = B
End With Application.ScreenUpdating = True End Sub
However, this gives me a list of values in that perticular column only.
What I want is either delete the complete row which is duplicate OR select the entire range of values which are unique (based on the column searched) and paste it in a new sheet. The second option is more better for me.
I need to identify repeated code with different text value. The codes in B column appears repeatedly in the list. However some codes have different text value (one time appears with public and another time appears with priv). I would like to identify those codes as 1 if they appear with different text value within the list. I highlighted one code 131775 for reference.
In a big data sometimes I have identical rows (maybe the 'Quantity' column has different value). I would like to merge them into one and add the quantities together. I have to use B and C (I need both) to find out if these rows are identical.
For example: A1=date B1=111222 C1=ABCD ... and G1=quantity (1) A2=date B2=111222 C2=ABC ... and G2=quantity (1) A3=date B3=111222 C3=ABCD ... and G3=quantity (2)[code]......
I have a worksheet populated with data. I have sorted the data and have dupulicate values in column B,C,D up to H. I have put in a formula to give me a 1 value in column A where there are duplicates. Is there a way to write a VBA code that will Delete all the rows that have a 1 in column A.
I am using the following code to copy a unique list, but it gives a duplicate in the first 2 rows(col Q). There is no headings in the columns.
Code: Sub CopyUnique() Dim lastrow As Long lastrow = ActiveSheet.Cells(Rows.Count, "P").End(xlUp).row ActiveSheet.Range("P11:P" & lastrow).AdvancedFilter Action:=xlFilterCopy, _ CopyToRange:=ActiveSheet.Range("Q11"), Unique:=True End Sub
I have a VBA Macro that loops through about 100,000 rows in an Excel file and removes rows that have a duplicate cell value. The macro takes about an hour and a half to run. Are there any ways to make the Macro run faster? Any ways in general to make VBA macros run faster?
My Excel program (Excel 2010) currently has several columns and each column looks for and pulls data from a specific file on my computer. Then I need to delete any duplicate data entries, count the number of unique entries and track the changes through a chart. I have everything done except I cannot figure out (or find on the internet) a way to search in multiple columns (more than 2) and delete just the duplicate cells. I want to delete the cells in a way where there is one left. For example if the code 12gf is duplicated three time, I want to be left with one 12gf (it doesnt matter what column the original one is left in). Additionally, column length changes and they are not sorted. I have attempted to attach an image of an example file below.
Month, Loan(left), Interest Februari, =above-Instalment, =X%*Loan(left)/12 (rent is divided per year),
Instalment, Total payment Constant, =rent+Instalment
and so on... as long as you want ^^ (it's quite messy, but try :D)
The question is as follows "What would a loan of 900'000kr with 9% interest rate totally cost over 30 years?"
[use "IF" to avoid getting anything written after the loan expires]
The question itself can be easily solved by just dragging the formulas down to 30 years and fill in the % and loan etc. But what I do not understand is the "IF" question. I'm supposed to use the IF function to instantly show the cost of the loan (total rent payment) after the 30 years? That's how I understood it. In that case... how do I do that? ^^
I know how to avoid getting the #N/A in a vlookup, but I have found situations where I have data matches and still get #N/A. For instance, I am looking up an item number (which contains numbers and letters) on one tab to find corresponding info on another tab. I've verified that the item number is indeed in the lookup range but I still get the #N/A. If I copy and paste the item number over the same item number in the lookup range then it works. However, I don't want to do this for each item number.
"A" is a duplicated rep field and "B" is unique rep IDs and "C" is a sum of product types purchased. I'm averaging the number of product types sold by each rep.
I need to modify it to remove the #DIV/0! error it generates. It calculates just fine by row (with the error on some rows), but when I use that calculated field as an element in another formula, the #DIV/0! blows up the second formula. I tried a second IF function tied to the sales field "D" but I don't think I nested it right.
I have a set of data containing "N/A" in some cells, and when I try to plot the chart using stacked lines chart type, the chart is completely off. if the "N/A" are causing this problem and how to fix this.
Transferring Multiple Data from separate worksheet without duplicating"
As you can see i am looking for information in column d (Letter) and getting the result to show from column B (number) using the formula in Column G (result 1).
The problem i am having is that if i try to copy or drag the formula down into Result 2 i just get the same answer.
Is there any way for the next cell down to ignore the previous result?
I've attached an example of what I am trying to achieve and an explanation as well. I'm trying to avoid the use of a macro as I don't understand them and I will need to modify the sheet later on which could cause problems. However, if a macro is the only solution, then I will have to make due with one.
I would like to avoid user to SAVE or SAVE AS file. In my macro I used code to disable SAVE and SAVE AS from FILE menu. But how to avoid to save file if user use CTRL+S command to save file?
I have a formulas in Sheet1 linked to other sheets, but I have only formula and there are no sheets ( eg: in sheet 1 A1 =Data!A1) where as there is no sheet called Data. I have a macro to import this sheets from a different file.
The problem I am facing is, after importing the sheets, the formula still shows #REF but if I do double click the cell or press F2 and then "Enter" the value appears. I have about 1200 formulas in this sheets.