Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8
Default Multiple dates in one cell?

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8,520
Default Multiple dates in one cell?

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8
Default Multiple dates in one cell?

Where do I input that formula on my spreadsheet? If I highlight cell A13 and
type that in, then I'm not able to input the dates without erasing the
formula...?

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 22,906
Default Multiple dates in one cell?

You posted in programming group so Jacob gave you a macro.

Not to be entered into a cell.

You can have more than one date in a cell and wrap the cell's contents using
a formula.

=TEXT(TODAY(),"mm/dd/yy")&CHAR(10)&TEXT(TODAY()+1,"mm/dd/yy")

Set the cell to wrap text and row autofit.


Gord Dibben MS Excel MVP


On Sat, 19 Sep 2009 14:21:01 -0700, MSW Intern
wrote:

Where do I input that formula on my spreadsheet? If I highlight cell A13 and
type that in, then I'm not able to input the dates without erasing the
formula...?

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!


  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8,520
Default Multiple dates in one cell?

To enter multiples line in a cell; enter data to a cell and without pressing
Enter press Alt+Enter and you can continue entering data.

To enter current date the shortcut is (Ctrl key + Semilon key)

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Where do I input that formula on my spreadsheet? If I highlight cell A13 and
type that in, then I'm not able to input the dates without erasing the
formula...?

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8
Default Multiple dates in one cell?

Thank you. How do I set the cell to wrap text and row autofit?

"Gord Dibben" wrote:

You posted in programming group so Jacob gave you a macro.

Not to be entered into a cell.

You can have more than one date in a cell and wrap the cell's contents using
a formula.

=TEXT(TODAY(),"mm/dd/yy")&CHAR(10)&TEXT(TODAY()+1,"mm/dd/yy")

Set the cell to wrap text and row autofit.


Gord Dibben MS Excel MVP


On Sat, 19 Sep 2009 14:21:01 -0700, MSW Intern
wrote:

Where do I input that formula on my spreadsheet? If I highlight cell A13 and
type that in, then I'm not able to input the dates without erasing the
formula...?

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!



  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8
Default Multiple dates in one cell?

Thanks so much! That was very very helpful!

"Jacob Skaria" wrote:

To enter multiples line in a cell; enter data to a cell and without pressing
Enter press Alt+Enter and you can continue entering data.

To enter current date the shortcut is (Ctrl key + Semilon key)

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Where do I input that formula on my spreadsheet? If I highlight cell A13 and
type that in, then I'm not able to input the dates without erasing the
formula...?

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Range("A13") = Range("A13") & vbLf & Date
End Sub

If you want to keep the height as such

Sub Macro()
Dim varHeight as Variant
varHeight = Range("A13").RowHeight
Range("A13") = Range("A13") & vbLf & Date
Range("A13").RowHeight = varHeight
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"MSW Intern" wrote:

Is there a way to list multiple dates within one cell? I have a very complex
spreadsheet and can't afford individual cells for the one item that requires
multiple dates be input into it.
When I tried just listing more than one date, the numbers went over the cell
boundaries into adjoining cells. I need it to instead either wrap to a second
line within the same cell (making the cell longer) or do something similar
that doesn't affect the surrounding cells but keeps all the information. Any
help appreciated!

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
couting occurence using multiple dates in single cell tabylee via OfficeKB.com Excel Discussion (Misc queries) 0 December 17th 09 04:47 AM
finding multiple code dates for multiple item number kmc Excel Worksheet Functions 3 February 6th 09 10:27 PM
Compare multiple dates, can enumerate cell based on most recent date Brian Excel Worksheet Functions 7 May 9th 06 11:02 PM
Multiple dates, times, or formulas in a single cell PM-S Excel Discussion (Misc queries) 2 January 12th 06 04:19 AM
the dates on cell format make different dates. date formats morph the dates/chang case New Users to Excel 6 April 18th 05 02:41 AM


All times are GMT +1. The time now is 09:01 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"