Calculate The Range And Fill With A Formula Using The New Range
Apr 1, 2009
I have a range of values that are not a constant length. I want a macro that will calculate the range and fill with a formula using the new range. In this example, I need a formula to look at the values in range f464:f471 and calculate the number of values greater than $1000. Column B is a salesman identifier. I can do this manually, but it takes me about 1/2 hour to complete. At every change in "B", I need to place this formula in the open, blank cell in "E" such as highlighted below.
week39
ABCDEF45939SCHTERR-WIEDEMANNDCCDIST-MUSCHANY046039SCHTERR-WIEDEMANNDCCDIST-MUSCHANY046139SCHTERR-WIEDEMANNDCCDIST-MUSCHANY046239SCHTERR-WIEDEMANNDCCDIST-MUSCHANY0463 SCH Total 14042.2146439SCITERR-SULLIVANDCCDIST-MUSCHANY15587.1546539SCITERR-SULLIVANDCCDIST-MUSCHANY7217.2246639SCITERR-SULLIVANDCCDIST-MUSCHANY5316.6246739SCITERR-SULLIVANDCCDIST-MUSCHANY2720.6946839SCITERR-SULLIVANDCCDIST-MUSCHANY520.446939SCITERR-SULLIVANDCCDIST-MUSCHANY195.7147039SCITERR-SULLIVANDCCDIST-MUSCHANY047139SCITERR-SULLIVANDCCDIST-MUSCHANY0472 SCI Total 31557.7947339SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY4190.7147439SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY3219.7647539SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY3187.147639SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY2209.3747739SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY2132.7547839SCJTERR-VANBUSKIRKDCCDIST-MUSCHANY2034.56
Spreadsheet FormulasCellFormulaF463=SUBTOTAL(9,F435:F462)F472=SUBTOTAL(9,F464:F471)
Excel tables to the web >> http://www.excel-jeanie-html.de/index.php?f=1" target="_blank"> Excel Jeanie HTML 4
View 9 Replies
ADVERTISEMENT
Mar 17, 2014
I have a row data corresponding to the measuring of load cell per min and I need to average the values per hour. So I have a column B for the date (from 1-01-2013 to 31-01-2013, column C for the time (0:00:00 to 23:59:00), and D de values per min I want to average. I have to do the same for the rest of the month of 2013 (February, ...., December).
I would like to know if there is a way to create a formula to calculate the average of the first 60 values (to get the average of the first hour of 1-01-2013), and then copy it to get the average of the following 60 (average of the second hour in 1-01-2013) and so on.
If there is no way to do it, I would like to know if I can do it using functions like average, match, index, offset, what would be the best match of those functions.
I also tried it by doing the analysis in another tab and using the function "averageifs" with two criterias: one for the date (example 01-01-2013) and another one for the hour (example 0:00:00), but it didnt work, it show error: #value. I inserted an extra column in the data tab with just the hour (example 0:00:00) in front of the corresponding column with (example 0:01:00, 00:02:00, etc)
Equation I used for this:
=AVERAGEIFS('Data (min)'!D$6:D$43206,'Data (min)'!$A$6:$A$44646,A6,'Data (min)'!$B$6:$B$44646,B6)
=AVERAGEIFS(TAB AND COLUMN WHERE THE RAW DATA IS,RANGE OF CRITERIA 1,CRITERIA 1,RANGE CRITERIA 2,CRITERIA 2)
View 2 Replies
View Related
Mar 6, 2012
I am trying to add the following code to fill in a certain range only if the range is blank. I can get it to fill in with the formula but it will still enter over if the cell already contains information.
Code:
Sub YTD()
Dim isempty As Boolean
isempty = True
For Each cell In Sheets("YTD%").Range("December").Cells
If cell.Value! = "" Then isempty = False
[Code] .......
View 3 Replies
View Related
Feb 6, 2007
I have a formula that is averaging seven (one week) consecutive cells, I want to Copy/Fill the formula down the worksheet for the entire year. Is there a way to use the fill handle to drag down and make the formulas use the next seven colums?
I have removed the $ from the row numbers in the original formula, but when I use the fill handle it fills like this:
=average(B2:B8)
=average(B3:B9)
I would like it to fill like this:
=average(B2:B8)
=average(B9:B15)
View 9 Replies
View Related
Mar 16, 2008
I am in need of a solution (probably VBA) that can fill a range of cells with a formula IF they are blank. Ideally that range is a named range I can define in Excel. If that is too hard, then a hard coded column I hand-edit the script for is tolerable. Also, ideally, this script auto-executes whenever data changes on the sheet.
You formula I will populate is:
=IF(ISNA((VLOOKUP(B33,$A$32:$L$43,12,FALSE))+1),"",(VLOOKUP(B33,$A$32:$L$43,12,FALSE))+1)
..but a simpler formula can be stubbed in.
NOte that it does have relative references, so the script needs to adhere to normal EXCEL conventions of enumerating cell references.
If the script points to a refernce cell that contains the formula that is uber.
Maybe it should do copy and paste instead of a string replacement in order to leverage EXCEL's referencing?
I'm stuck on this, and this would be VERY useful for many of my sheets to be able to point to a refernce cell containing a formula to fill in.
View 9 Replies
View Related
Jan 23, 2008
Here is my array code
Dim Values() As String
Dim count As String
count = 9
For count = 9 To 1800
Values(count) = "=IF(AND(E" + count + "<>"""",AH" + count + "<>0),(AH" + count + "/E" + count + ")*100,0)"
count = count + 1
Next
I'd make it a static array but eventually I'm going to have to set it up where I wont know the upper bound.
Here is the other part of my code that I don't know what I'm doing.
If Range("A9") > 0.01 Then
Range("AI9:AI1800") = 0.01
Else
Range("AI9:AI1800") = Values
End If
I keep getting mismatch errors on the count variable, but I need it to be a string so I'm not sure what do here.
View 9 Replies
View Related
Dec 5, 2013
I have a file wiht 2 sheets, on one sheet I have a macro that opens 25 other excel files and pastes information into the sheet in a specific order. Then on the "main" page I have different calculations based on the information from the other sheet.
The Information is listed in a row so for example B2:M2 or B3:M3. If a value has not been assigned the vcell will be empty (No formula or anything, completely empty)
The Value in the cells will be between 0 and 100 (its a score from 0-100) so in the "main" page I want a formula that calulates the LATEST score (It will always be the first one on the furthest left and the latest one to the furthest right). Is there any easy formula to calculate this?
For example:
----B-----C-----D-----E-----F-----G-----H-----I-----J-----K-----L-----M
2|-10----30----75----85----93----12---12
So in the example I2:M2 is empty so the latest score would be H2 so thats the value I want to show on the main page.
View 5 Replies
View Related
Dec 13, 2012
I have a scorecard that looks something like this:
90% or greater=3
80%-89%=2
70%-79%=1
0%-69%=0
I need the "cell" to react accordingly and I'm lost.
View 2 Replies
View Related
Jan 4, 2013
I have a Training Matrix with "Main", "Leavers" and "Reports" sheets. (can email it but can't upload it here; it's 534kb and I can't make it smaller)
In the "Reports" sheet I need to fill "Site Procedural Training" - "Number of people trained in period".
The periods are :
25/12/11 - 31/03/12
01/04/12 - 30/06/12
01/07/12 - 29/09/12
30/09/12 - 29/12/12
The source of data will be the "Main" and "Leavers". The data are dates in these sheets; each date = 1
The formula needs to look in to "Main" and "Leavers" and if it finds a date which fits in the required period in "Reports" then return it as 1. If it finds 300 dates then returns 300.
View 9 Replies
View Related
Feb 26, 2014
I have attached a spreadsheet which shows my desired result which often works.
Range C2:C13 is my desired result...
The problem /criteria is...
For every 140 meters sold the sales person receives £140 commission.
Meters (range B2:B13) can be carried to future months.
I am looking for a formula for range C2:C13 which calulates if commission should be paid in this month or not and if so, how much.
View 5 Replies
View Related
Oct 10, 2006
I'm looking for a formula, which says if a number is within a range, perform a calculation. I have a table of ranges (0-6000,6001-10000,10000-12000, and so on). My formula looks at the current month cumulative balance, and inserts the value into the line of the range it falls into. However, the formula now contains lots of nested "IF" statements, due to the number of ranges I have. Also, if my cummulative balance is 6005 for example, but was 5005 in the previous month, I would like to see 95 in the 0-6000 row, and 5 in the 6000-10000 row. I making a complete nonsense of trying to explain myself, so I'll attach a quick example of what I'd like to see.
View 4 Replies
View Related
Mar 10, 2009
How can I shift the range of cells I want to calculate an average from? For example I want to get the average of cells A1 to A10, so =AVERAGE(A1:A10) And next I want to get the average of cells A11 to A20, so =AVERAGE(A11:A20). But I don't want to manually change the data or delete rows all the time.Is it possible to do something like: =average(A1+10:A10+10)??
View 4 Replies
View Related
Feb 9, 2010
I need a formula that will return the minimum value from a column range that flexs without having to manually go in an change row references. There is a blank row between each section of data in order to separate info. As an example:....
Need to formula to flex to include rows 5 thru 7 in the first section but expand to include rows 9 thru 13 in the second section. =MIN(A5.A7) works but how do I get next section to flex to =MIN(A9.A13) without manually changing the cell references? There is always a blank row in between the sections to separate.
View 5 Replies
View Related
Jan 2, 2014
I like to create "templates" for files that I work with on a reoccuring basis, just to make things simpler. The current template I am working on tracks items processed by day and is used for two reporting purposes; 1 totals the pay ending items processed so I have the dates laid out based on the 2 week period with formulas for that. The 2nd way it is reported is by the month. Since this is a template, only the first day of the first pay period for a calendar year needs to be entered and the rest of the dates populate based on that date. What I would now like to do is add columns for January - December monthly totals using a formula that will read something like "if column A (where the date is) contains 1/1/2014 - 1/31/2014, then sum up column L" and than copy that formula for the remaining months.
View 8 Replies
View Related
Aug 10, 2008
I have a named range that expands and contracts based upon the amount of data that is in some column. Call it AllData_UsedRange.
I have another named range that actually refers to a range. Call it AllData.
Column A
Row2 56
Row3 44
Row4 65
AllData is a named range that refers to the range A2:A65536
AllData_UsedRange refers to A2:A4 by way of this formula.
=OFFSET(AllData,0,0,COUNTA(AllData))
How to I obtain an address of AllData_UsedRange in VBA code?
These do not work...
ThisWorkbook.Names("AllData_UsedRange").RefersToRange.Address
Evaluate(ThisWorkbook.Names("AllData_UsedRange"))
View 9 Replies
View Related
Sep 8, 2006
I am trying to create a graph for a range of data that updates monthly (adding an extra month each time). I wanted the graph source data to update automatically each time the data is refreshed so used an OFFSET formula to identify a named range. I then point the graph to the named range as the source data.
When I enter the range as the source data the graph picks it up. However, when I re-enter the source data option on the graph it has converted the named range into a cell written range (ie. replaces "=QUALITY" with "='Front page'!$B$7:$J$10" - which therefore will not update when the range increases.
View 4 Replies
View Related
Jul 21, 2009
Starting in cell J2 and down up to J9 - I need to preset the following values:
3
3
7
7
11
11
15
15
Tried a few times but no success. What am I missing ?
View 4 Replies
View Related
Oct 29, 2007
Trying to find a way to fill in a color based on a specified value, up to the last entry.
ie. Within a range ("Range1")T1:T9, anywhere the value is "R" , fill the color red within column P (offset -5 columns to the left) up to the last entry.
..this is something I would like to initiate via button assignment using a VBA script.
eg:
Column..P,.....T
1..................B
2........Red.....R
3........Red.....T
4........Red.....R
5........Red.....V
6........Red.....M
7........Red.....R
8..................X
9..................X
View 11 Replies
View Related
May 27, 2009
Is it possible for a macro to enter the number that is in Range("SYear") into A4, fill that number down 30 rows (31 total A4-A34), then add 1 to the number and put in the next 31 cells..repeat untill the number = Range("EYear"). For example if SYear = 2010 and EYear = 2012, I need 2010 in A4:A34, 2011 in A35:A65, & 2012 in A66:A96.
View 4 Replies
View Related
Nov 8, 2013
I have a button that when I select it, I want it to insert a new column on a different worksheet, enter a numeral, and them fill down to the last column with data. I have the insertion and entering a numeral to work for the button but I can't get the numeral to fill down. I am working with Excel 7 and have posted the code that I have.
Private Sub StepFiveB_Click()
' AddClient Macro
Windows("Final.xlsx").Activate
[Code].....
View 4 Replies
View Related
Mar 24, 2014
I am trying to figure out how to auto-fill a range. I am summing a range from one tab to another, like A1:A5. I want to autofill the subsequent cells to begin with the cell that follows the last of the previous range, so it would autofill as A1:A5, A6:10, A11:15, etc. how to do this?
View 3 Replies
View Related
Feb 24, 2007
My code is extremely slow because it writes a row by row. I am trying to use arrays to fill a range for a problem which is essentilly this:
Let x = 1 to 10
Let y = 1 to 10
Let R = f (z)
f (z) is calculated for various pairs of x and y (coordinates) such as:
(x1,y1), (x1,y2), (x1,y3)....(x10,y9), (x10,y10). I am looking for a code that will fill columns A' and 'B' with x and y in pairs (each x with each y) and values of R in column 'C'.
View 8 Replies
View Related
Aug 16, 2007
I am not even sure if my title matches my problem, but it was the best I could think of. Please take a look at the following code...
Sub Test()
Dim cell As Range
For Each cell In Range("F4", Range("F65536").End(xlUp))
cell.Offset(0, 3) = cell.Offset(0, 2)
Next cell
End Sub
I use similar codes quite a lot. The issue with this is that if I want to add columns or delete columns later on to my spreadsheet, I need to go and change all the previous codes so the columns match up.
My question is, how else can I write a code that has similar functions but with changing references in case I do add or delete columns? I understand that I can define ranges, but I am not sure how I can work with that within a macro.
I am almost sure there are different solutions to this problem, and I would appreciate and be interested in knowing all of them to put them in comparison.
View 9 Replies
View Related
Feb 22, 2008
I have a userform (uf_PaxInput) with a Combobox (cmb_flight_dest) which I am trying to populate from a worksheet range ("Dest") using the following code:
VB:
Sub LoadForm()
With uf_PaxInput.cmb_flight_dest
For Each Item In Range("Dest")
.AddItem
Next Item
End With
uf_PaxInput.Show
End Sub
The code seems to run okay however whent the form loads the combobox drops down to show only blank items to select. These blank items number them same number of items that are in my named range ("Dest").
View 6 Replies
View Related
Jul 25, 2008
The idea is to get for some range (size/location doesn't matter) to fill it's cell with numbers from 1 to number of cells, but it doesn't seem to work.
View 9 Replies
View Related
Nov 24, 2008
Function BG(InRange As Range)
Range("InRange").Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Function
That so far but not quite sure why that isnt working. I want to change the fill color with a UDF that all they do is select a Range and it changes those fill colors to whatever the Colorindex may be. I didnt find anything while searching the forums with this already.
View 4 Replies
View Related
Jun 22, 2009
I'm trying to fill a list with some hard values. When I use the macro recorder it adds formula="choice 1;choice 2; etc", these are all separate values in the list. However if I use this within a macro I only have one option with all three values combined.
View 4 Replies
View Related
Aug 27, 2012
I have to run reports every week where I show the number of days items are pending some sort of action. I use an autofill action in a macro but the number of rows changes every week. Here is the current section of my macro that I use. I just input a row number that I know will not exceed the number of rows required by my data (12900). What can I replace this with (Selection.AutoFill Destination:=Range("J2:J12900") so it will only fill the number of rows current filled in in either row I or K?
Range("J2").Select ActiveCell.FormulaR1C1 = "=R1C19-RC[-1]" Selection.AutoFill Destination:=Range("J2:J12900") Range("J1").Select Selection.Copy Columns("J:J").Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=FalseApplication.CutCopyMode = False
I have a date in cell s1 that I subtract from the date in row "I". I then copy the result of row J and paste it as values.
View 6 Replies
View Related
Aug 21, 2013
I would like to get some code that will fill blanks in a range.
I have not used the board facilities properly. In the following table I need each blank cell in column B to be filled with the text from the preceding cell that has text in it.
i.e. B2 to be populated with "text1". Cells B4:B6 to be populated with "text2".
The code needs to know that row 9 is the last row to populate.
A
B
1
head
text1
[Code] ........
View 8 Replies
View Related
May 30, 2008
I have a spreadsheet that is downloaded from an accounting system and requires extensive editing to be normalized before it is combined with data in another database. To normalize the data in a simple manner, I use the following macro:
Sub All()
Rows("1:37").Select
Selection.Delete Shift:=xlUp
Sheets("DL").Select
Columns("A:D").Select
Selection.Insert Shift:=xlToRight
Range("A1").Select
ActiveCell.FormulaR1C1 = "Check"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Benefitor"........................
It works great, however I would like to not limit my cell ranges for the auto fills. I would like to auto fill to the end of the data, which changes with every download (additional rows).
View 9 Replies
View Related