I would like to be able to calculate cumulative returns by selecting a starting and ending quarter from a validation list and finding the product of all the quarters between the two selected. I imagine the equation would look something like this: ...
View 9 RepliesI am trying to get the contagious cumulative sum of various data ranges in the same column in my workbook. Data ranges are dynamic so i can not use formulas. I have prepared a table below for illustration. I need the VBA code to calculate the cumulative amounts in column C highlighted in Bold.
There is always a blank row after the cumulative amount. There is also always a text (as in column A of this example) in the same row as where the cumulative is summed up, maybe it can be useful for the code.
I would have written some code but for the algorithm to be used in this case. Maybe a nested for loop, not sure.
Heading
Numbers
Cumulative
Blank Cell
Blank Cell
Blank Cell
[code]...
My objective is to automate the creation of a dynamic top-5 list by summing a number related to multiple entries of an item (text string). Data are added monthly and while the textual strings (imported) are constant (text1 always reads as text1) the text strings themselves may vary from "text1" to "text2", etc. What I'm trying to achieve is finding the top-5 five items and copy/paste them to a range on the same worksheet. The range into which they are pasted are source cells for DSUM criteria. The frequency with which a text string appears is not critical, but the associated count is.
View 2 Replies View RelatedI'm trying to add cumulative values based on two criteria, one being a constant date, and the other being a date range.
I've attached the example where I would like to sum the highlighted values. I am trying to come up with a formula based on the criteria in cells I2:K2 but can't think of anything.
Example.xlsx
I have a range which will change in size & in content, & I want this to be a Named Range at whatever size it is.
Reason I want to is because I want to make a Validation List with this dynamic range. I also want a Validation list which lists the content of 2 or more dynamic ranges which may or may not be on the same worksheet - is this possible?
i.e.
First dynamic range: called "Milestones" at A11
Second dynamic range: called "Activities" at A25
& make a Validation list that will list content of both
OK, I have a huge SS with lots of named ranges. Many of which are dynamically assigned lists.
All of the existing ones work fine, but when try to add a new named range, it returns the cells from a previously named range. (Always the same old one.)
example:
A range (one of many) is named "Shift_List" and is defined using
=OFFSET(info!$C$3, 0, 0, COUNTA(info!$C$3:$C$2000),1)
New range is created named "PN_List" and is defines using
=OFFSET(info!AA$3, 0, 0, COUNTA(info!AA$3:AA$2000),1)
When I create a Data Validation List or otherwise use "Shift_List" as the source it works fine.
However if I do the same thing and refer to "PN_List", it returns the items from "Shift_List"
Any new named range returns the Shift_List cells, although older ones still work correctly.
I have a bit of code that builds a formula and uses a variable store the range:
VB:
Sheets("CONTROL").Select
lastRow = Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
[Code].....
For some reason, it seems that this following line returns the value its supposed to be searching for instead of the range where it finds the value.
View 5 Replies View RelatedI am using the following code to re-name filtered data in column 4 of my worksheet, but I am running into an issue when the Autofilter returns only one row of data. The End(xlDown) is selecting a range that extends to the last row of the worksheet (1,048,576).
Code:
rfiltered.Cells(1, 3).Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "Receivables"
Selection.Copy
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Paste
How can I write the code so that in the event there is only one row of data, it selects just that row for the paste (and yes it would be redundant to paste over the same value) and then continues on? I would usually use a Cells(Rows.Count, x).End(xlUp).Row to find the last row of data, but I don't think that will work in Autofilter mode.
I have a table (A1:C5)
A1:C1 contain the table headers
A2:C5 contain the data
A6 contains the value I want to search for I use this formula to return the column header of A6 A6=INDEX(A1:C1,SUMPRODUCT((A2:C5=A6)*COLUMN(A2:C5))) Now, if there are duplicate values in A2:C5, this will return more than one column header What I need is a vba code to view a msgbox with all column headers returned in this case
I am trying to write a UDF that will calculate a value and return it to the cell, and also create a comment in the cell showing the formula used. Here is an example of the "=calculate(A2,B2)" placed in cell A1
Function calculate(ByRef X As Range,ByRef Y As Range)
calculate=x*y
calculate.addcomment "calculate = " & X & " * " & Y
End Function
the problem commes from the add comment field. I can add a comment to any cell but the cell the formula is called from.
I am trying to return several values >10K, >5K, >3K, >1K,
View 7 Replies View RelatedI have a nice case to prepare and need weekly riskfree interest returns on the UK treasury bond. Right now I have daily returns and want to convert them into weekly. The problem is, weeks do not always contain five trading days. How can I turn my data into weekly average riskfree interest returns?
******** ******************** src="*********>*********>Microsoft Excel - UK interest daily.xls___Running: 11.0 : OS = Windows XP (F)ile (E)dit (V)iew (I)nsert (O)ptions (T)ools (D)ata (W)indow (H)elp (A)boutA1=ABCD1DateInterest rateweekday 24-Jan-889.871 35-Jan-889.992 46-Jan-8810.053 57-Jan-8810.094 68-Jan-8810.135 711-Jan-8810.051 812-Jan-8810.072 913-Jan-8810.283 1014-Jan-8810.114 1115-Jan-889.985 1218-Jan-889.871 1319-Jan-889.962 1420-Jan-889.913 1521-Jan-889.864 1622-Jan-889.715 1725-Jan-889.71 1826-Jan-889.762 1927-Jan-889.693 2028-Jan-889.564 2129-Jan-889.555 221-Feb-889.741 232-Feb-889.622 243-Feb-889.643 254-Feb-889.684 265-Feb-889.755 278-Feb-889.931 289-Feb-889.852 UK interest daily [HtmlMaker 2.42] To see the formula in the cells just click on the cells hyperlink or click the Name boxPLEASE DO NOT QUOTE THIS TABLE IMAGE ON SAME PAGE! OTHEWISE, ERROR OF JavaScript OCCUR.
Im sorting a dynamic range as mentioned in this Sorting a Named Range. My range is called drWarningTypes and is defined as:
=OFFSET(DataSource!$A$2,0,0, COUNTA(DataSource!$A:$A)-1,1)
When there is only one cell in the range, then running the following sort function includes A1 also in the search (and also adjoining columns).....
I have a column of data that keeps getting new information in it. what i need is a named range that i can use for a chart, first point in the named range will be the first value in the column, second point will be avg. of point 1 and 2, then 3rd point will be avg. of 1,2,3 etc.
View 1 Replies View RelatedI 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.
My searches have not produced anything that I could apply to this situation.
I'm trying to write VBA that would:
1. Search a Workbook for Dynamic Ranges.
2. When a Dynamic Range is found the code would:
A. Determine the current coordinates for the range.
B. Change the "Refers To" value From "=OFFSET...." To "=Worksheet_Name $Column$Row:$Column$Row"
3. Save Changes.
4. Close File.
My apologies but I have very little experience in writing VBA. I understand about variables, arguments, and IF/THEN but just enough to use functions within Excel.
Find statement returns empty when i search in a range with XLWhole option enabled
Code:
Private Sub worksheet_change(ByVal Tar As Range) On Error Resume Next
If Tar.Column = 1 Then
Set f = Sheets("Sheet2").Range(Cells(1, 1), Cells(5000, 100)).Find(Tar(1, 1), LookAt:=xlWhole)
[Code]..
but when i use Cells instead of Range ,Find command returns perfect result
Code:
Private Sub worksheet_change(ByVal Tar As Range) On Error Resume Next
If Tar.Column = 1 Then
Set f = Sheets("Sheet2").Cells.Find(Tar(1, 1), LookAt:=xlWhole)
If f.Column = 11 Then Sheets("Sheet1").Cells(Tar.Row, Tar.Column + 1).Value _
= Sheets("Sheet2").Cells(f.Row, f.Column + 1).Value
End Sub
I have a range of data that will grow as the days of the month pass but I need to run calculations on this range. The data is 13 columns wide but the number of rows will increase daily. I remember using a formula in the Define Range that would automatically take into account new additions using the OFFSET function but cannot for the life of me think how exactly to do it.
View 4 Replies View RelatedLine of code that will Select a Named Range in this case I have Named a CELL "DataSummary" Need to use that named range by selecting 30 columns and 54 rows.
Range("DataSummary),(??,??) doesn't work.
I have been working on part of the code for my spreadsheet and it works fine in the spreadsheet “Databaseform” however when I copied the code to my master spreadsheet “Paul_PartLocDBCombo” it does not work, I get the error:
Method ‘ range’ of object ‘_worksheet’ failed
The code is then highlighted in yellow, the code is:
Set rng = wksPartsData.Range("a1", Range("a65536").End(xlUp))
Meaning this part is incorrect but I don’t know why? To work it: go to Databaseform and press start. Enter 7mm in the product field and press find all. It will then return all the matching results in the userform. Its this I want to try and achieve on the other spreadsheet when the button find label is pressed.
In my current worksheet, IF(0 = "CS") returns TRUE, but on any other file this same argument returns FALSE. The cells' formats are both general. I want it to be FALSE.
View 2 Replies View RelatedI need a cell that holds a cumulative sum , but i get stuck into cell self reference.
Let me explain . Imagine i have cell A1 which holds a formula : =B1 + C1
If i keep changing the values of B1 and C1 the value in A1 will be changing as well . I need to the sum up of A1 values at any given moment. I practically want
A1 := A1 + B1 + C1
I would like to work out the cumalative value ffor each row on a sheet I have.
Basically it just needs to start from column 4 each time and then go across and take first value and then add that to the second one, take that answer and add to third one and so on. Basiaclly I need to get an end result on clolumn 25 each time. The code has to be able to count down the rows too.
Need a formula for cumulative value - i.e. total for month 1, month 1 and 2, month 1,2 and 3 and so on??
View 2 Replies View RelatedThis problem has come at the end of a big exercise whereby I've managed to construct a spreadsheet that automates three payment processes based on various VLookups to another file. However, I've come to a stage where I need to pre-empt a payment allocation based on cumulative totals.
I'll try and explain clearly below but I've also attached a spreadsheet showing the intended result (along with a copy without the output so that someone can add in the formula - again, if it exists.
So, this all centres around a code allocated to our clients and a declaration that they complete. Say client code "Apple1" (col E) sends in instructions to pay on a position of "650,000" (col F). Within our existing spreadsheet we have an available position of "800,000" which can be seen by totalling column G for client code "Apple 1".
So that's the first requirement - for all rows on my existing spreadsheet for client code "Apple1", I want to add the cumulative total of column G ("800,000") I'd like this captured in column H, as per my example.
We can then make payment based on their declaration, up to their total available amount. However, we need to pay them in stages according to our existing allocations (col G). Therefore, taking the first example, their declaration show's an available position of 650,000, their total position is 800,000 and the available nominal amount for that row (col G) is 200,000 - so they can be paid on that full amount therefore, 200,000 should be shown in cell I3.
So now, they've got 450,000 left to be paid and cell G4 again shows a position of 200,000, so once again, cell I4 should show 200,000.
The client "Apple1" now has a payment amount remaining of 250,000 remaining but in this instance, cell G5 is for 300,000 - so because the remainder of their available payment is less than the amount in cell G5, we should post the available payment amount in that field - 250000.
Therefore, if you add up all of column I for client "Apple1" it comes to 650,000 - the amount we have on our declaration - even though the total of their available position is 800,000.
I've included another client in the mix "Sauce2" who should show 200,000 and 0 respectively in cells I6 and I7.
Is it possible to arrive at the formula result in cell (C9) using only the cells in column A and bypassing the need to have a column B?
I originally tried =MIN(A1:A9)-MAX(A1:A9) as a way to bypass column B and have a single formula but it did not give me the same result. I was thinkging I might need to have a (UDF) but not sure. Thanks Again.
Column A ------------------------Column B-------------------------Column C
A1=2.53 ------------------B1=A1-Max(A$1:A1)
A2=3.52 ------------------B2=A2-Max(A$1:A2)
A3=5.47 ------------------B3=A3-Max(A$1:A3)
A4=6.87 ------------------B4=A4-Max(A$1:A4)
A5=7.89 ------------------B5=A5-Max(A$1:A5)
A6=4.14 ------------------B6=A6-Max(A$1:A6)
A7=3.23 ------------------B7=A7-Max(A$1:A7)
A8=2.10 ------------------B8=A8-Max(A$1:A8)
A9=12.21 ----------------B9=A9-Max(A$1:A9) -------------C9=MIN(B1:B9)
Need to insert two rows, then sum column C and E based on cell value change on Column A.
...then also would like to get the summed value of each total eg,. (starting total should be where last cell should always equal the sum of first calculated cell. D6 = C6, then =C10+D6, and C16+D10, etc...) to be summed with next total down, and so forth to end (See attached)
I have this macro named ABC to bring the name ranges to another worksheet. The name ranges are already saved in the workbook with the below name range. I used "***" so that this formular can go to the last cell that has "***" on A column and it worked untill someone typed "(xxx)" and the range now stops right before the "(xxx)"
=OFFSET(Storage_Team2!$A$1,0,0,MATCH("***",Storage_Team2!$A:$A,-1),37)
What would be the best to create the range according to the specific words in a column?
i am coloring cells:
Sheets("MySheet").Range("a1:f200").Interior.ColorIndex = 5
i want a dynamic range, so something that would look like this as an excel function:
=OFFSET('MySheet'!$A$1,0,0, COUNTA('MySheet'!$A:$A),6)
i want the equivalent of this programmed (hard coded) into vba
i don't want to reference to a defined name with vba, because the user can delete that.