I have an update summary macro which takes certain cells from certain sheets and displays this data in a summary workbook.
One of the columns, called status runtime pulls cell J5 of each of the sheets which is a formula =TODAY()-J4 for example.
The problem I am having is that when I open the summary sheet from one day to the next, this particular column is not updating. To update the column I have to go into each individual sheet and save so that the TODAY formula updates the value of the cell, and then thus the summary sheet value.
Perhaps I should avoid putting the formula in each sheet and make a formula behind the summary sheet which takes the value in the status runtime column and subtracts TODAY() from it, then it would update as and when the summary sheet is opened.
I am trying to find some VBA that will allow protected cells to be updated when a user enters or selects data in other cells.
For example:
Cell 'A1' starts out blank. Cell 'B1' has a drop down to select specific items. Cell 'C1' is the date of the order and is a locked cell. Cell 'D1' is the date of completion and is a locked cell. The worksheet is protected to prevent direct changes to cells C1 and D1.
If a user enters any information in A1, then C1 displays the current date. If a user selects 'Complete' from the drop-down list in B1, then D1 displays the current date. Both of these actions are independant of one another. This format is the same for every cell in the 4 columns indicated above. I thought I was able to do this in another spreadsheet I created a year or so ago but I have not been able to figure out what I did and I do not have the spreadsheet to look at.
I have a macro written that pulls data off another workbook and places it on a sheet on the my main workbook. The macro is set to auto filter based on whats in Column 1. The code for this is below:
Now what I was wondering is there a way for it reference say cell I12 on sheet2 in the main workbook and pull that data instead when the macro is run via a button. The number listed is a date code so say we change it too "201503". I would like to pull all those dates instead of the ones for "201504".
I`m trying to work out the best way to propogate a cell's format accross an entire range. What I ultimately want is for a user to only have to change the text colour of one cell, and for the entire row to immediately change to the same colour with it. Even if this means always having to update for example the cell in column A to change the text colour accross that row.
In sheet 1, there are two columns, Category and Subgroup. The cell validation for Category is pulled from the category list on sheet 2. Basically, what I want to happen is depending on what is selected as the category, only the related sub-groups would be populated in the sub-group validation dropdown list. In other words, if Fruit is selected as the category, I only want Apple, Orange, Pear, Banana, etc to be in the validation drop down list for the sub group. If vegetable, then only Corn, Green Bean, Cucumber, and Peas should be shown.
I've included two options for the relationship list as I'm not tied to either style and not sure which would be easier to work with.
I am attempting to update a column of numeric values based on finding and validating record IDs in two different worksheets. So for example if in worksheet1 in column 'C' the ID is 1234ETC and in worksheet2 1234ETC is found then I want to update worksheet2 in the corresponding cell for that record ID in column 'J' with the information from worksheet 1. So far I have been using a routine like the following to go through and compare the ID's but now I need to update the other cells in column 'J' reveiw the following and see if there is a way to improve upon this.
Sub UpdateCommitmentAmtsFromImport() Application.ScreenUpdating = False Dim bottomC1 As Integer
i want to update values fon an excel sheet on a month by month basis. So i have jan to dec folders and excel sheets under each folder , i want to update my monthly forecast sheet based on the numbers in the folder I want to just change the cell in my monthly forecast sheet to Jan or Feb and the values should be pulled from the closed excel files in the monthly folders. I tried concatenation but it gave me #REF .. Is there a way to do it other than using "pull" ??
I need to copy rows to sheet1 to sheet2 which matches with today's date. The code dosen't work wit date. I have attached ScreenShot of excel file.
Excel.JPG
HTML Code:Â
Function Data(strFrmSheet, strToSheet) Sheets(strToSheet).Select Range("B2").Select Sheets(strFrmSheet).Select Range("B2").Select Do While (Not (IsEmpty(ActiveCell)))
Let's say that in column A I have numbers,"Yes" and "No". I want in column B to have only the numbers from column A, in the same order without any empty ranges, and everytime I add in column A a new number, column B to update automatically with that number. Let's have an example:
A B Yes 12 12 13 No 10 13 No 10 Yes
And if I want to add in column A: A B Yes 12 12 13 No 10 13 25 No 15 10 Yes 25 15
So the column be will update automatically. I already tried =IFERROR(INDEX($A$1:$A$10,SMALL(IF(ISNUMBER($A$1:$A$10),ROW($A$1:$A$10)),ROWS(B$1:B1))-ROW($A$1)+1),") but using this many times get's my file very heavy and the excel is working slow.
I am trying to project the next 12 month-end dates, based on today's date. I can do that using the EOMONTH function ... see exhibit below ... present month, 1 month out, 2 months out, last month. However, this workbook must be sent to many people and many of those folks will not have EOMONTH functionality because that requires the Analysis Toolpak functions to be added in. How can I accomplish this using standard Excel functions?
I have the current code that opens our raw data file and copys it into my workbook. However it now turns out the file is saved everyday as a new file with todays date on the end. Here is my current code:
I managed to create some code that will connect to a workbook and take the data from there.
It is kind of SQL mixed with VBA. I just got this by finding it in google (I don't have the link handy now).
What the file does, is it will take 2 columns from a workbook called "Test.xls" and then take out 2 columns "Name" and "ID".
The only thing is, this is only a test and not the actual files I need to open. the files are always saved on the same folder, but the name is the day of the export of it. So when I export a file today, it will get 2014.09.10.xls. The sheet (only 1) will also get that name.
How could I change the below code that it will take that file based on today's date and read from the sheet with today's data?
VB: Sub sbADO() Dim sSQLQry As String Dim ReturnArray Dim Conn As New ADODB.Connection Dim mrs As New ADODB.Recordset Dim DBPath As String, sconnect As String 'DBPath = ThisWorkbook.FullName
I have a column C with different text in cells (item's title). Column D - relevant description for each of the items. 100+ rows.
Now, unfortunately, often a spreadsheet with items is updated with many new items. So I get a new spreadsheet with old and new items mixed. I need, somehow, to import descriptions of the old items (Column D of the old spreadsheet) to the new spreadsheet from old spreadsheet. So I want excel to look for old items in column A of the new spreadsheet and, once found, insert a description in the column B from old spreadsheet.
I have a basic formula =C17+'Asset Depreciation 2008 Onwards'!C24, and I want to copy it down just using the drag function. Problem is that the second reference range of cells are in rows and hence when I copy it down it doesn’t automatically update the cell references because it want to update them by column number instead of row number. IE I want it to display =C17+'Asset Depreciation 2008 Onwards'! D24, instead of C25. Do you know if there is any way of telling Excel that I want it to increase the column number by 1 every time, instead of the row number for this part of the formula?
I have made the macro that does as ,soon as i open the file, select today's date but only if date is in sheet5... sheet 5 is may so it works. Doing the same job for every sheet in the file.
I have a column of dates formated DD/MM/YYYY in column H in one sheet. I need a formula that if a cell in H is more less than 30 days from today's date to display the value from an adjacent cell.
example:
Data source table *Serial #ID #TempExp date9384-63838QDYHEISAV4 YES01/18/201010384-78618PDQA7O7FUO yes11/18/200911384-78708QKM5XA12BK yes12/25/2009 Excel tables to the web >> Excel Jeanie HTML 4
I need a formula that will, if the exp date is less than 30 days from today, place the serial # in a cell on a different sheet.
I'm looking to combine today's date and a string in the same cell. This is what i've come up with:
The problem is that this gives today's date in a numerical value rather than in "short date" form like I want. If i format the cell as a date it doesn't change anything.
Whatever the method, for what I'm doing it has to take place in on single cell.
I have one cell that I have formatted as a date in the following format:
January 16, 2007
In CELL A3, I would like to have excel calculate the number of days between the date in cell A2, and today's date (preferably having the cell auto-update as today's date changes).
For instance, the value in A2 will remain constant, however today's date will change. On January 17th, I would want cell A3 to have a '1' in it. On January 26th, I would like cell A3 to have a '10' in it...
Upon opening a spreadsheet, I would like a macro to highlight the cell which contains todays date. This will be selected from a range of dates which are already populated in column B. Is it possible to have a macro which can select the cell in column B which contains today's date? If possible, please could you include the code for doing this upon opening the spreadsheet. I'm not too confident about that either!
I've got the following function that check if each cell has a date greater than TODAY(). If result is true, it'll display "NO GO". Otherwise, it'll display "GO".
I would want to improve on it such that if any of the 'B5:F5' cell is empty, it'll display "Incomplete" instead of "No Go".
I'm starting a project where Excel will be used as the main UI for defining a table of data. I'm expecting to define a "template" - xlt i guess - that users can open and save as an xls, without over-writing the template. Users will populate the spreadsheet with a lot of help from user defined functions. I'm just getting started and would like to populate a particular cell with the current date, but only the first time the sheet is opened. I tried checking whether a cell was empty before assigning a value to it, of course this meant recursion!
Also: It might be nice to use the Today() function inside a UDF, but TODAY isn't a member of Application.WorksheetFunction - is there no way to reference TODAY() from within a UDF?
I've been using the following code and would like to add another IF that checks the value of a cell to see if it holds today's date.
Code: If Range("E" & CStr(LSearchRow)).Value "Closed" Then If Range("E" & CStr(LSearchRow)).Value "Closed w/o Customer Confirm" Then 'Select SR in Sheet to update Range("B" & CStr(LSearchRow)).Select
[Code] ......
I tried to modify it to...
Code: If Range("E" & CStr(LSearchRow)).Value "Closed" Then If Range("E" & CStr(LSearchRow)).Value "Closed w/o Customer Confirm" Then If Range("AK" & CStr(LSearchRow)).Value "=today()" Then 'Select SR in Sheet to update
[Code] ......
I've tried a couple of other things but no success
I’ve been searching the forum but am struggling to find exactly the information I need!
I’m trying to get a column of cells to update with the date that the cells contents change to “Y”. I had been using the formula =IF(I7="Y",TODAY(),"-") in cell J7 but this updates the date every day. I need this date to remain the same as when it’s first populated.
I’ve been trying to cut and paste text from existing posts into the Visual Basic code but am new to this so am not getting the results I need. I had tried:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) 'will put date in column B when something is put in A If Target.Column = 9 Then Target.Offset(0, 1).Value = Date End If End Sub
But this caused all sorts of problems! I then tried messing around with:
Option Compare Text Private Sub Worksheet_Change(ByVal Target As Excel.Range) On Error GoTo enditall Application.EnableEvents = False If Target.Column = "I" Then If Target.Value = "Y" Then Excel.Range("J").Value = Date End If End If enditall: Application.EnableEvents = True End Sub
But this doesn’t work either. In fact, both these codes are probably riddled with errors as I’ve been trying to learn by trial and error!
I want to take a timestamp and make a condition. that condition would be if that timestamp is greater then 30 days from entered then highlight that cell field. Can some one shed some light on how they would be written.
There are dates in column C and I need to count how many days are coming due within 90 days of each date based on the today() function but do not exceed the 90 days.