display the comments from referenced cell in cell of different sheet in same workbook

[kelsonbaird]

I have a multi page work book and one of the sheets is for marking the status of personnel I reference their status in another sheet, but I would like not only that info to show but any comments that are attached to the referenced cell. Any ideas?

 

[kelsonbaird]

Better info.... Sheet 1 cell N20 Has a "S" in it but in additions there are comments, In sheet4 cell B30 I want to show what ever is in 'Sheet1"N20 plus it's comments.

 

[kelsonbaird]

additionally I want to do this for about 1400 cells, so writing VBA code for each is not the direction that works.

 

[My Aswer Is This]

Well here is a Vba script to do the first one.

Sub See_Comments()
'Modified  11/3/2019  1:52:01 PM  EST
Sheets(4).Range("B30").Value = Sheets(1).Range("N20").Value & Sheets(1).Range("N20").Comment.Text
End Sub

 

[My Aswer Is This]

So if you do not want to use Vba then tell me how you think this can be done.

So you think a formula would do the job?
If your thinking a formula solution then I have no formula.

And you never mentioned having 1400 cells in your first or second post.

What else may we need to know?

And where are these 1400 cells and where would the results be entered.

To provide help we need all the facts upfront and specific details.

 

[My Aswer Is This]

If you have a range like Sheet(1) Range("A1:A1400") and want the results in a Range on Sheet(4) like Range("B1:B1400") where you want the results this could be done easily with one script.

 

[kelsonbaird]

Well a formula would be the best, but I also have no formula, I wrote a vba that copies the row then pastes only comments in the correct row of another sheet, but it is clunky... and there are 97 rows that don't go into the same 97 rows on the other sheet. each row has 365 columns which could possibly have a comment.

 

[My Aswer Is This]

Well I asked about specific details but you still have not provide those details.

Like search what rows and put results where.

 

[kelsonbaird]

I figured it out enough, thanks for your help?