I have built a compiled a workbook which figures out the daily business in my club, Staff Rota, business done, wage slips, and everything else I need. Well, everything except the stock element.
I need the current week to look up the previous weeks stock levels on each item, when the previous weeks workbook changes it's name every week. At present I name the sheets by the week ending date, i.e. 12-04-14.
Here is what I have and am trying to do:
I entered the date and day in this format in multiple sheets in workbook 1 (named 0101, 0102, 0103) from the start of the year to last night (B2:C4):
Date:January 01, 2013
Day:Tuesday
I then entered all the data needed below that (B5:E26):
TimeTransactionsTotal SalesAverage Sales
12:0039 $352.97 $9.05
13:0053 $416.98 $7.87
14:0044 $339.42 $7.71
15:0043 $304.96 $7.09
etc.....
In workbook 2, I have sheets named for each day of the week. I would like to take the information from the previous three weeks for each corresponding day from workbook 1 and put the averaged data into another table with the data all formatted the same in workbook 2. This way, each week when I go into the aggregate file (workbook 2), I can look at the chart I'll create and see the average of the past three weeks transactions, total sales, and average sales for each hour of the business day and be able to staff accordingly (assuming the trend continues).
I have a macro that unprotects a worksheet copies data from that worksheet and pastes it into a newly created and saved workbook. However I have two problems
1) I'm attempting to copy the data from the first workbook by selecting all cells and then when switching to the new workbook, select all cells and the paste special (values) then paste special (formats). This works when recording the macro but when I attempt to run it it bombs out.
Cells.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
2) How do I get the macro to switch back to the workbook it got its data from. The name of the source workbook varies and there may be from 2 to 15 workbooks open. Is there a previous active workbook command? or do I need to create some kkind of temporary value to hold the file name of the source workbook.
I have two workbooks (Book1 and Book2). When Book1 opens, its Workbook Open procedure displays a Userform1 that has two Command Buttons. The first Button closes Book1 (exit the program). The second Button opens Book2. Book2 has a Workbook Open procedure that should close Book1 and display a new Userform2. When the Workbook Open procedure of Book2 closes Book1, the procedure stops there and does not show the UserForm2. How can I get the Workbook Open procedure of Book2 to execute both steps of closing Book1 and showing Userform2? This must be done by clicking the second Button on Userform1.
View 9 Replies View Relatedsee attached file. Need to find latest non blank value - in attached file it is highlighted in yellow. From there, want to summarise 26 weeks back so, in the attached file:
Row 2 would be finding 750 and summarised back 26 weeks from 30 sep 2012
Row 3 would be finding 2250 and summarised back 26 weeks from 2 dec 2012
Row 4 would be finding 5000 and summarised back 26 weeks from 4 nov 2012
I have been working on a macro that compares a existing list of data to an updated list of data and then either moves any data not on the new list over to a completed tab (followed by deleting the record on the existing sheet), and then adds any items not on the existing sheet, but which appear on the new list, to the existing list.
I have come across a stumbling block, i have managed to identify on the existing list the rows of data that have been removed from the new list and therefore need to be moved over to the completed tab, but when i select the data it selects the header row aswell (which will always remain the same row). Obviously this then pastes the header row aswell, and also i can't seem to get it to paste in the new sheet to the next available row (i.e this will be used daily and i don't won't to overwrite the infor already in the completed tab). the next issue i have is then when i go back to existing sheet to delete the data i just copied across, as the header was initially select this also gets deleted.
The code below, is the complete code, including filtering, copying some forumals etc. The area i am getting stuck on is highlighted in red:
Sub Update()
Dim bottomrow As Long
Dim My_Range As Range
bottomrow = Cells(Rows.Count, "C").End(xlUp).Row
Set My_Range = Range("A1:Y" & bottomrow)
[Code] .....
I have a report that is run everyday showing a list of orders, on separate tabs based on facility code, that has all kinds of information. I want to be able to take today's file, and have it lookup any comments I posted on the previous day's file.
I've been messing with code all morning and can't get it right. I think my problem is the vlookup part, and I don't think my loop is right either. Here's a little bit of the code i'm trying:
Attached is a sample of excel file,
its a simple spreadsheet that suppose to track a usage of items that were taken out of inventory,
but at the same it needs to be printer friendly (that's what's causing all the problems),
it got messy when I had to carry over from previous row,
I had to manually enter under "Quantity ch." in order to have correct amount under "Left" column, (see row #4)
I think I can eliminate whole "Carried over" column if I create a formula that will enter data into B4 only if J3 has a number, I also need to copy the same formula's down each column,
OK essentially this is my problem:
I have a daily spreadsheet, uou update for inputs and outputs each day and the spreadsheet gets to an overperformance figure (sorry if the spreadsheet is a lottle unclear, it is a simplified version)
On the first day of each month, the opening target is adjusted and you start again. The probelm is you dont know what the opening target is until roughly 21st of the month.
I created a macro that deletes the opening target and removes all the previous days before the start of the month.
The way i done this was:
Create a copy of "daily" tab, change b5 to equals c2 and copy and paste special as values. Then in d5-d58 and f5 - f58, vlookup values from old "daily" tab , and then copy and paste special as values. Then delete old "daily" tab and remname daily(2) as "daily"
What i have done is essentially created a new tab on 21st March, looking back to data only as far back as 1st Mar and the new opening bal and target is found. The macro can be used on the 21st of each month.
but...macro doesnt work, i have tried a few times and i think it is because i am vlookuping up data from a tab that i later delete...please help!! - thanks a mil to anybody that can give me a steer in the right direction.
I have a spreadsheet with over 6k rows, each with over 30 columns.
My focus is in 2 columns. ColumnA is formatted as General, ColumnB as Number.
ColumnA
ColumnB
05255088-0f15-48f1-a65e-affb6d583d35
1373064224475
05255088-0f15-48f1-a65e-affb6d583d35
1373064224475
[Code] ........
I need VBA code that will Fill the cell in ColumnB if it changes within the same ColumnA data.
So the output would end up like this. (Although the cell would be filled, not the text turned red)
05255088-0f15-48f1-a65e-affb6d583d35
1373064224475
05255088-0f15-48f1-a65e-affb6d583d35
1373064224475
[Code] .........
So it's pretty basic. If we simply remember the first ColumnA and ColumnB data, go to the next row, if ColumnA is the same, then ColumnB should be the same. If it's not, then fill with red, go to the next row, repeat. if ColumnA changes, remember the new pair, go to the next row and compare again.
I've thought about this from a scripting perspective, and imagine that something like this would do the job:
Code:
sub FindBadTermID ()
Dim row As Integer
Dim dataA as string, dataB as string
Set row = 2
newColumnALoop
[Code] .......
This code (partial) was written to interrogate a database. Cell "A2" of another tab contains a Part Number to be sought.
Target = Range("A2")
Sheets("Kanban Data").Select
Dim Nrow As Range
Dim N As Integer
On Error Resume Next
With Sheets("Kanban Data")
Set Nrow = .Columns(2).Find(What:=Target, After:=.Cells(3, 2), LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
If the Find expression (as pulled down from the Edit menu) is empty, then inserting a Part Number in A2 and executing the macro finds the correct record and returns the its correct row number (N, as defined afterwards in the code). Then, changing the Part Number in cell A2 and executing a new search returns the SAME row as the previous search, despite Target being equal to the new sought after value.
if cell in column E contains 'YTD', append value of cell in column D at the end with a space before it (example: " VALUE") to cell in column C. not sure how to go about this. i attached a one row example
View 8 Replies View RelatedThis is just a sample worksheet. I have got a worksheet with having 3 coloumns A, B & C. Column A contains E Code, while Column B is of time which user will enter. Column C contains the time in Hours.
I have entered one record for example. Now, whenever user enters the value in B3, then formula from C2 should be copied to C3 i.e it should be =B3/60.
I want this to be done using VBA. Pls help me out. I want to use this feature in one of my another files which requries this feature.
see the example below...
ABCDE1blueblue2greengreen3redred4purplepurple
I basically want column E to check the cells from left to right and display the value that is in the first populated cell. For example, cell A2 is blank, therefore, it should display the value from B2. A3 & B3 are blank, so E3 should display the value from C3 and so on...
Is this an "IF" statement?
How can I repeat identical data in the previous cell. For example I have in Cell A1 - Marketing then I have in cell A2 to A3 same Marketing but it is not shown. Then I have in Cell A4 - Operations then Cell A5 to A8 same Operations but not shown. I need to have them all shown as in Column B,
A
B
1
Marketing
Marketing
2
Marketing
[Code] .......
I have a excel based timesheet that looks at an external table named "Station Master" to populate columns from a vlookup. I have recently linked the Station Master to a database to populate it. From the database we may change status so that the project does not show up in the station master anymore to make sure complete projects are not getting hours charged anymore. Now if a project that was on the master goes away previous timesheets lose the correct description because it is not on the station master anymore.
My question is there anyway to make the previous data lock so the data that is in the cells won't change when the station master changes.
A little more info... the time sheets are by quarter so 12 weeks are in the same workbook as individual worksheets. All of those worksheets vlookup to a worksheet called "projects" inside the workbook. Then that worksheet references the external Station Master workbook.
I have designed a simple user form to populate a finding tracker spreadsheet. Updating the tracker works fine.
Although I only need to update certain textboxes in the user form, I find myself having to enter the same data in every textbox so that the next row of the spreadsheet is filled. In all cases, if a textbox is not updated for the next row, then the data should copy the data from the previous row.
For example, last data Transferred from the user form are as follows:
[Heading] Col A - Col B - Col C
[Row 1] Apple - Red - 10
Assuming I would only update the textbox for Col C in the user form, the next row in my spreadsheet would look like this:
[Heading] Col A - Col B - Col C
[Row 1} Apple - Red - 10
[Row 2] (empty) - (empty) - 20
As such, I would like to add a code that allows the data (Apple and Red in Col A and Col B) from the previous row to be copied automatically and only updates Col C with the new value 20.
Oh, I should add that I have mostly Textbox values (about 20 columns) in the spreadsheet with the exception of three columns with CheckBox values although I can always repeat the checkbox fields.
=IF(AND(EOMONTH(TODAY(),COLUMN()-2)<TODAY(),(TODAY()<EOMONTH(TODAY(),COLUMN()-1))),Sheet2!C10,"NO VALUE")
The above formual resides in each cell in row 1 column g inclusive.
The question is when I move over columns the previous column with figure is wiped out because false "no value" becomes true.
How do I stop the previous data from being wiped out once I move on in columns?
I have used sumif statement to set up a value by week and then used the drop down list cell reference to display what i want ie week 25 data
What I would like is to display the 8 previous weeks and then use this in a graph, so every time i change the drop down week I see all the data showing the current week and previous weeks.
Now the problem is which formula do i use to to identify previous weeks
ie
WK No 21 22 23 24 25
Visits 100 200 250 300 400
I have a large set of data that I need to use for data validation in drop down lists. The data is arranged in 4 columns and entries within each column may repeat numerous times. The four columns are as this..
Category Subcategory 1 Subcategory2 Subcategory3
The first data validation will come from the first column. Once this is chosen the second drop down should populate with the subcategory that correspond to that category stored in column 2. once that is chosen the thrid data validation should populate with the corresponding subcategory from column three etc.. This is a small sample of the data in the columns.
the following issue:
I have a spreadsheet of questionnaire responses which range from 1-7
For example:
Respondent Q1
1 4
2 3
3 7
4 6
So each row is a new respondent and each column is their response from the scale.
What I need to do is code the responses into a different form. I need them to be represented as follows:
Respondent Answer1 Answer2 Answer3 Answer4 Answer 5 Answer 6 Answer 7
1 0 0 0 1 0 0 0
2 0 0 1 0 0 0 0
So that each number then represents the place on the scale from which it was chosen.
I tried recording a macro but I think this requires something a lot more complex.
I have a form im using for one of my spreadsheets and it involves alot of data entry, many times alot of the data will be the same not like one entry after another but say the second, fifth, twelfth and fourteenth data entry's will be almost identical. Is there any way i can make the form remember previous entry's kind of like the spreadsheet does? so you start typing and it automatically shows what you typed that was similar into that column and you can hit enter and it will automatically fill that cell out for you. But instead of columns and cells these would be entry box's in a form.
View 4 Replies View RelatedMargo
12/12/86
188478007
7/19/12
801
Anthem BC/BS
Margo
12/12/86
188478007
7/31/12
806
Anthem BC/BS
[Code] .......
I have this info on my excel spreadsheet plus 500 more lines. What I am looking for is if a name repeats then the info in column 2, 3, 5 and 6 for that name needs to be brought to new row. Example would be if I used the name karen on the next row then I would like her info from the desired cells to auto populate so I don't have to keep entering them and so on with new and old names. I have been trying to get this done for months know and have had no luck. My sheet already has over 500 lines of names and it would be nice if I could use the data from the past as well as the future to populate these cells.
I have amended the code below and have got it working. The problem I have now is that every time it loops it overwrites the data it wrote the previous loop
Offending line being ActiveSheet. Range ("A1: D30") = ValuesArray
I have known that somehow it should remember the last row and copy below this one but I cannot get it to work
Code:
Sub Basic_Example_1()
Dim MyPath As String, FilesInPath As String
Dim MyFiles() As String
Dim SourceRcount As Long, Fnum As Long
Dim mybook As Workbook, BaseWks As Worksheet
Dim sourceRange As Range, destrange As Range
[Code] ..........
I have a list of airport codes and I need to look up these 2 digit codes and find the relevant airport and country.
For some reason when I use the lookup function it is finding the correct lookup value but returning the column cell in the previous row.
I currently have a large spreadsheet that multiple people fill out. Each person fills out all the information in a row. At the end of the row, I would like a button that says "Generate Form" so that when clicked, a new sheet automatically opens with a template form that I created and is already filled out with the information that was just inputted into the spreadsheet. Also, there are four different template forms that could generate. For example, there are forms A, B, C and D. If the user inputs "B" into the first column of the row, then when he goes to click "Generate Form", a new sheet is created with all the information filled out in Form B.
View 3 Replies View RelatedI am applying data validation in my workbook. The data in ColS consist of:
ColS
(Row2) X
(Row3) Y
(Row4) Y
(Row5) Y
(Row6) X
In ColT, I am to apply data validation: i.e. If in concerned row of ColS is having "X" value, then I am to show an error message. Else, values from A2:A5 should be shown in the as list and these should be accepted in ColT.
I have a copy and paste macro below, that copies the selected rows and pastes them into a different sheet called Blank BOM. Each time they are pasted, it just writes over the previous items at the top of the list. I would like it to paste in the next open row, so I can go back and forth between the sheets and add things. Here is the code:
VB:
Sub CopyRow()
Selection.Copy Sheets("Blank BOM").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
End Sub
the post 5 for the actual issue. This being my first post could not update it correctly. I have put my views int he 5th post which will be more clear.
View 9 Replies View RelatedI have a workbook that contains 50 worksheets named 1-50. I need to add more worksheets. all the formulas in the worksheets always refers to the previous worksheet.
How can i make a copy of the worksheet named 50, name it 51 and have all the formulas in worksheet 51 refer back to worksheet 50?