I've created a single worksheet that is essentially a "dashboard" type of report that displays data for a single employee/person. This worksheet (let's assume it's my "template") contains formulae that is driven by a single lookup cell (in this case, the employee's ID, in cell, for example, A1).
This "dashboard" report (for just one individual) needs to be duplicated for the entire employee population (let's say ~100 people); this employee population is stored as a list in a separate worksheet, in a single column.
Is there a vba solution that will copy my template and populate the cell A1 (of each duplicated template worksheet) with the the employee IDs - of course, it would be ideal if the solution can search in my employee ID list and continue down until there are no more IDs and create the same number of worksheets as there are IDs?
Because the macro is creating numerous worksheets, is it possible to name the worksheets based off of an adjacent value (in the same sheet as the IDs) to each respective ID (I'm thinking of a concatenation of the employees' IDs and names)?
One major wrinkle in this process: the above process would be ideal if the "template" worksheet won't change (i.e. no changes to formatting, no additional data elements, etc.) However, it's likely that the client will want to add/remove/change items/elements to the "template" dashboard. Assuming, at this point, all 100 worksheets for each individual/employee have been created, it would be a huge pain to manually add/remove elements from each sheet. Is there another macro that would delete ALL employee sheets? That way, I can re-modify my single template and just run the original macro to re-create my duplicate sheets (but populated with different IDs) again.
i have two fields with dates - one field A1 for date authorised (for a data request) and one field B1 for date actioned (data request)
i need a formula to populate in C1 the following:
if A1 is blank then C1 is 'not actioned' if B1 is blank then C1 is 'not complete' if both contain dates then C1 to calculate the number of working days between the dates eg. A1 10.08.09, B1 11.08.09...C1 = 1 working day
Is there a way to make a cell populate certain text based on conditions of other cells without putting the formula in the cell you want to populate. So that someone could type other text into the cell if the conditions were not met?
I have a spreadsheet with 6 hidden columns (B to G). Rows 1 to 14 are frozen and have data that comes from another work book and these rows will be protected. The user will enter data from H14 to U14 and then H15 to U15 for the next row and so on down the sheet. The number of rows of data over a week is variable, a minimum of 21 rows (3 per day) but no maximum.
When the user starts entering new data in the column range H to U I would like to automatically populate the 6 hidden cells on that row with information from particular cells in protected rows 1 to 14. For example B14 would populate with the value from I4, C14 would populate with the value from I5, D14 from I6, E14 from I7 and so on whenever someone enters a value anywhere from H14 through to U14.
I can understand that a worksheet change event would be useful to do this but I guess then it wouldn't want to run every time each cell is populated so I think if it had to activate on a single cell change then the cell in column L would be best. Also, as I understand it, there can be only one block of code per sheet that operates on a worksheet change event, have I got that right? If that is the case then I assume all the code to populate the hidden cells on each row will need to be in this block of code.
I am currently trying to create a spreadsheet whereby if I enter certain text in a cell in Column A on worksheet 1 that correlates with text in a cell in Column A on Worksheet 2, then the description in Column B in Worksheet 2 is entered into Column B on worksheet 1.
For example, if worksheet 2 has the following:
Column A Column B XXXX PRODUCT 1 YYYY PRODUCT 2
and I enter XXXX in column A on worksheet 1, I want Column B on worksheet 1 to automatically enter PRODUCT 1.
I have used the following =IF(ISBLANK(Q6),"",(NOW())) & =IF(ISBLANK(Q6),"",(Today())), but when the excel file is closed and opened the date changes to now or today. How can I make the date stay and not change?
I have a worksheet that has 3 duplicate values in a particular column, I need a macros that will highlight two of the duplicates row and then another macro to delete the entire row. The duplicate element are in column R. find attached worksheet.
I have a spreadsheet with 3300 rows. In column A there is a list of company names and in column H there is a corresponding Sales Rep name.Column A has many duplicate company names. I would like to run a macro that will find the a company name and then delete all the rest of the rows that contain that same company name.
I am using the following macro to insert the word "Duplicate" in the first blank column next to a duplicate row. My data is sorted by the first column. Data Example:
12345 a 12345 a DUPLICATE 11111 b 23123 b
Here is the macro I am using and it does not work. It marks the first duplicate it finds then goes into an infinite loop. Any Idea where I went wrong?
Sub MarkDupes() x = ActiveCell.Row y = x + 1 Do While Cells(x, 1).Value <> "" Do While Cells(y, 1).Value <> "" If (Cells(x, 1).Value = Cells(y, 1).Value) Then Cells(y, 3).Formula = "Duplicate" Else y = y + 1 End If Loop x = x + 1 y = x + 1 Loop End Sub
It uses DDE to talk to a program called MetaTrader and this places 'Live' price quotes in that cell.
Problem 1.User selects currency pair in Cell C4 2.I need code to place a formula in Cell F4 constructed as follows:
=MT4|BID!cell c4m
I have been trying to get this work for weeks now but with no joy Whatever i try to do - it only places the above as TEXT in that cell, even if i open a new sheet and cells are set to General format, however - when i type the above code in a cell - i have no problems and start getting price data straight away.
I am trying to populate a field in a Sheet 1 that is dependent on two other drop down fields that are chosen. Some of my data has the same names but different equipment.
Name Equipment Serial Model
Jim Jones snips 123 1AB
[Code] ....
Basically, I want to choose a name from say a drop down, then an equipment pc from drop down, and have the other field populate for say the Serial Number.
i am working on a spreadsheet that includes a large amount of statistical numbers / records. one part includes a win / loss column and the very next column i am entering the final score for each game. to max this easier to comprehend, there are only 3 columns. 1st column lists my opponent, the 2nd lists, with just a red L for loss, or a green W for win, and the 3rd column has the final score. (my score is always first, regardless of whether i won or lost the game.)
OPP F SCORE -------------------------------------------------- John W 23-10 Paul L 17-25 Terri W 10-7
This is what i'm searching for: (and the easiest way possible b/c i'm not familiar with macros / visual basic, etc.) ... Once i enter the score: ##-##, I would like the "F" (final outcome) cell to automatically populate either a bold red L for a loss, or a bold green W for a win. My scores are almost never 3 digits, so they would almost always be ##-##. if u need me to provide more info,
I am trying to use vlookup to populate a cell. My lookup cell is a string of text. My refernce table contains a list of words that I want populated if it is contained in the text cell. THe results I am getting is #name
I have 4 columns in my spreadsheet. I am trying to find any duplicates that may exist in Col A, sum values in Col D, then delete the entire row. So far my sheet before I run my vba code is this.
Col A 100 101 102 105 100 101 102 105
Col D 5 4 2 4 1 2 3 1
After my code is run, I need for my spreadsheet to look like this
Col A 100 101 102 105
Col D 6 6 5 5
I have some code but I still need to do a considerable amount of tweaking to it. Currently my code is only deleting the duplicate values in Col A. I am having difficulty summing the values in Col D as well as deleting the entire row.
Here is my code thus far....
------- Public Sub FindDuplicates() For RwCnt = 1 To (Worksheets(1).Cells(65536, 1).End(xlUp).Row) SrchValue = Worksheets(1).Cells(RwCnt, 1).Value If Len(Trim(SrchValue)) > 0 Then With Worksheets(1).Range("a1:a" & Cells(65536, 1).End(xlUp).Row)
I have 4 columns in my spreadsheet. I am trying to find any duplicates that may exist in Col A, sum values in Col D, then delete the entire row. So far my sheet before I run my vba code is this.
Col A 100 101 102 105 100 101 102 105
Col D 5 4 2 4 1 2 3 1
After my code is run, I need for my spreadsheet to look like this Col A 100.........................
I have a VBA form and on form initialize I want to populate a combo box… My array to populate it with could be a massive list so I need to set my array before it populates
I have this code so far but I need my array to be from A5 to the last row in sheet 1
I know how to set an exact range but not one that changes.
VB: Dim myArray As Variant myArray = With Me.ComboBox1 .List = myArray End With
Here is a sample of the data I need to populate in the combobox.
I need to be able to populate a cell with text from 3 possible cells, two will have the text "none" in them, the other text cell is the one i need to populate in another cell.
I have a macro that copies data from 6 different worksheets into one summary worksheet - based on certain criteria - I need a way to note on each row of the summary sheet which worksheet it was copied from. Each worksheet is specific to a salesperson, so ideally I would like that salespersons last name to populate in column B on the summary page for each row of theirs that is copied over....here is my current macro I use to copy the data: (this code is repeated for each sales persons sheet - "Blankenship", "Dew", etc...) I have attached a scaled down version of my file.
I want to populate a row with text "OFF" if a cell in column A is blank, I need the text to be from column F to Column S, I have a bit of code that finds the blank cell in column A and populates the cell in column F, modifying it to extent to column S.
I have a spreadsheet where vehicle milage is entered at the end of each month. On another sheet I have the vehicle fleet numbers and the the months along the top. What I need to happen is; when the mileage cell is updated I need the cell in the other sheet to be automatically populated, when the mileage is updated the next month I need the next cell(February)to be populated with the new milage and so on. The aim is to calculate monthly milage for each vehicle without having to enter the date at the beginning and end of the month.
Everyone I work with is completely computer illiterate and only knows how to enter the data the same way they always have(just the once at the end of the month) changing it up will only cause issues.
And it works as I need it to returning the value that appears the most from L31 to L6621. My problem is the number of rows will continue to change. So I tried something like this
Sub ARBM() Dim lr With ActiveSheet
[Code].....
But I get a compile error with expected end of statement. How else can I write this?