O seguinte código do VBA moverá os valores de texto das células selecionadas para os comentários. Ele só funcionará se não existirem quaisquer redes existentes
Sub Test()
For i = 1 To Selection.Rows.Count
For j = 1 To Selection.Columns.Count
Selection.Cells(i, j).AddComment (Selection.Cells(i, j).Text)
Next
Next
End Sub