Ver comentarios de hojas en código macro
Una consulta: Si en la HOJA “Nombres” (así se llama la HOJA 32 y sin comillas), de toda la columna “B”, solo a algunos tienen comentarios. Cuál sería el código macro, para poder visualizarlos en la HOJA 1, agradecería su ayuda muchas gracias.
1 Respuesta
Respuesta de Elsa Matilde
1
Te dejo una rutina de ejemplo que lista en tu hoja activa, los comentarios que se encuentran en un rango de la hoja 'nombres'
Se coloca en un modulo y se ejecuta desde la hoja activa :
Sub revisaComent()
'x Elsamatilde
'guarda los comentarios en col A, a partir de A2
fila = 2
'desde hoja1 y revisa comentarios en hoja 'nombres' en rango B2:B100
For i = 2 To 100
Set c = Sheets("nombres").Range("B" & i).Comment
'si la celda tiene comentario lo vuelca a la hoja activa e incrementa la fila
If Not c Is Nothing Then
Range("A" & fila) = Sheets("nombres").Range("B" & i).Comment.Text
fila = fila + 1
End If
Next i
End SubLa hoja de los comentarios se llama nombres x eso va entre comillas. Si en tu caso se trata de una variable irá sin comillas.
¿Ya probaste el código enviado?
Si todo está resuelto, en este foro debes finalizar las consultas para que puedas dejar otras nuevas en el tablón (reglas del foro)
Sdos
Elsa
