Not sure what I'm doing wrong here but I think my syntax is wrong, here is the
Sub CalculatSG()
Dim FinalRow As Integer
FinalRow = Range("C" & Rows.Count).End(xlUp).Row
Range("BU5") = "=(BT5/100)*AE52"
Range("BU5").Copy
Range("BU5:BU[" & FinalRow & "]").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
My objective is to apply the same calculation to the range of cells; the range may change which is why I have defined FinalRow and passed this as a refernence.
I have a drop down list that shows phrases for different math functions, like "divide by 2," "divide by 4," divide by 8," etc. When one of these items is selected, I want it to perform that specific calculation on a range of nearby cells.
However, I also want the user to be able to see the original value of the cells if they select "show original value" from the drop down list.
I have attached a workbook as an example. I think macro would probably work best.
How do I change this formula to represent a range? I want cells C2:C18, but I ran out of arguments - can't add any more. If DRC or Production shows in the column, I want the word "Outstanding" if not, I want the word "Completed" .....
I have used VBA to apply conditional formating to a range of cells. i.e if cell B14 <>"" then row 14 is pale blue untill cell V14 is populated with the time then it removes the formating. One criteria is that if Q14(21/08/06 20:00)>NOW(AA2) and < NOW+1(AA3) then Row turns green(i.e. is due in the next 24 hrs).
Problem is that this formula is applied after a field is updated. When 21/08/06 20:00 comes and goes the row remains green unless I update one of the fields along that row. What would I have to do to make the formating change back automatically when the critera is no longer being met. Here is my codethere are 2 other if statements similar to this with in this code but this is the only part that shouldn't require any user input for the formatting to occour)
Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "B13:AP162" On Error Goto ws_exit: Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then With Target If Me.Cells(.Row, "AP").Value = "YES" And _ Me.Cells(.Row, "Y").Value <> "" Then Me.Cells(.Row, "B").Resize(, 30).Interior.ColorIndex = 43 'mad green Else End If End With..................
I have an excel spreadsheet that performs a particular calculations using a large set of data. However, I have over 1000 sets of data that need to be feed into this sheet and obtain the output calculation. Obviously I don't want to have to copy and paste in each new set of data to obtain my result as this would take a very long time. I am brand new to VBA, so was wondering if there is a way to write code in VBA that will automatically perform these calculations for one data set, save the output into a cell, and then move to the next data set and so on?
I don't want my sheet to auto calculate every time I change a cell that has nothing to do with the range I want to calculate. What would be the code to only have auto calculate run in range("A13:L17") when a worksheet_change happens in range("A13:L17").
I have some data A2:A1000 where there is a start date in column D and end date in column E (formatted DDMMMYYYY). In column F I have a formula that calculates the NETWORKDAYS between the dates.
What I want is a set of formulae that will look in column D for a date between 01/01/2013 and 31/01/2013 (or any date I specify) and find the 'MIN', 'MAX' and 'AVG' of the values in column F where the date in column D matches my criteria.
What I can't figure out is how to offset from the cells matching the date range!?
I am looking to get a formula based on my spreadsheet attached
I want F column to add 5 days onto whatever date you put in there then correspond it to the matched date period in I2-I6 then apply the pay period from H2-H6 and put it in the G Column next to the date that has been input?
I recorded a macro in which I applied a conditional format to a range (the selection).But, when i replay this macro, the conditional format is only applied to the first cell in the range. This can be seen in the "Manage Rules" dialog of Conditional formatting, where the "applies to" column shows only one cell, even though a range of cells was selected by the code.
I set a breakpoint at the first line of code here, and confirmed that the selection is correct, and indeed it is, as in the immediate window, ?Selection.Address correctly gives "$O$6:$O$21".
why the conditional format ends up only applied to cell O6 after the code runs?
"How can i apply a conditional format to a range of multiple cells, based on an expression, using VBA?"
Note that my range is within a PivotTable (but still, this works fine in the UI when i record the macro and the conditional format is correctly applied to the entire selected range).
I'm using the code below to create sheets and copy pertinent data for each value found in column O on my data sheet.
Code: Sub CreateSheets() Dim WBO As Workbook Dim ThisWS
[Code]....
What I'm now trying to do, is apply a formula for each cell, in columns C:N for each newly created sheet. The formula is 'The value of 100 minus the value of the cell'.
I've tried adding
Code: cell.Value = 100 - cell.Value to differing points of the script but I recieve a 'Type mismatch error.
I'm looking for the least amount of code to apply a border around every cell in a selected range. The standard With Selection approach is to go through six times for the sides, top, bottom, and insides, which results in a lot of code.
I attempted a single code line approach (Selection.Borders.LineStyle = xlContinuous), but I cannot seem to influence the color or thickness of the line. I'm not looking for fancy here...standard xlThin in black color is all I need.
I find it to be a little irritating that I have to remove the autofilter, then reapply it whenever I start entering data into a new column. I want a macro that I can assign to a button so all I need to do is hightlight the range of cells I want to apply the autofilter to, and click the button.
I have a worksheet that I use to check invoice prices, which automatically indicates to me if any prices have changed, by using conditional formatting. For example, Column A contains original/current price. Column B contains new price (which I enter by hand and is calculated to round off, etc via other cells). If the price changes in B, a simple formula in Column C shows the new price and uses conditional formatting to turn the cell yellow so I can see that it needs to be changed in our system. However, we also must account for shipping charges on our invoice - which change with each order. So, when calculating new price, I also add shipping costs. This same setup repeats for every row of items.
My question: if I change the shipping, but only change the prices on a few rows, the prices on ALL the rows change because of the new shipping. Is there a way to say, select that only certain cells were (received with new price) and have the changes apply to only those cells?
Example:
Row 1 Cell A: current price including shipping from last invoice (which is calculated in several other cells to include shipping, round off, markup, etc) Cell B: changed price (from invoice) Cell C: compares A and B using =IF(F9<>H9,H9,"") and applies conditional formatting if price changed.
Row 2 (repeats)
If we only get a new order of row 1, the shipping changes. But I DON'T want row 2 to change it's price, since the price did not in fact change.
So basically, what I want is to be able to check off, or select, only the rows that come with latest invoice.
I attached a sample worksheet. Excel Forum example.xlsx
I am looking to get a formula based on my spreadsheet attached
I want F collumn to add 5 days onto whatever date you put in there then correspond it to the matched date period in I2-I6 then apply the pay period from H2-H6 and put it in the G Collumn next to the date that has been input?
i used excel as a calculator but when i needed to make some effort to reach a solution for my problem it let me down, so i will write my problem i have a record in my data base and i want excel to look if the record is in another range and apply some maths. so i wrote this formula
Any way I can get an equation to only apply to cells with information in? E.g. I have two columns, one with 'disposal dates' in and the other with 'extended disposal dates'. I would like to get the difference between them (Extended disposal dates- disposal dates) however not all of them have an extended disposal date, therefore some cells display as '#VALUE!' because its calculating the disposal date-blank cell....
I have data in columns that I want to create charts for. However, this data is dynamic and the number of cells where there is data varies. The rest of the cells that don't have numbers have 0s, however if I applied a macro to the whole column all of the zeros would show up in the resulting charts. How can I create a macro where I can highlight just the cells (the ones with non-zero numbers) that I want a chart to be generated for. Or is there a way to ignore zeros/blanks completely in the macro?
Example: here are two columns with data. I want to make a macro that creates a chart by just highlighting the actual numbers and ignoring the zeros.
I was wondering if is possible to apply a conditional format rule to a range of cells only when certain other cells outside of the range are the active cells. eg row C4-J4 has a conditional format to identify duplicates from range C5-C10, but I also want the same conditional rule to apply separately and uniquely if the active cell falls within the next active range D5-D10. So basically only apply conditional formatting separately and uniquely as the active cell moves its way across the columns?
i m trying to set up a macro to convert a range of user-highlighted(selected) cells to 3 significant figures: for example, convert 0.135564 to 0.136
the equation i found elsewhere online: ROUND(xx,3-(1+INT(LOG10(ABS(xx))))). but i can't quite figue out how to apply the equation to a selected range of cells via a macro.
I want to apply a score to the time cells ( decimals ) Basically i want to apply this set of criteria to a Row >
IF LESS THAN 0.00694 (10mins) then score 3 IF LESS THAN 0.01388 (20mins ) then score 1 IF BETWEEN 0.01388 & 0.9811 (20mins and 23:40:00) then score 0 IF GREATER THAN 0.98611 (23:40:00 ) then score 1 IF GREATER THAN 0.09930 (23:50:00) then score 3
I have a excel sheet from a supplier of mine, that has a mixture of text, and numbers and more importantly "Custom format cells" that have prices in them. I need to apply a multiplication formula to each price, but they are all in different rows and columns, and it will take forever to type a formula into each cell.
Is there a way that if I can select all these cells, to add a global formula that will update all these cells?
Column b in sample is conditionally formatted based on it's values. I want to also apply that same formatting to the person's name in the chart in D2:I9. For example, Jeff is in bottom 50% so cell B2 is shaded red with red text. I would like to apply that same red shade and red text to all the cells in my chart that say Jeff. Also, as example, all of the cells in my chart that say Kelsey would be formatted with green shade/green text and so on...
I'm looking to see if there is a way to take the decimal place formatting of cell and apply it to other cells.
For example, if someone types in 0.0001 into a source cell, I'd like to take that decimal formatting and apply it to other destination cells. This way when values are typed into those cells it will automatically display 4 places past the decimal, no matter what the value. ie 50 will display 50.0000