Automatically Consolidating Multiple Sheets
Nov 25, 2008
I'll be as succinct as I can, and I'm sorry if this question has been answered already. I've had a look at past posts and can't seem to find anything.
My service has an Excel workbook of patient details. These details are separated across three sheets called 'Generic', 'Heart Failure' and 'Falls and Fracture Management'.
The columns in each sheet are the same. Every month I produce a single report of data from columns A, B, L, Q and R in each sheet.
I've been doing this by copying/pasting each of those columns from 'Generic' individually into a new sheet, then putting the same data from 'Heart Failure' underneath, etc., then manually deleting all rows that contain a blank in any cell.
Is it possible that VBA code can be written to do this? I don't know anything about codes; I know I could achieve the same effect with linking, but it seems that this would be unreliable.
View 12 Replies
ADVERTISEMENT
May 9, 2009
I got a brilliant bit of code (which works perfectly) from Bill Jelens "Excel Gurus gone Wild" which loops through all worksheets in the activeworkbook and consolidates these worksheets into one pivot table, this example creates the pivot in a new workbook, what I would really like to do is add a new sheet and create the pivot in the active workbook where I am pulling the data from can anybody help me to modify the code?
I have not added the code yet to generate the pivot
Code below:
Option Explicit
Sub bob()
Dim i As Long
Dim arSQL() As String
Dim objPivotCache As PivotCache
Dim objRS As Object
Dim wbkNew As Workbook
Dim wks As Worksheet
With ActiveWorkbook
ReDim arSQL(1 To .Worksheets.Count)
For Each wks In .Worksheets
Do Until wks.Name = ""..............
View 9 Replies
View Related
Jan 15, 2014
I am building a model for consolidating a number of different companies (possible as many as 30). I have a worksheet for each company and then a consolidated worksheet. I can create a consolidated spreadsheet that just adds all the sheets up but I would like to be able to include or not include a sheet in the consolidate worksheet through a simple yes or no cell. I saw someone do this a few years ago with a mining company where each mine had its own page and you could activate / deactivate the mine for the consolidated (but the mine page itself would be unaffected) but I can't remember how they did it.
View 1 Replies
View Related
Nov 12, 2009
I have written a macro to consolidate multiple sheets into one sheet. I have two sheets which are to be copied one below the other.I am attaching the code for this here.
ub Bingo()
Dim ws As Worksheet, n As Long, flg As Boolean, last As Long
On Error Resume Next
Application.DisplayAlerts = False
Sheets("Consolidated-Input").Delete
Application.DisplayAlerts = True
On Error GoTo 0
Sheets.Add(before:=Sheets(1)).Name = "Consolidated-Input"
n = 3
For Each ws In Worksheets
If ws.Name "Consolidated-Input" And ws.Visible And ws.Name "DCS-User" And ws.Name "Cal" And ws.Name "DCS" = True Then
If Not flg Then
ws.Range("a:c").copy
Sheets("Consolidated-Input").Range("a1").PasteSpecial xlPasteValues
Sheets("Consolidated-Input").Range("a1").PasteSpecial xlPasteFormats
flg = True...................................
View 9 Replies
View Related
Jan 21, 2008
I have a workbook with multiple tabs (sheets) I would like to make another tab to consolidate all the data, rows and columns into one master sheet.
View 9 Replies
View Related
Feb 23, 2014
I am writing a macro to consolidate data from different worksheets in more than one Summary Sheets.
My workbook has quite a number of worksheets, from different department e.g. OPS001, OPS002,OPS003, ADMIN001, ADMIN002, ADMIN003 and so on.
I want data from OPS001, OPS002 and OPS003 to go on one sheet e.g. "Summary-OPS" and data from ADMIN001, ADMIN002 and ADMIN003 to go on the other sheet name "Summary-Admin"
When I am working on Summary-Ops sheet I want to copy data from sheets starting with name "OPS" and so on.
View 3 Replies
View Related
Jun 22, 2007
I would like to make my stock sheet able to copy entres to another sheet within the same work book. (avoiding using VB as I can't do that)
If data is entered in sheet2, it is automatically copied onto sheet1.
The reason is that each storage device will have its own sheet and all entries will automatically be copied to the master sheet. This will make things easy for the people who need to use this system for updating and seaching it.
I have seen a similare problem that seems much more complex here @ Copy Data From Multiple Closed Spreadsheets
View 6 Replies
View Related
Feb 20, 2014
I have a workbook in which users record the time spent on various activities. I have some code which will copy the worksheet template and create a worksheet for each user (in a defined list of names). Then each worksheet needs to be password protected so only the user can see it (I can do this individually by manually writing in each sheet name and setting a password but will have 80+ users for some groups and it will take ages...)
What I would like to be able to do is also automatically generate a password for each user (combining a word and automatic number e.g. "EMidsTeam123") it may be possible to insert this into the code I already have (which I have copied )...
VB:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim strPass As String
Dim lCount As Long
If Sh.CodeName <> "Sheet1" Then
'Set sLast variable to the last active sheet This is then used to return the user to the last sheet they were
[Code]....
View 6 Replies
View Related
Dec 31, 2012
I have a spreadsheet that contains many lines of information that will constantly be added to and updated. One of the columns contains a drop down with 4 possible options. I am trying to get the data to copy to a sheet based on 1 of the 4 options selected. So for example, if Education is selected, then that row of data should also appear in the Education sheet. Same goes if one of the other options is selected.
I have seen several examples on this forum, but they are mostly macros (or formulas that don't quite apply). I am trying to use formulas so that the information is updated live so macros don't really seem to be a viable option.
I am including a sample of the spreadsheet with data on the main sheet and how I want it to look when it is transferred over to the other sheets. I had to substitute a lot of the information (with numbers or filler words) due to it being confidential.
View 6 Replies
View Related
Sep 28, 2013
I have a time tracker that provides hours that employees clock in and out. It provides me with an excel document with all the employees time every two weeks as needed, however it does not total the hours from all previous spread sheets so that I can have a YTD (year to date) total of the employees hours worked and I need to be able to have this. Currently I am going through each and every spreadsheet and totalling them up. I have over 40 employees and this has become very time consuming to say the least.
View 1 Replies
View Related
Aug 24, 2013
I currently have an excel work book with multiple sheets per year. What I want to happen is that whenever I input data in one of the Year sheets, it will automatically go to the Master sheet.
See attached file for sample
Sample.xlsx
View 8 Replies
View Related
May 29, 2014
Tried the consolidate feature, however not sure that it is what I am looking for.I am basically trying to condense several calendars ( one calendar per department in a company) into one Calendar..Each calendar has its own tab and looks exactly the same. (tab names: Clubhouse, spa, and final calendar... possibly more departments added later) Hard to explaing so I will attach the file. All I would like to do is combine all calendars into the "final calendar" and in time order if possible... example below
{Clubhouse Tab} A3 will have the time (10 am) , B3 will have the item "Meeting"
{Clubhouse Tab} A4 will have the time (5 pm) , B4 will have the item "Dinner"
[code]....
View 14 Replies
View Related
May 1, 2008
way to combine multiple rows into a single row using vba?
I have large amount of data approximately 5000 rows. I would like to combine all of the rows by DOB.
The reason why they are listed multiple times if they have multiple Benefit #'s.
Here is an example of the multiple rows of data: ....
View 12 Replies
View Related
Aug 15, 2012
I have a folder that contains around 45 excel files, each of these files contain a tab called "corp val". (these files change name month to month e.g. Report June, Report July etc)
I am finding on a monthly basis i need to go into each of these excel files and copy the data from the "corp val" tab into a summarized spreadsheet - which i then use the data for various things.
Just wondered if there was a solution to this or will it always be difficult to copy and pasting all the data i need. I am not in anyway an advanced excel user, I am guessing this might be some form of macro in which case I am maybe better to keep doing it the way I was as I am not literate in macros.
View 1 Replies
View Related
Apr 11, 2008
I'm trying to consolidate inventory for my department. I have Part#s in (column E) of all the worksheets and the amount of the product in (column C). I need a formula that finds the specific part# (in column E) and adds up the total amounts (in column C) in another worksheet has the part#s and amounts in same column.
View 14 Replies
View Related
Mar 5, 2010
I am trying to consolidate multiple worksheets in one workbook into one master worksheet in the same workbook. Problem is though that the headings in the multiple worksheets are not excatly the same. Ie. some may have one or two additional headings (other than that they should be the same).
How can this be done or is this a manual process of headings alignment before any consolidation can be done?
View 9 Replies
View Related
Jun 19, 2012
I need to update my Workbook to do something more. I have a Workbook that contains multiple Worksheets that contain a list of items that need to be inspected with a schedule date. What I want to do is consolidate all the items that have not been inspected and put it on one Worksheet within the same Workbook. Unfortunately I can't attach my Workbook so you can see what I'm talking about. Each Worksheet has these five columns and every inspection still required to be conducted only has the CSEC, Schedule Inspection Date, and Remarks Columns filled out. I would like to scan all Worksheets to copy this data and consolidate it into a seperate Worksheet so I can print only one Worksheet as my report vice over fifty.
CSEC# | Scheduled Inspection Date | Date inspection was performed | Inspection Pass/Fail | Remarks
View 4 Replies
View Related
May 29, 2007
I am trying to compile a spreadsheet for my job that will find an average of all the break times and meal times that all the employees take. I have the employee list and their respective timeclock punches for the week, so I took that and found their meal and break times for each individual day, but I'm having trouble when it comes to consolidating and averaging the data. The first column lists the employees, but their names are repeated depending on how many times they punched the clock that week, and since not every punch was a meal or break, my time columns contain a lot of zeroes that aren't needed. I need a way to just average each employees' meal and break times.
View 9 Replies
View Related
Mar 31, 2007
I have situation which needs expert advice. I have about 22 Excel files of different branches with similar data. I have to link some calculated cells from each of these files into one file to show the consolidated data. There are about 18 calculated cells in each file, so linking each one is practically impossible.
View 10 Replies
View Related
Sep 28, 2008
Row totals exceed the limit for Excel 2003, so I have split the data into different worksheets by year.
Problem is, now I can't create a useful pivot table, i.e. using 'multiple consolidation ranges' reduces the field list to "Row", "Column", and "Value".
I have 26 columns in each worksheet (all identical structures); some are multilevel factors, some are variables - and the way these relate to each other is unknown as this stage, so I literally cannot have the dimensions reduced in the way Excel proposes with multiple consolidation ranges.
View 7 Replies
View Related
Jul 17, 2012
I've seen some examples here and I think I understand the consolidation function. However, my query has the added level of needing to consolidate each member:
I have a table of data that looks like this:
SURNAME
NINO
CODE
NO OF UNITS
Smith
AB123456C
8AIA
1986.4805
[Code] .........
There are a number of clients that have multiple investments that are shown by an alpha numeric code. I need to consolidate the number of units for each member in to one line. Ideally the output would look like this:
SURNAME
NINO
CODE
NO OF UNITS
Smith
AB123456C
8AIA
2278.4058
[Code] ...........
View 9 Replies
View Related
Sep 27, 2011
I have 25 sheets in the workbook and a combobox on the main page, The combobox references a range of 1-25 that represents the 25 hidden pages. right now i can get the sheets to unhide one at a time based on the selection e.g. combobox option 1 will unhide sheet 1 but the sheet are representing sites in a design so i need to have the option to select multiple sites in the combobox option so for example if i select 5 then sheets 1-5 should unhide. I hope I've explained that clearly.
The other question or option would be to just duplicate sheet 1 based on the combobox selection e.g. selection 5 duplicates sheet 1 5 times.
View 9 Replies
View Related
Dec 8, 2009
I have an excel 2007 work book with multiple worksheets that updates daily. I want to bring all the data from each of the work sheets into a new worksheet so that i can create a pivot table.
All the data in the worksheets have the same headings and correspond to the days of the year.
I think i need to use some sort of range look up?
View 9 Replies
View Related
Feb 26, 2012
I have a workbook that updates from external source and creates sheets depending on a cell range.
I have put tab 1 and tab 0 on either end of where the new sheets will be inputted, will never know how many sheets
What i need to happen is if someone fills in "complete" in A7 in my "summary" sheet then the values in row 6 in all the other sheets get hardcoded. This needs to happen from A7 down to A26, so A8 = complete then copy row 7 etc
This is what i have so far
I get compile error here ........Sheets(ArrSh(1)).Activate
Also need it to work for all the other rows.
Sub hardcode()
'
'Sheets("Summary"). Select
If Range("a7") = "complete" Then
'
Sheets(Array("1", "0")).Select
Sheets(ArrSh(1)).Activate
[Code] ......
View 2 Replies
View Related
Aug 9, 2007
I have been running a simulation for about 18 hours now and just received:
Run-time error '1004':
Method 'Add' of object ' Sheets' failed
I have been creating new sheets, importing data, pulling some values from the data then deleting the respective sheet. I am using:
ActiveWorkbook.Sheets.Add after:=Sheets(Sheets.Count)
The sheet is actually being added to the workbook, seemingly before the error. I resume the code, and a new sheet is placed in the workbook and it errors again. The Debugger stops and highlights on the code above.The sheet count number was 10895 at the error, just as an indicator of how many times the simulation has performed successfully. I am hoping this is something I can fix without having to start over...
View 9 Replies
View Related
Feb 5, 2014
How do I get sheets names automatically? I.E. I want to get in A2 sheet number 2 name. In A3, sheet number 3 name...
View 1 Replies
View Related
Feb 18, 2014
I have a work sheet named "Main_List"...In column D starting with "D2" I would like to list worksheets that I would like to have printed via VBA.
The workbook has several hundred worksheets and I would like to list in column D only worksheets that I would like to print with VBA code.
View 3 Replies
View Related
Dec 26, 2009
I have a workbook with 26 sheets, labelled A to Z. Column A in all the sheets have names from rows A6:A35.
I need a macro or a code to extract all the names from each of the 26 sheets and paste it to a new sheet 'Names' under column A, such that names starting with 'B' paste under all the names 'A' and so forth till 'Z'.
View 9 Replies
View Related
Jul 20, 2013
I am working on a macro which transfers data from one sheet to another. The code starts by taking cells M1:P1 from sheet SL_Background and moving them to B9:E9 on sheet CreateSL. It then moves to the next set of four cells on SL_Background (Q1:T1) onto the next line down on sheet CreateSL (B10:E10). I am repeating this process about 180 times right now and it is all coded like this:
VB:
Sheets("SL_Background").Select
Range("M1:P1").Select
Application.CutCopyMode = False
[Code]....
So what I would like to do is to make something that automates this process and will eliminate more than 1000 lines of code.
View 9 Replies
View Related
Nov 30, 2008
I have a sales sheet that records every sale as it comes in. I want it to copy the relevant information (only that sales reps sales) into each sales reps individual sheet automatically so that I can send each rep his own sheet. Can this be done? SEE ATTACHMENT
View 2 Replies
View Related
