text

verluc · Apr 24th, 2002, 02:02 AM

I want to add a text via macro in my sheet.
How to do it.
Thanks.

Tom Schreiner · Apr 24th, 2002, 02:05 AM

Sheet1.Range("A1") = "Put Some Text Here"
Is that it?
Tom

verluc · Apr 24th, 2002, 02:23 AM

Quote:

On 2002-04-24 01:05, TsTom wrote:
Sheet1.Range("A1") = "Put Some Text Here"
Is that it?
Tom

Thanks TOM : That's what I was looking for.
Still a little question:
The size of this text is 24.
Now I want to add a date as 23.04.2002 but I receive #### because the size is to great.I want to keep^also a size of 24 for that date.
Have you a solution?
Thanks in advance.

Mudface · Apr 24th, 2002, 02:27 AM

Would this do?

Sheet1.Range("A1") = "Put Some Text Here"
Columns("A").Autofit

verluc · Apr 24th, 2002, 02:38 AM

Quote:

On 2002-04-24 01:27, Mudface wrote:
Would this do?

Sheet1.Range("A1") = "Put Some Text Here"
Columns("A").Autofit

Yes that works.But the size of my columns are changed.What I want is to keep the size of the columns and that the date is displayed over 2 or 3 columns.
Is that possible?

Mudface · Apr 24th, 2002, 02:49 AM

If there's nothing in the column next to it, and your horizontal alignment is set to General then it should appear over a few columns.

verluc · Apr 24th, 2002, 03:02 AM

Quote:

On 2002-04-24 01:49, Mudface wrote:
If there's nothing in the column next to it, and your horizontal alignment is set to General then it should appear over a few columns.

Many thanks.It works like I want.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 24th, 2002, 02:02 AM	#1
verluc Board Regular Join Date: Mar 2002 Posts: 1,288	I want to add a text via macro in my sheet. How to do it. Thanks.

Apr 24th, 2002, 02:05 AM	#2
Tom Schreiner Board Regular Join Date: Mar 2002 Location: Cincinnati, Ohio, USA Posts: 6,824	Sheet1.Range("A1") = "Put Some Text Here" Is that it? Tom

Apr 24th, 2002, 02:27 AM	#4
Mudface MrExcel MVP Join Date: Feb 2002 Location: Sunny, spring-like Hull Posts: 3,339	Would this do? Sheet1.Range("A1") = "Put Some Text Here" Columns("A").Autofit

Apr 24th, 2002, 02:49 AM	#6
Mudface MrExcel MVP Join Date: Feb 2002 Location: Sunny, spring-like Hull Posts: 3,339	If there's nothing in the column next to it, and your horizontal alignment is set to General then it should appear over a few columns.