I have 2 lists seperated by a blank row For example:
Title1:
Acct # Acct Type
aaaa bbbb
aaaa bbbb
aaaa bbbb
Title2:
Acct # Acct Type
aaaa bbbb
aaaa bbbb
aaaa bbbb
How do I create a macro (for each list) to insert a new row at the end of its respective list?
I am trying to get to grips with the dynamic ranges for pivot tables. I have named a range data and in the refers to section put:
=OFFSET(Sheet2!A1,0,0,COUNTA(Sheet2!A:A),COUNTA(Sheet2!1:1))
I was hoping that then when i go to data > Pivot table and it asks for the range i could put =Data but it tells me that the range is invalid. I have attached a copy at the bottom.
I have a pivot table summarizing a lot of weight data on the product that we make. I have the actual weight and the specification weight, and a calculated field for the % over or under weight.
What I want is also a pivot column to show the range of weights for each product code. I have added a column (calculated) giving the weight difference (in gm) but when I collapse to summarise for each product it gives the sum of the differences. I think that the best thing may be to use an array formula on the source data table in order to give the range but I have not tried that yet.
I imported my data and I have a macro that updates the data. Nothing new until new items were added, creating new rows at the bottom and now the Table Format does not include these rows. There are so many formats available that I don't want to guess which one I used when I created it I just want to extend the data range.
I do not care if this is done through the macro or right on the sheet as this does not happen that often.
I copy a range to the end of a ListObject with
Code:
Range("").Copy(Destination:=Range(""))
but it does not always automatically expand the table. How come? It seems like it will expanded only if a cell in the table is selected? What can I do to always be sure that the table is expanded to contain the copied data?
I have a data management issue that I have been able to resolve using SUMIFs and a custom table, but not in pivot form. Since the data source is a SQL database, I would prefer to resolve the issue in pivot form so that future values chart correctly. The data is formatted as so:
Job
Day Start
Day End
Size
Project
1
1/1/2014
1/10/2014
10
A
[Code] ......
From that data I want to see the total size of projects active at the start of the week for the past year. This would essentially mean summing the size of the projects if the week start date lies between the day start and end. This is what I ended up with:
Year
Month
Week
Weekday Start
Active Size
2014
1
1
1/1/14
10
[Code] .....
This is the associated pivot chart:
This would be "OK" except that I would also like to see the size breakdown by project, like this:
This is where I would need the data to be handled purely in a pivot so that when a new project is added, the pivot table will automatically make the summing column for it rather than my manual creation of columns for the data.
I have uploaded a link to a work book with the examples of the data and how I made the charts above. You can see that to make the second chart I had to manually create the columns for each project:
Download PivotExample.xlsx from Sendspace.com - send big files the easy way.
I am having a hard time creating my ultimate gradebook. Right now, I am able to hide a SPECIFIC table on a SPECIFIC worksheet using the following code on a macro button:
VB : Sub HideRow()Range("Table2[#All]").EntireRow.Hidden = True End Sub
The problem is that this sheet will be a template and as a new user inserts a new sheet, I would like to copy and paste this template to each new sheet. Since the Table values change with each new sheet, code wont work on the new tables. How I can name each new sheets table "Class Data", and the macro button to hide will work on each respective sheet?
why I'm getting an error with this code. I have a data set that becomes larger each time I run the report, so by selecting all the cells and naming the range, I don't have to hard-code the cells involved. Then, I want to be able to create a table from that named range. The error comes on the last line of code.
VB:
ActiveSheet.Range("A1").Select
ActiveSheet.Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range(Selection, Selection.End(xlToRight)).Select
Selection.Name = "TestRange"
ActiveSheet.ListObjects.Add(xlSrcRange, Range("TestRange"), , xlYes).Name = "Table2"
I was using the following code for finding the max value in a range from a Pivot Table but cannot manage to make it work...
[Code] ..........
I've a macro that generates a pivot table from another excel workbook, however i need the range to be dynamic as the excel workbook im generating the pivot table from changes in number of rows on a weekly basis. Here is the existing coding:
Code:
Sheets("QA").Select
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"QA!R1C1:R22580C12", Version:=xlPivotTableVersion10). _
CreatePivotTable TableDestination:="Pivot!R3C1", TableName:="PivotTable2" _
, DefaultVersion:=xlPivotTableVersion10
how to make the SourceData dynamic
I'm trying to find a formula for the following problem: users have to enter a start and end date in 2 cells.
I need a formula to return a certain value within a table, where the dates are sorted into ranges:
For example: start date 02/01/1971 - end date: 05/05/1984
would return 576,448
From1/01/19701/11/19741/08/19811/08/19851/08/19861/09/19961/01/20071/01/20081/01/20091/01/20101/01/20111/01/2012FromUntil31/10/197431/07/198131/07/198531/07/198631/08/199631/12/200631/12/200731/12/200831/12/200931/12/201031/12/201131/12/20121/01/197031
[Code] .........
Is it possible to turn a range of data into a more detailed table.
for instance -
the input data would be something like
1 - 3 @ 50%
4 - 6 @20%
8-10 @70%
the output i'm looking for would be a table like below
1 - 50%
2 - 50%
3 - 50%
4 - 20%
5 - 20%
6 - 20%
7 - 0
8 - 70%
9 - 70%
10 - 70%
I have a sheet in my workbook called Results. This sheet contains a list of a fixed set of columns (A - N) but with a variable number of rows.
I am trying to create a macro to create a pivot table from this data, which automatically selects all the rows in the Results sheet to form the data set.
I've had a look at some of the other threads on this topic, but just can't get this working.
I have the following code that I have pieced together from other threads - you will see I am trying to set "PivotRange" as the data set and include this as the data source in the pivot. I get a subcript out of range error when I run this.
Dim PivotRange As Range
PivotRange = Range(Worksheets(Results).Cells(1, 1), Cells(lastRow, lastColumn))
Sheets.Add
[Code].....
Im trying to create a code that pastes the values from a range in one workbook to the end of a table in another.
This is what i got so far but the value only part is missing.
Code:
Dim targetBook As Workbook
Dim sourceWorkbook As Workbook
Dim sourceSheet As Worksheet
[Code]....
I want to start copying at a cell that contains the word "Vehicle" that is in the middle of a pivot table and copy until the end of the pivot table but I don't want to copy anything before it. How can I word this to in VBA?
View 1 Replies View RelatedBecause my pivot table is used by several users the data source changes often. In response, I created and applied a dynamic range using the offset formula. While the pivot talbe grabs the correct # of records, it inserts a blank column and row. There are NOT any blank cells in the data source range, as reflected by pivot table counts for the Blank column and Row. Any idea why Blank is showing up in my pivot table and how I can correct while maintaining the dynamic range?
View 9 Replies View Relatedit seems that the string range.address is not always equal to the complete range address.
I mean, I noticed that, if rg is a range,
Dim rg As range
...
rg<>Range(rg.address)
In the cases I noticed it, the range was an union of many ranges, and the string Address was already big, but not 1 kBite long.
My question: is there a way to get the *complete* range address, without this restriction?
I would like to use the address property, because I would like to have my range without sheet information.
So I use often : rg=Range(rg.address)
Im trying for the first time to use a dynamic range as the 'source' for a pivot table. The pivot table and the source data are in two different tabs. The source data is on tab Log! and i have used Daves formula (i hope correctly) to define the dynamic range. The range starts at Column B and is 22 columns wide:
Refers to:=OFFSET(Log!$B$1,0,0,MATCH(""*"",Log!$B:$B,-1),22)
I have named this dynamic range DMR. I have a pivot table on another tab. When i try to use DMR as the source (Log!DMR), it gives me an error "Reference is Not Valid". I must have the syntax wrong somewhere.
I need to use here.
Left column will be numbered 1, 2, 3, 4, etc
Top row will be beginning with $8.00, then 6.20%, then 1.45%, then 0.60%.
By me multiplying $8.00*6.20% = 0.50
$8.00*1.45% = 0.12
$8.00*0.60% = 0.05
Which then brings to my total of 0.66 (when adding all the totals)
$8.00 6.20% 1.45% 0.60%
1 $8.00 0.50 0.12 0.05 0.66
2 $16 0.99 0.23 0.10 1.32
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
I have a named range called ReportMonth and I want to embed it into this Table reference to make the number of columns that are summed dynamic:
=SUM(tblFcastTemplate[@[Column1]:[Column28]])
I tried ="SUM(tblFcastTemplate[@[Column"&(ReportMonth+1)&"]:[Column28]])"
I have some data formatted as a table. There are some blank rows at the end that still contain formula.
Every time I sort the data these rows move to the beginning. I have tried only selecting the active rows of data, but the whole lot defaults in each time
How do I sort data with a selected range only (within a table)?
Don't really want a macro as this will need to be used by others
How can i count "how many "A" for period date in table and date out table in this case"
Date inDate outresult Count
05-Mar08-MarA ?
05-Mar09-MarB ?
06-Mar07-MarA ?
07-Mar08-MarB ?
07-Mar08-MarB ?
08-Mar09-MarC ?
05-Mar08-MarA ?
05-Mar08-MarA ?
I have two data tables (Table1 and Table2) on two different sheets (Sheet 1 and Sheet 2). In Col1 of Table2, I have "copied" the values of Col1 in Table1 by using a simple equal (=) formula. Secondly, I have an autofilter on Table2 and a macro that automatically updates the filter when the sheet (Sheet 2) is selected.
My problem is that I would like Table2 to be more dyanmic, i.e. I don't want to change the range of the Table2 each time I add, or subtract, a value from Table1.
Could a OFFSET formula be employed in any way?
I have attached an example file.
The macro is:
[Code] .....
ExpandTableExample.xlsm‎
I would like to do a vlookup where the lookup value isn't in the first column of a range/table. Would I use index/match? For example, I have fields for vendor, part # and location in that order. I'd like to pull up location with a formula based on part #.
View 4 Replies View RelatedI prepared a Pivot Table and then i add some data in it but now all data is not showed by Pivot Table.
I do all necessary things like refresh and all but unable to increase a range.
How to increase range for Pivot Table in 2007.
I am relatively new to VBA and am trying to convert a range of data to a table in the same sheet. I receive the following message when I try to run the code as shown below:
"The worksheet for the table data must be the same sheet as the table being created." The code stops on the third line of the code.
Sheets("Data Forwards").Select
ActiveSheet.Range("$A$1:$U$1000").Select
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$U$1000"), , xlYes).Name = _
"Table1"
ActiveSheet.Range("Table1[#All]").Select
ActiveSheet.ListObjects("Table1").TableStyle = "TableStyleMedium2"
I can see that the range is highlighted in the sheet before the code breaks.
I wonder if someone can tell me if it is possible to sort rows in a pivot table based on a range in the same workbook.
I have the pivot table set up as I need it but the values in the row change each time the macro is run (it is run when new data is added)
As part of the macro a list of Grades is imported into the Workbook. These grades are always imported in the correct order. As such I would like the pivot table to follow the order of imported grade list. The grades in the list will always be the same as the list in the pivot table.
Is this something that would be possible to do?
I am trying to find a table of text, and copy it to another worksheet. I want to copy it as a range, not as rows or columns. Using Find, I can get to the 1st row of the table. Using Find again, I can get to the last row of the table.
What I don’t know how to do next is select the range.
For example; The table is in cells A10:F20. “Start” is in cell A10, and “End” is in cell A20.
Starting from cell A1, how do I find and select the range A10:F20.?
I will be doing this twice in the same macro, as there are 2 tables. Each of the 2 tables has the same “Start” and “End” text, as described above. The 2 tables will not always be located in the same location within the original WkSht.
I have created Pivot Table in "Sheet2" and the source data is in "Report" tab. The source data is in the range of A1:K200 -means until the last cell of the excel. Now if the data is more then this we need to change the source data every time before we refresh the pivot table - Is there any macro or any way so the range can be change automatically ?
View 9 Replies View RelatedI am trying to create a Pivot Table that filters on a range of data.
I have a sheet with lots of data on it, and separate sheet where I have created my Pivot Table and my list I wish to use as the filter values.
I need to extract 630 specific Departments out of thousands and report the movements against those depts. The 630 will change as time goes on and I want to just have a range where I can update the values as and when changes occur. I initially tried using Filter on Department but realized this was going to be a very long winded process.