Mover comentarios a la nueva columna en MS Excel

0

Tengo una columna en una tabla donde (casi) cada celda de esa columna tiene un comentario (triángulo rojo), me gustaría mover todos los comentarios a una nueva columna.

Ejemplo de lo que tengo:

Col.1
MIT (comentario: MA)
Harvard (comentario: MA)
Yale (comentario: CT)
NYU (sin comentarios)

Lo que me gustaría tener:

Col.1, Col.2
MIT, MA
Harvard, MA
Yale, CT
NYU,?

Roronoa Zoro
fuente

Respuestas:

2

Creo que esto es posible solo con VBA. Prueba el ff. función definida por el usuario:

Public Function GetComment(c As Range) As String
    If c.Comment Is Nothing Then
        GetComment = "?"
    Else
        GetComment = Replace(c.Comment.Text, c.Comment.Author & ":", "")
    End If
End Function

Para crear el UDF :

  1. prensa CTRL + F11 .
  2. Pega el código de arriba.
  3. Cierre el editor de VBA.

Nota:
Si también desea mostrar el nombre del autor del comentario, reemplace la quinta línea con:
GetComment = c.Comment.Text

Para utilizar la función. , ingrese el ff. en una celda de la columna donde desea colocar los comentarios y luego copiarlos.

=GetComment(B1)

Dónde:
B1 Es una celda que contiene el comentario que quieres obtener.

Aquí hay un ejemplo de cómo usarlo:

enter image description here

Ellesa
fuente