edwinhenao respondió:
Lo puedes hacer seleccionando la celda que contiene el primer comentario y ejecutando la siguiente macro... ... Sub CopiarComentariosAlLado() While Not (ActiveCell.Comment Is Nothing) ActiveCell.Offset(0, 1).Value = ActiveCell.Comment.Text...