Inserting Comments in Excel...from a Beginner

Here's one possible solution. It assumes that, by comments, you are referring to the yellow post-it type comments that pop up when you hover over a cell (I'm actually not aware of any other type of comment anyway, but just in case!). I have made bold the particular part of the code that answers your question. The rest is just a suggestion.

Sub AddComments()

Dim dataRange As Range
Dim cell As Range

'Prompt user to define range containing values in Sheet2 and set dataRange accordingly
Set dataRange = Application.InputBox("Select range containing the values to convert into comments", Type:=8)

'Loop through each cell in the specified range, ignoring blank cells
For Each cell In dataRange.SpecialCells(xlCellTypeConstants).Cells

'Add a cell comment in the corresponding cell in Sheet1
Sheets(1).Range(cell.Address).AddComment (cell.Value)

Next

End Sub

Having lifted the code straight from this thread and into a blank spreadsheet on my PC at home, it's working fine. The only time I can get it to generate an error is if I select a range of entirely blank cells, or if I were to click cancel to the input box. You would obviously write appropriate code to deal with these eventualities, but for the example I left it out.

Did you copy the code directly from this thread If you typed it in, there could be a typo somewhere. I'd try copying it in directly from this thread and give it another go. Failing that, come back with more precise details of the particular situation you're using it.

I managed to get your error by selecting a range containing numerical values, which I assume is what you were doing. I guess by passing a numerical value into the String argument of the AddComment method, it wasn't liking it. I have amended the code to explicitly convert a cell's value to a string as it passes it to the AddComment method. I've also added code that deals with Cancel button being clicked on the input box, just to make it more complete.

Give it a try.