Insert Date / Timestamp If Target Cell Is Blank?
Mar 12, 2014
I was trying to use a modified version of JBeaucaire's code to achieve the same results within my form. In my workbook I have a a table (called Table27) that ranges from A7:CL109
This is the code I'm attempting to use:
[Code] .....
Column A is where my target cells are... where the user will enter data. In cell CI (the 87th column) I want the Data & Time stamped.
I thought I'd modified the formula correctly, but I can't seem to get it to work.
View 7 Replies
ADVERTISEMENT
Aug 18, 2008
I have a program that automatically exports info into excel as that info becomes available. What I need is to be able to insert into a cell the exact time that the information was inserted into excel. For example, cell A1 gets info inserted into it, I need cell B1 to automatically insert the time that the info was inserted into A1. Any time there is new info inserted into A1, B1 needs to update that corresponding time.
View 2 Replies
View Related
Feb 22, 2010
Every time I think I've got this thing beat, they throw another curve at me!
If cell Q19 is blank, leave target cell blank
If cell Q19 is not blank, return the value of cell E$4
View 2 Replies
View Related
Jan 4, 2007
I have a piece of code that does the following:
In Cell A1 if 0 is entered, it puts a diagonal line through the cell
If in Cell A1 anything other than a 0 is entered, then the the diagonal disappears.
I would like however for the code to recognize that if the cell is blank then to put a diagonal line through the cell as opposed to entering a 0. The code is listed below:
*The code below also does what is described above for cell A2*
_______________________________________________________
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Address
Case "$A$1"
If Target.Value = 0 Then
Target.Select
With Selection.Borders(xlDiagonalUp)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
View 9 Replies
View Related
Mar 21, 2007
I have a spreadsheet containing hours logged against a specific project, all of which have a 'Week Beginning' date.
I would like a macro to insert two rows above a change of date (in the D column). How best should this be done?
It's basically a formatting macro I'm after, to group records by 'Week Beginning' date.
I've spotted a few similar requests, but none of them appeared to include the function to check for a change in date, from the cell above.
View 9 Replies
View Related
May 20, 2013
The code below works nicely to insert a time stamp in column B when the user selects "Yes" in the corresponding cell in column A. The problem is if I try to delete any rows or clear the contents of the cells I receive a "Run-time Error 13 - Type mismatch." If I delete the contents of the cells one at a time I do not receive the error. What I am trying to do is the user has a list of items to select from in column A. Only if "Yes" is selected I want the time stamp in column B to appear.
Code is below.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Value "Yes" Then Exit Sub
If Not Intersect(Range("A1:A50"), .Cells) Is Nothing Then
Application.EnableEvents = False
With .Offset(0, 1)
[Code] ......
View 6 Replies
View Related
Jan 7, 2013
If the value of the adjacent cell in column A is blank, insert a blank row through Column B:J.
View 9 Replies
View Related
Jul 19, 2013
I'm trying to make a directory whenever the macro runs that includes a timestamp. File names cannot include "/" or special characters, so I'm trying to change the format. However, even though NumberFormat changes it, excel still recognizes the date as having mm/dd/yyyy etc. so the directory cannot be made.
Here is a part of the code:
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.NumberFormat = "yyyymmdd-hhmm"
DateTime = Selection.Value
strFileName = "Data Pull"
MkDir "C:..." & strFileName & DateTime
View 3 Replies
View Related
Nov 19, 2013
I have made a table which contains 2 date columns, Both formatted as date (dd-mmm-yy), the second column is calculated as the first column, + 30, The dates work out fine when adding to a date in the first columns, but from a blank cell it displays 30-Jan-00.
e.g
Started
Finishes
12-Nov-13
12-Dec-13
30-Jan-00
09-Nov-13
09-Dec-13
11-Nov-13
11-Dec-13
Rather than delete the rows with the blanks in the Started column, is there a formula that I can use so that the cells in the "Finishes" column is left blank when the "Started" cells are blank?
The current formula for cells in the "Finished" column is:
=[@Started]+30
View 2 Replies
View Related
Jun 8, 2009
I have date/time data in the following form:
Mon Jan 12 07:26:26 EST 2009
I have tried multiple forms of LEFT, RIGHT, MID, etc. Date & Month are always three characters, but the date ("12" in this example) can vary between 1 or 2 characters.
View 8 Replies
View Related
Sep 24, 2009
I've a sheet and in row A is a list of tasks to do like:
A1 - Task1
A2 - Task2
A3 - ...
Is it possible in VBA to do this:
A1 - Task1
A2 - Blank cell
A3 - Task3
A4 - Blank Cell
A5 - ....
in other words to input a balnk cell between tasks (text)
View 5 Replies
View Related
Mar 15, 2013
I have in column D 1200 rows of data. I need to insert a blank cell after every 10 rows. Is there a formula or code to do this?
View 9 Replies
View Related
Jan 19, 2008
I have a spreadsheet with the following (example) :
Column A :
alabama
alabama
alabama
arizona
arizona
arizona
arkansas
arkansas
I want to insert a blank line (row) wherever the state name changes.....
View 9 Replies
View Related
Jul 29, 2013
I am a beginner to Excel macros. I am writing a macro to find the value based on the search criteria am giving
E.g. ( Record in table)
Column A
24/07/2013 15:04:05
Input am giving
24/07/2013 15:04 ( since am not sure about the milliseconds)
I need to find and fetch the Datas based on the input am giving
View 2 Replies
View Related
Aug 26, 2009
I am trying to write a macro which will insert a blank row at the end of each year(A column) (Last cell i.e Dec 95 and so on).
I have attached the file for the same ....
View 13 Replies
View Related
Oct 19, 2009
I was wondering if someone might be able to assist me with using VB to insert a new row below a cell containing specific text.
For example:
- All of my data is in column A
-I want to scan all of column A, and if there is a cell that contains "ACHCAMERIGROUP M", then I want a blank row inserted below it. If column A does NOT contain that text....do nothing.
View 5 Replies
View Related
Aug 25, 2008
I need to put an extra "spacer" cell in each row that contains either 8 or 9 blank spacer cells in columns A through H or A through I, respectively, so that everything in those rows shifts to the right by one column. The problem is that all the other rows don't need any extra spacer cells. There is no pattern to the rows that need the extra spacer cell (such as every 5th row, or something).
View 3 Replies
View Related
May 22, 2007
May seem straightforward, but not to me. I need some code to scroll down column A and insert the sum total of A2:A16 in B17, and repeat this everytime a blank cell appears in colum B, continuing down to the end of the worksheet.
View 5 Replies
View Related
Jun 25, 2008
I have a user form that when a command button is clicked it enters the data from the from into coloums a,b,c,etc. I have code to do this but I want to add code to add a static date in coloum B based on if coloum A had data entered from the form. I need the date not to change to current date when the file is reopened. I am trying to elimate a date text box in the form. I have a link to the file http://www.box.net/shared/zdtsjv0qos
View 7 Replies
View Related
May 29, 2013
I need to do two things in my Excel spreadsheet: 1) I want it to insert a blank row everytime a value in the 1st column changes. 2) In the blank lines, I want to do a COUNTA for each of columns G through N. If I can get the program to insert the blank rows...they will not be a set # of records apart...some will have 3 records & some might have 17 records. Is there a way to automatically cause #2 to happen instead of having to choose the function icon and then tell Excel the first and last cells in each range?
View 1 Replies
View Related
Oct 21, 2011
How can I target just a "date" in any format?
=IF(A2>"any date",A2,B2)
View 7 Replies
View Related
Nov 21, 2009
I have A column that has values 0 or 1 (product active or not).
I want to add into B column date when change occured (from 1 to 0) but simple NOW or DATE is not working becouse program works so that it erases/resets all values and calculetes tham again wich resets mine date also.
How can i remamber value 0 and if it stays the same after reset that date in corresponding cell in B column stays the same and not resets.
Maybe some form of check is there date in B before chacking status in A?
View 9 Replies
View Related
Sep 1, 2007
i am needing to issue a dos command in excel? basically i need to send a target link to a file. i cant use a hyper link for several reasons, and this is the only way i know how to go about this.
View 2 Replies
View Related
Jan 30, 2014
I would like to get a pop up window as soon as i open an excel program/file whose premium date has reached/due. I have tried writing VBA code but i am unable to copy the code for other cells. and also tell how to save/run macro
VBA CODE WRITTEN FOR SINGLE CELL
Private Sub workbook_open()
Dim cl As Range
Set cl = ThisWorkbook.Sheets("sheet1").Range("L1")
[Code].....
all red coloured dates are my target dates upon reaching these dates window should pop up with desired text code how to copy vba code to other cells
View 1 Replies
View Related
Apr 24, 2013
Using one spreadsheet with three date columns and two columns counting days.
If there is a value in Resolution date, then Column N is blank
If there is no value in Submit date and Resolution date, then Column N is blank
If there is no value in Resolution date, and there is a value in Submit date, subtract Submit date from todays date to show how many days it has been pending approval
Created on = J4
Submitted on = K4
Resolution Date = L4
Days to Approve = M4 I've got that formula =IF(L4="","",L4-K4)
Days Pending Approval= N4 (cell with formula)
If Resoultion Date L4 has a value, return blank
If Submit on K4 and Resoultion date L4 are blank, return blank
If Resolution date L4 is blank, and Submit on K4 has a value, subtract Todays date from Submit on K4 to show Days Pending Approval
Cell J4______Cell K4______Cell L4__________Cell M4__________Cell N4
Created on___Submit On___Resolution Date___Days to Approve___Days Pending Approval
4/5/13_______blank______Blank____________Blank___________Blank
4/5/13_______4/5/13_____4/7/13___________2_______________Blank
4/5/13_______4/5/13_____Blank____________Blank___________()Today-K4
View 3 Replies
View Related
May 6, 2013
I would like to add a date to one cell (say A6) and have this do two things:
#1) this would add "Closed" to a given cell such a A5.
#2) and this would add a color to a group of cells like A1 through A8.
View 4 Replies
View Related
Apr 24, 2014
Trying to get a record of who authorized spending in one of my worksheets and when they did it
I had some VBA code in one of my worksheets which added a time stamp and a user ID to two different cells after the user enters their name. Why it is no longer working, though I suspect after moving the worksheet around.
I would like my users to type their name into cell G65 (which is actually merged from G65-K65). Once the user enters their name, cell L65 (which is actually merged L65-O65) populates with the current time stamp. Also, when the user enters their name into cell G65, I would like cell P65 (which is actually merged into P65-S65) to auto populate. I would like this all of this to go down through line 70.
View 1 Replies
View Related
Jul 5, 2012
How to modify this code so that I select only one column triggers the time stamp update? For e.g. if i make any changes in column A, the date stamp is updated in the corresponding cell in column B. Basically, I am trying to narrow down to only one cell in the row, but it should work for any row in the sheet.
Refer to the below post: [URL] ....
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 1 Then Cells(Target.Row, "B") = Now()
End Sub
View 2 Replies
View Related
Apr 9, 2013
I have the below code that works fine. However I want to use a countif function to update Column I instead of manually having to type in the numbers each time they change. I know it would probably be a Worksheet_Calculate Sub but cannot seem to find one that works. The time stamp would be put into column H and the first row of data is row 3.
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Count > 1 Then Exit Sub
If Not Intersect(Range("I3:I12"), .Cells) Is Nothing Then
Application.EnableEvents = False
[Code] .....
View 2 Replies
View Related
Mar 14, 2007
I seem to be spending an increasing amount of time on here these days! I hope this one is quite simple - I want to add a time stamp of when a cell is updated, but I dont know how to do this. I presume that an adjacent cell can have =now(), but need to know how it to run this when a particular cell has been changed.
View 9 Replies
View Related
