I am trying to trigger a Sub if the value of a cell change. I came up with this which work fine when I type in a new value BUT if the cell is a formula and the value change without editing the formula then nothing happens
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("L14").Address Then
Selection.AutoFilter Field:=3, Criteria1:=Target.Value
End If
End Sub
I have a range (J:M) that contains a conditional formatting with more than 3 conditions. It is based on a script I found on this site but the problem is that the colors don't change unless I edit the cell.
I need to edit all cells in this range at once.
How can I do that? Basically it could do a loop through all cells in the range and "F2+enter" but it seems to be a very "stupid" way to do it.
How can I update the cells in the range in a better way?
I was wondering if there's a way to add a formula to calculate week over week % change automatically every week when I enter in new data. see the attached excel file for reference.
What I would like to have is the ability for the formulas in c5 and f5 to be able to auto-update to the newest week and the previous week's data instead of manually having to update it each week. So if I were to add a new row with data for week beginning 12/2, the formula in c5 and f5 would automatically update to calculate the week over week variance. I tried researching prior to asking the question on this forum, and I think it may be possible to do it using the index match function, but I'm not sure how to apply it in this case.
I'm using Excel 2007 to keep a database of daily settlements for financial futures as well as a variety of studies for these daily values. I want to have one page that I can print every morning with the relevent information for the day. So what i'm trying to figure out is how to make the cell on my "Settlements" page always read the last cell of my data column or find the average of the last five cells, for example.
View 9 Replies View RelatedI am having trouble writing a code for something I need to do. There is a workbook with a worksheet for each month. At the start of every month a new worksheet is added. The opening data in this new worksheet is coming from the closing data of previous month, and some of this data is modified as the month passes.
So, in a way, some of the data for each month depends on the data of previous months. If there was an error in one of the cells, for say, January, and it was corrected manually, it will affect the cell values for feb, march, and so on. Currently, its all a manual process - from copying previous month's data to a new worksheet, and manually correcting errors in each worksheet, which is error -prone and a time consuming process. Is there any way to link each month's data and create an "update values" button clicking on which will update the values for cells in every month's worksheet following the one which had errors in it and was manually updated. It has to one directional.
I have two sheets in my workbook. One named singledump and the other individualfileselect.
Within single dump i have daily data loaded with certain cells containing comments added for that day of the week.
E.g. Tuesday 3000
Below average clearances, we will look in to this further throughout the week.
What i would like to do is have either a text box area of just simply one cell updating with a the first comment from the week and to then have two buttons back and forward allowing the user to click and the cells will update for the next comment that week or go back to the comment before.
How would i be best going about this? To be honest i would prefer to keep away from text boxes and would be happy with just the two buttons scrolling through specified ranges to update a cell on individualfileselect sheet.
I'm using this to update a range of cells after an automatic copy and paste procedure;
Code:
Sub UpdateBtoW()
On Error GoTo HandleError
Application.Calculation = xlCalculationManual
Sheet74.Activate
Dim cell As Range
For Each cell In Range("B1:B50000")
If Not IsEmpty(cell.Value) Then
If cell.Offset(0, 14).Value = "" Then
[code].....
What it is supposed to do is look in column B and find any non-blank cells. If it finds one, it should check the following and update column W as necessary;
1) Column B shows 1, column P is not empty, column W is empty - UPDATE COLUMN W WITH 'Letter 1'
2) Column B shows 2, column P is not empty, column W is empty - UPDATE COLUMN W WITH 'Letter 2'
3) Column B shows any value, (not blank), column P is empty, column W is empty - UPDATE COLUMN W WITH 'N/A'
The issue is that it is updating the cells as required, but it then goes on to fill the entire sheet with 44819 in every single cell.
Let's say that row a,b,and c contain a list price, discount %, and discount price respectively. I want to be able to change either the discount % and it will recalculate the discount price or change the discount price and it will recalculate the discount %. So to put it more clearly:
cells in row A: Contain the List (undiscounted) price. This will never change.
cells in row B: Will be a discount %. It is equal to:
(list price - discounted price)/list price. needs to be recalculated if discounted price changes. Also, it should only contain data if the cell in Row A - list price - contains data.
All cells in row C: Will be a discount price. It is equal to:
(1-discount %)*list price. needs to be recalculated if discount % changes. Also, it should only contain data if the cell in Row A - list price - contains data.
I have the below formula working correctly. However the issue is when it pastes and fills down values its using H1 reference in the formula even when it goes to the next column. So basically when it goes to cell I2 it should update the sumifs formula to lookup I1 instead of H1 and so on and so forth for all columns till the loop stops.
VB:
Sheet1.Activate
Dim frmla As String
frmla = "=SUMIFS($C:$C,$A:$A,H$1,$B:$B,$G2)"
Range("H2").Activate
Do Until ActiveCell.Offset(-1, 0) = ""
ActiveCell = frmla
ActiveCell.Offset(0, -1).End(xlDown).Offset(0, 1).Activate
Range(ActiveCell, ActiveCell.End(xlUp)).Select
Selection.FillDown
ActiveCell.Offset(0, 1).Activate
I am using the Format as Table feature in 2010 and I am summing a range of cells (C2, D2 and E2) with the result in F2. I have linked F2 three rows below the table in cell C5.
When I add new data in the 3rd row in the table feature I can get an updated result in F3 but my linked cell does not update as it is now pushed to cell C6.
How can I have the linked cell update with the new total from cell F3 as it moves relative to the table?
I have in cell A2 a number, and my VBA is as follows;
If Target.Address(0, 0) = "A2" Then
Application.EnableEvents = False
Range("a" & Rows.Count).End(xlUp)(2).Value = Target.Value
Application.EnableEvents = True
End If
This basically adds any new number typed into cell A2 into a list which starts in A3 then continues down through column A.
I also have another part of my VBA which says;
If Target.Column = 1 Then
Application.EnableEvents = False
Cells(Target.Row, 2).Value = Date + Time
Application.EnableEvents = True
End If
This part works fine and adds a date stamp to my blank cells in column B whenever I manually type anything into column A, however, when the first part of the VBA works the date stamp is updated into cell B2 and I want it to update next to the new entry that has just been added into column A by the first VBA doing its job.
I think I need to change;
Cells(Target.Row, 2)
To something that refers to a Range of cells (would be B3-B5000 for example) but my knowledge on how to change that part of the VBA has now ran out!!
I'm currently using Excel 2007 to get information from closed workbooks and updating my file.
First of all I create a table on selected range through "Insert table" command having something like this:
Then I have I piece of VBA code that tries to update every single cell of a column in this case it's updating %LD10 column:
But like you can see in first capture, the code updates every single cell with last value of variable fichero, having, at the end, the same value in whole column.
Cell A1 value is: www.yahoo.com B1 Value should automatically show "Possible"
Cell A1 value is: www.icallindia.net B1 Value should automatically show "Possible"
Cell A1 value is: www.jigarparekh.html B1 Value should automatically show "notvalid"
I need a formula which can automatically see the status of the website address and updated in B column. which means that one dose not need to go to the website page to see if it is correct or not.
I have lot of website in the one sheet and i don't want to go all this website and check if they are correct. I want the status of this website in b column once when i have the website name already in the A column.
I have a series of worksheets, named, 'sheet1' 'sheet2' etc. through to 'sheet10'. A final worksheet, 'sheet11' has been produced that uses the formula: address=Sheet1!A1, address=Sheet2!A1, address =Sheet3!A1 etc. The same goes for other identical cells on each of the sheets. I am at the moment entering each cell on 'sheet 11' separately because if I copy the formula down it progressively changes the cell value and not the sheet number. How can I produce a formula whereby the cells remain identical but the sheets change progressively?
View 4 Replies View RelatedI am trying to drag down a formula (see below). the cell reference A6 and E6 is not updating to A7 and E7 etc etc when i drag the formula down using the corner thing. it remains constant at A6 and E6.
=HYPERLINK("#INDEX('Shipping Tracker Week X'!$F$4:$F$3000,MATCH(1,('Shipping Tracker Week X'!$B$4:$B$3000=A6)*('Shipping Tracker Week X'!$D$4:$D$3000=E6),0))","Link 1")
im pretty sure the problem comes down to the hashtag and quotation marks that i added, as the formula properly increased the cell references when i drag down without the hashtag and quotations. however, i sort of need it because adding those seems to be the only way i can get the hyperlink to link me over to the other sheet and to the correct cell containing the hyperlink.
part 2 of problem: the hashtag and quotations is currently a workaround method for me. the original intention was for the hyperlink to directly link me to a website, which is referenced from a separate sheet. however, without the hashtag and quotations, i get a "Cannot open specified file" error.
I need to record time next to eg.: W3 cell,
Now I'm using below formula :
=IF(W3<>"",NOW(),"")
but the NOW function keep updating time itself, is there any VBA code or function that I can use with this formula ?
As i am working on consolidating the Missing numbers manually, whether will it possible for making this automatic.
In Column "A" I have Multiple Duplicate Invoice Numbers and followed by the Different Transcation numbers in Column "B".
In Column "D" I have Each Invoice Numbers and in Column "E" Total Transaction Numbers i.e., no. of times each Invoice have Transactions.
In Column "F" No. of times we received the Transactions.
Here i need to manually need to update each Invoice's Missing Transaction number in Column "H" in single cell with comma separated to each Missing Transaction numbers.
Example:
Before : (Column "A" & "B")
Invoice NumbersTransaction NumbersInvoice NumbersTotal Transaction NumbersReceived Transaction Numbers
A2014000351501 A201400035150 3 2
A2014000351502 A201400035494 13 12
A2014000354941 A201400035881 12 11
A2014000354942 A201400035884 19 17
A2014000354943 A201400035888 14 13
A2014000354944 A201400037613 5 1
A2014000354945
[Code]...
Instead of doing this manually can we have the VBA to auto Update these missing numbers.
Here by i am attaching sample file.
i am trying to figure out, how to automatically update time, based on specific city's time zone? Lets say, if the city is dallas, time zone is Central GMT-6. In the next cell, the time shows up as Dallas's local time, instead of local computer time. And this time updates itself after every 2 min.
2ndly, if that city's time is later than 8:59 PM local time, that specific city's cell grays out.
Attach: Snapshot of sheet
I need it to be like:
=B10 2014
(So the first part changes depending on what B10 is but the 2014 always stays)?
I am trying to read a value in cell A1 and make say cell B1 read the same. The data in cell A1 is a real time percentage value that gets updated every lets say 10 secs. Every time the data is updated the new value goes into the next cell A2, A3, A4..... and so on. Every time it gets updated (i.e into A1,A2,A3,A4.....and so on), I want to read the new value each time in B1.
View 9 Replies View Relatedi have some existing code which is trigerred when anything is input into column c. The code then adds various information in another three columns. One of which pastes a vlookup formulae, and i would like this forumlae pasted into the column c cell which i initialy edited, in order to remove the requirement for one additional column.
The existing code i have is:
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim MyText As String
MyText = Environ("username")
If Target.Cells.Column = 3 Then
With Target
If .Value "" Then
.Offset(0, 2).Formula = "=VLOOKUP(D:D,'P:TAOffshoreTAOffshoreTreasuryRecsGeneralCommit ID''s for control Sheet - Do not move or delete[commit ids - DO NOT DELETE OR MOVE.xls]Sheet1'!$A$1:$B$65536,2,0)"
[code].....
I have tried changing the offset to (0,0) or changing the offset to 'target = ', which does add in the vlookup but then the macro debugs at the 'If .Value "" Then' code?
Im trying to use an event change to change the sheet name based on a cell value, but my issue is how can I error trap if the sheet name is a duplicate? Here is what I have so far
Sub ChangeName()
On Error GoTo errhandler
Sheets(1).Name = Sheets(1).range("d10")
Exit Sub
errhandler:
MsgBox "sheet name is already exists"
End Sub
I have below formula.i need to change the cell address AK in the below formula on the value change in the A3.
=SUMIF(Working!$D$6:$D$3000,Report!B3,Working!$AK$6:$AK$3000)
For example if A3 is having value AZ i need the formula changed automatically as below
=SUMIF(Working!$D$6:$D$3000,Report!B3,Working!$AZ$6:$AZ$3000)
I have a drop down sub pasted to worksheet:
Private Sub ComboBox1_Change()
ComboBox1.List = Array(100, 200, 300, 400)
If Range("I11").Value < Range("N11").Value Then
If Sheets("Profile").Range("K18").Value < ComboBox1.Value Then
Range("I11").Interior.ColorIndex = 2
Else
Range("I11").Interior.ColorIndex = 3
End If
End If
End Sub
I want it to change the cell color on drop down change. How can I modify things to have the change in drop down selection?
I have a simple bit of code that fires some code when it detects a change in cell $P$5 but it doesnt work and I cannot understand why - can anyone assist with this one? I am very green but keen:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$p$5" Then
Range("D9:D81"). AutoFilter Field:=1, Criteria1:="<>"
End If
End Sub
I want to edit a cell's value without changing the formula the cell contains.
View 10 Replies View RelatedI work for a UK charity and have a list of funders in an Excel 2007 spreadsheet.
One of the columns refers to the date on which a new application for funding can be made to that particular funder.
In many cases new applications for funding can't be made for 1 or more years since the last application - sometimes as many as 5 years later. How to get a cell to refer to the date that it contains.
For example, say I have in cell A1 "The Acme Funding Organisation" and in cell B1 (i.e. the "Reapply when?" column) a date of 01/04/2013 (British date format, i.e. 1 April 2013) then what I want Excel to do is to look at the date in cell B1 and if that date has been reached to highlight the cell red. That way I'll know that the reapply date has been reached & that a new application can be made.
I am trying to create a sheet in XL 2010.
In Column A each cell will contain a date (differnet from other cells in that column) when inspection was last done.
Column B is when the weekly inspection is due.
Column C is when bi-weekly inspection is due.
Column D is when monthly inspection is due.
Column E is when 6 monthly inspection is due.
I need a formula to change the colour of cells B, C, D & E when each inspection is due depending on the date entered in A
I am hoping its possible that the cell colour can stay for 2 days after the due date and then return back to blank after the second day.
For example if cell A1 has a date of January 1 2013 then on January 8 2013 cell B1 turns red then on January 10 2013 the cell returns back to normal.
A1
B1
C1
D1
E1
Inspection Date
Weeekly Due
Bi-WeeklyDue
Monthly Due
6 Monthly Due
January 1 2013
Change red Jan 8 & return blank Jan 10
Change red Jan 15 & return blank Jan 17
Change red Feb 1 & return blank Feb 3
Change red June 1 & return blank June 3
Ive also attached the worksheet
I have the the following spreadsheet: [URL] My formula in Columns A to E is the following:
=IF(ISNA(VLOOKUP(Query1_2[@Branch],Master!A:J,10,FALSE)),"Branch Not Open",VLOOKUP(Query1_2[@Branch],Master!A:J,10,FALSE))
I would like to do the following in Column A: If the date in Column C is greater than today, then Column A must also say "Branch Not Open". I have tried the following:
=IF(ISNA(VLOOKUP(Query1_2[@Branch],Master!A:J,10,FALSE)),"Branch Not Open",VLOOKUP(Query1_2[@Branch],Master!A:J,10,FALSE)),IF(C:C<=TODAY,"Branch Not Open, IF(AND(C:C=>TODAY,VLOOKUP(Query1_2[@Branch],Master!A:I,9,FALSE)))
But Excel does not like the formula at all.
I'm a business/application consultant for ERP software, and generally pretty solid when it comes to excel. However, I've come across a question for a personal sheet that I can't seem to solve.
In my personal budget worksheet, I'd like to set a budget on a cell-by-cell basis. When the budget is hit, I'd like the text color (or cell color) to change.
I.E. Cell D14 has a budget of $200. When I enter $200 in the cell, the text turns from black to red. I've searched through google with no luck. I have mildly searched this forum, but haven't found my direct answer - I have come pretty close though, in other languages