Celda con comentarios

13/11/2008 - 19:33 por puntero ubicacion | Informe spam
Quisiera ayuda con lo siguiente : necesito saber como puedo generar
automaticamente comentarios para una celda. Los comentarios estan formados
por diferentes valores de la hoja, por ejemplo haria :

a=cells(activecell.row,4).value
b=cells(activecell.row,5).value
c=cells(activecell.row,6).value

Yo quiero que las variables a. b y c esten en el box del comentario de una
celda
 

Leer las respuestas

#1 Héctor Miguel
14/11/2008 - 01:54 | Informe spam
hola, Juan !

si suponemos que la "una celda" es [A1] misma que YA tiene "su comentario"...
prueba con el siguiente codigo en el modulo de "esa" hoja...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("b1:j1000")) Is Nothing Then Exit Sub
Dim Fila As Integer, Comentario As String: Fila = ActiveCell.Row
Comentario = Range("d" & Fila).Text & vbLf & _
Range("e" & Fila).Text & vbLf & _
Range("f" & Fila).Text & vbLf
Range("a1").Comment.Text Comentario
End Sub

si cualquier duda (o inforamacion adicional)... comentas ?
saludos,
hector.

__ OP __
... como puedo generar automaticamente comentarios para una celda
... formados por diferentes valores de la hoja, por ejemplo haria:

a=cells(activecell.row,4).value
b=cells(activecell.row,5).value
c=cells(activecell.row,6).value

... quiero que las variables a. b y c esten en el box del comentario de una celda

Preguntas similares