Showing comments and printing

Joe Was · Jan 14th, 2002, 04:26 PM

This is a custom function:

Function CommentText(rCellWithComment As Range)
CommentText = WorksheetFunction.Clean(rCellWithComment.Comment.Text)
End Function

It gos in a module.

To use it you must:

use a syntax of, " =CommentText(A1)"

Subsitute the cell address you want the comment of returned for like the "A1" in the above syntax.
If the cell has no comment none will be returned!

In the source comment cell you must have a comment. That cell will have a red upper right corner which triggers the comment for that cell. In the calling cell put the function call and it will display the comment of the source cell as a text line in or extending to the right of the calling cell. Hope this helps. JSW

sax · Apr 11th, 2002, 02:54 AM

Hi,
I have a table with data which I have to regulary check and add coments in some cells.
Is there any way to automaticaly copy this comments in some empty cell in the same row.
Thanks in advance.
Sax

Ivan F Moala · Apr 11th, 2002, 05:43 AM

Quote:

On 2002-04-11 01:54, sax wrote:
Hi,
I have a table with data which I have to regulary check and add coments in some cells.
Is there any way to automaticaly copy this comments in some empty cell in the same row.
Thanks in advance.
Sax

Automatically....not without code...

sax · Apr 11th, 2002, 07:02 AM

Mr Moala,
whatever ... code, formula.
One more thing. I have two columns where I put comments. I would like this comments to be copied to cells accordingly in the same order like columns are staying (Column B is first , Column D is second so copied cells will be one next to another accordingly).
Hopefully you understand me.
Thanks a lot i advance.
Cheers.
Sax

Chris Davison · Apr 12th, 2002, 12:06 PM

it's not *automatic* but if you highlight the range, select "copy" then go to your spare column(s) and select "paste special" then "comments" it will replicate them as is

it's quick, albeit manual

Jack in the UK · Apr 12th, 2002, 03:52 PM

Hi

you can drag em, copy em paste em, paste special em ,VBA em, export them in VBA to text file report, paste the contence to cell.

cant kill em only delete em.. good additions to have

..

Apr 12th, 2002, 12:06 PM	#5
Chris Davison MrExcel MVP Join Date: Feb 2002 Location: Millbank, London, UK Posts: 1,790	it's not automatic but if you highlight the range, select "copy" then go to your spare column(s) and select "paste special" then "comments" it will replicate them as is it's quick, albeit manual __________________ :: Pharma Z - Family drugstore ::

Apr 12th, 2002, 03:52 PM	#6
Jack in the UK Board Regular Join Date: Feb 2002 Posts: 3,065	Hi you can drag em, copy em paste em, paste special em ,VBA em, export them in VBA to text file report, paste the contence to cell. cant kill em only delete em.. good additions to have .. __________________ Free Excel based Web Toolbar available here. Jack in the UK J & R Excel Solutions "making Excel work for you"

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

Jan 14th, 2002, 04:26 PM	#1
Joe Was MrExcel MVP Join Date: Feb 2002 Location: Central Florida, USA Posts: 7,541	This is a custom function: Function CommentText(rCellWithComment As Range) CommentText = WorksheetFunction.Clean(rCellWithComment.Comment.Text) End Function It gos in a module. To use it you must: use a syntax of, " =CommentText(A1)" Subsitute the cell address you want the comment of returned for like the "A1" in the above syntax. If the cell has no comment none will be returned! In the source comment cell you must have a comment. That cell will have a red upper right corner which triggers the comment for that cell. In the calling cell put the function call and it will display the comment of the source cell as a text line in or extending to the right of the calling cell. Hope this helps. JSW

Apr 11th, 2002, 02:54 AM	#2
sax Board Regular Join Date: Feb 2002 Location: Belgrade, Yugoslavia Posts: 148	Hi, I have a table with data which I have to regulary check and add coments in some cells. Is there any way to automaticaly copy this comments in some empty cell in the same row. Thanks in advance. Sax

Apr 11th, 2002, 07:02 AM	#4
sax Board Regular Join Date: Feb 2002 Location: Belgrade, Yugoslavia Posts: 148	Mr Moala, whatever ... code, formula. One more thing. I have two columns where I put comments. I would like this comments to be copied to cells accordingly in the same order like columns are staying (Column B is first , Column D is second so copied cells will be one next to another accordingly). Hopefully you understand me. Thanks a lot i advance. Cheers. Sax