what I am trying to achieve is my work has cell data that is defined in the cell and the description is stored in a comment. is it possible to remove and store this into a string or something similar to allow me to paste it into a printable format, on a generated printout page.

```
dim myval as string
dim cmt as comment

Sheets("DData").Activate
set cmt = [H4].comment
myval = cmt.comment
Sheets("Generated Profile").Activate
cells(24,7) = myval

```

This is my form:
[![Picture of Form](https://i.stack.imgur.com/qXcNZ.png)](https://i.stack.imgur.com/qXcNZ.png)

And this is my workbook data page:
[![Picture of my workbook data page](https://i.stack.imgur.com/Jxn6C.png)](https://i.stack.imgur.com/Jxn6C.png)

any help would be greatly appreciated, this is my first post here so if am improperly posting please redirect me.

thanks.