I am using this formula to combine Excel Dates & Times which is in seperate cells.
day Month Year Time
=B13&"/"&C13&"/"&D13&F13
and trying to convert to Numerical Time for further calculations.
I have tried many Format variations but nothing seems to work.
It will show the correct Numeric Time if the Formula: =NOW() is used in Cell K12
But it won't show the same from the imported data that is Text format
in Cell I 12
The sample W. Book shows a better explanation of the problem.
The end result is to show how much time has lapsed in Cell M 14 by converting Time to Numerical and simply do the sums. Works otherwise but not in this instance.
The reason to trigger various macros according to pre-set Time Limits Etc.
I have written some code which takes data from multiple spreasheets and formats it in a specif way. However one problem I have is getting the right data format. As you will see from the input files the date and time cells are separated into two and the macro is supposed to aggregate these together in one cell with a space in between - but I cannot manage to perfect this !!! The output is in a number format instead. I have attached the input files. The code written so far is as follows - works perfectly apart from date format that comes is in the output file once you run the code.
Dim Obj1 As Object Dim Obj2 As Object Dim UserList() Sub RunMe() Dim Str1 As String Dim myPath As String Dim i As Integer Set Obj1 = CreateObject("excel.application") myPath = "C:Test" 'please note you should a "" at the end. Str1 = Dir(myPath & "*.xls") Set Obj2 = CreateObject("excel.application") Do Obj1.Application.DisplayAlerts = False Obj1.Workbooks.Open (myPath & Str1) 'For i = 1 To UBound(userslist).............
I have a number in A1, another number in B1, a Date in C1. In D1, I am referencing all 3 of the other cells: =CellA1 & "-" & CellB1 & "----" & CellC1. Trouble is the date is coming through as a number. Is there a way that I can get the date to show as displayed as opposed to the value of the cell?
How to do this with a macro but I want to join 6 workbooks together too make 1. Master sheet (7th copy). Below are the points of interest and a couple of questions.
1- My six books are all identical in cols. 2- The six books all have in col A my own ID number, no ID number is the same in any worksheet. 3- If I can get all 6 books together then the ID will start at #1 and finish approx at 225,000, in accending order. 4- All books have only 2 worksheets inside, Sheet1 and Sheet2 . 5- I don't want to delete or loose any data in the 6 books already made. Just make a 7th copy of the 6 . 6- The 6 w/books are called 6A- Each w/book contains approx 40,000 rows except last , approx 22,000
7- There are no functions in any of the w/books, just other macros which I want in the master copy. 8- Can the 7th copy be called UPTODATE STAKESWTD MASTER
I have a label that displays the date using the = now code
[Code] .....
When I open the form the date and time is correct, but it doesn't update while the form is open. Is there a way to make the date and time always correct while the form is open.
I'm usually able to find my answer but I couldn't find anything to match what I need. Anyway... this is either really simple or impossible to do. I have two cells which have times in each. Say A1 has 5:00 PM and A2 has 10:00 PM. I'm just trying to make it so one cell will say:
From 5:00 PM to 10:00 PM... So I tried this ="From " & A1 & " to " & A2
But as I'm sure you already know that yields this result:
I have a large dataset where the first column is date and time i.e. "20/01/2005 03:41:06" and I want to delete certain rows based on the times. I have already tried playing about with macro's but failed fairly spectacularly so far. I have code from someone else to delete cells if the value equals a certain time but this doesn't work as the cell contains the date too.
I have already recorded one macro to reformat the data to as the software return 10 timestamped samples per hour and I want 8 i.e. every three hours so there is constant separation for statistical purposes. Both the macros are shown below so you can see what I have.
Ideally I would like to replace the line - If (r.Cells(n, 1) = TimeValue("22:41:06")) ............ - with one that reads - If (r.Cells(n, 1) CONTAINS TimeValue........ - but I don't know if that is possible? If not is there a way to separate the time from the date into 2 columns and then I can delete rows based on the time column using the code below? .......
I have sent a data sheet template to my client in which they paste their data, based on this data sheet analysis will be done automatically in next sheet "Summary".
Whenever they paste product code, vlookup is not working since the product code contains few are numeric (shows: "Number Stored as Text"). I advised my client to go with "Text to Column" and "Delimited" to change it as numeric. But my client feels this method is tedious one. Is there any alternate way to make that column as numeric permanently?
DONNAS [Single cell, 1st row] 09/08/2003 15:34 [Single cell ( date and time combined) 2nd row]. Do you know of any way that I can move the name, date and time from the above cells to three separate columns on the same row?
I have only one column (A) with thousands of cell entries. Each Cell contains a date and time. (x/xx/xxxx 12:34:56)
For example, Cell A1 = 1/24/13 18:45:22
I want the new cells to only have the time, but have the seconds removed (and not simply hide the seconds). This is because I'll need to run Conditional Formatting to find every cell with a similar time - but I only need similar times within the same minute...it doesn't matter if the seconds are off.
The new cell should just be A1 = 18:45
The real reason I need this is because I need to find every entry that has the same time (with hour and minutes), which I figure I'd use conditional formatting for. My problem is that many entries have the same time but the seconds are off.
In this example, I'd want Conditional Formatting to highlight cell A2 and A3 because they have the same time of 18:45 (not including the seconds). I figured the best way to go about this would be to remove the date and remove the seconds, and run the search that way. However, any way to accomplish goal without deleting the date and seconds would be just as useful.
I'm writing an Excel Macro and want to sum a number cell with the value "45667" and a text cell with the value "Prague" and return it to a new cell with the value " 45667 Prague"
I've done it successfully with the two text cells "John" and "Hopkins" to "John Hopkins".
This is my
Sub SumCells()
Dim FirstName, SecondName, Zipcode, City, fullname, fulladdres, space
FirstName = range("cell1").value SecondName = range("cell2").value Zipcode = range("cell3").value City = range("cell4").value space = " "
fullname = firstname + space + secondname fulladdress = zipcode + space + city
The problem is that city is recognized as "Prague", and the zipcode as 45667 (without the "")
i've put this previously on here with no results. There is a formula already in there though does not work because what I want to achieve is to have Column A & Column C to Match Column E & Column F, to Return the Value YES or NO. I’ve Highlighted in ROW 947 one that should Say NO yet Says YES.
I have a column with numbers in each cell. I need to add the same three letters before each of the numbers. Example:
number in cell: 25067 I need it: ABC25067
I did a macro for it but had to do each one individually. I imagine there is a simple formula to do this automatically but I don't know enough to figure it out (despite reading up on it for the last hour!)
I have a sentence in field A1 and a number in field A2. The formula I am using is =A1 & A2. This is working but there is no space in between A1 and A2. How can I add a space?
I am attempting to pick up a date with time entry on a worksheet and place it into a TextBox on a UserForm. Format on the sheet is mm/dd/yyyy h:mm AM/PM. The UserForm is placing the value as mm/dd/yyyy 12:00 AM. here is the
Private Sub UserForm_Initialize() If Not Range("dDate").Value = "" Then TextBox2.Value = Range("dDate").Value TextBox2.Text = Format(DateValue(TextBox2.Text), "mm/dd/yy h:mm AM/PM") Else TextBox2.Value = "" TextBox2.SetFocus End If End Sub
"dDate" is the named range where the date is sitting. The format is also set on the TextBox2 exit event. Can anyone see why only the date portion is being transfered with the default 12:00 AM for no time component of the value?
I am trying to append data in let's say column A:A with the variable text in J:J. The data in column A:A will look like this /dir/dir/dir/<from this point is where I need the data appended>.
The Complete Name is currently blank. The others just list the users Surname and First name. In the Complete name I need it to have Surname,Firstname - for example
Complete Name | Surname | First Name Jordan,Michael Jordan Michael
Is there a Formula (Not Macro) that I can use to combine the Surname and First name cells to populate the Complete name cell with the surname,first name???
I am trying to write some VBA to join the values in 2 cells into another cell for a list, however my knowledge at this level is a little lacking. For each row in a list I would like to join the value of the cell of Column A and the value in the cell of Column B and write the output to Column C for that row, as shown in the attached example. Column C in the example shows the expected output.
I'm trying to merge two cells, But i want the second cell to be merged without the last 6 characters, im joining a file, wich is easy to understand. =(A2 & " " & A3) I want A3 without the last 6 digits, I know i have to use the RIGHT function but how so??
I have a marco that works perfects to Concatenate (join) all of the cells in Column A. However, I want to seperately join all of the cells in each column. So I wanted to the Concatenate of Column B to go in B1, Column C to go in C1, etc (or until there is no data in a column). I think there is a way to change this into a loop, but I don't know how. Below is the macro I have now.
Sub ConcatenateAll() Dim x As String, rng As Range, cel As Range With ActiveSheet Set rng = .Range("A2:A300") For Each cel In rng x = x & cel.Value Next .Range("A1").Value = x End With
I need to figure a way to make to cells with dates equal each other if the day,month and year are the same but are placed into a cell at different times during the day. "Making Date Now () = (06/29/09) In another cell". Therefore, A1= Now() and E11 = 06/29/09
I get a downloaded report from one of my application. Two columns have date and time data. I need to compare these two columns (subtract) and come up with a value in another column next to it to do some analysis on an ongoing basis.
So I know how to compare date and time in two cells but the problem I have is second set of date / time have other text mixed with it and there is some character that Find/Replace can not find (it looks like the "pipe" | character) and I can't replace or delete that character. Additionally when I click on that cell (B1 in attachment) I don't see this pipe character in the top formula section (fx) but I do see this character in the cell itself.
how I can either get rid of this character or extract just the date / time information from cell B1 to be able to compare cell A1 easily?
I need to seperate the time from a date & time field. When I try the RIGHT Fx, I get numbers that will not format into any time I can use. Please see my file for examples of what I'm dealing with and what I need.
what I would like to do is how can I combine 29-Mar-09 and 4-Apr-09 into one cell...I would like the output to be placed in cell A8 appear as "29-Mar-09 to 4-Apr-09".
I am trying to join text in two different cells using concatenate function / & operator In the combined cell I want the text from second cell to appear in Bold while the text from first cell should continue to remain in normal font. Is there any way i could achieve this?
