koapa

Juan Carlos González Chavarría respondió: Aquí te dejo un pequeño ejemplo que tengo hace tiempo. Sub ListComments() Dim CommentCount As Integer Dim cell As Range Dim x As String Dim CommentSheet As Worksheet Dim OldSheets As Integer Dim Row As Integer ' Salir si no hay comentarios...

vikmar respondió: No veo donde esta las negritas, sin embargo copie tu codigo a mi me marco el error en variable=activecell.offset(0,6).comment.text en donde asigno la valor de variable al comentario de la sexta columna de la celda activa, pero si esta celda no tiene...

vikmar respondió: ' Este estuvo bastante interesante 'Este sería el código ejemplo Sub copiacomentarios() 'Debug.Print Worksheets(1).Range("C3").Comment.Text Dim t As Integer For t = 2 To 5 Worksheets(2).Cells(t, 1).Value = Worksheets(1).Cells(t, 1).Comment.Text Next...

Juan Carlos González Chavarría respondió: Para esto utilizó varias técnicas dependiendo de lo complejo de la clave. Se debe contar con una máquina rápida y con buena memoria para que el proceso sea más rápido. Han habido usuarios que me envían archivos y no los desbloqueo ya que considero...

Luis Fernando Gutierrez Rivera respondió: Con gusto te digo siempre y cuando me regales tu fecha de nacimiento. Gracias, lufeguri