Vincular comentarios

Muchas gracias a ambos.

Los libros estan ubicados asi:

visor.xls, primer semestre. xls, segundo semestre.xls

El libro visor obtiene datos de 1° y 2° semestre por medio de buscarV.
Las celdas de 1° y 2° semestre tienen comentarios en algunos dias
especificos, que son feriados: 25 dic., 1° ene, etc.
El visor (me encantaría) debería mostrar el dato que existe para un
trabajador en la celda correspondiente a 1° ene, (en mi caso muestra si lo
laboró o no)y también mostrar su comentario (que me indica en que turno
laboro).
Por lo que entendí, la funcion de Juan hace eso exactamente.
La checaré y les comento.

G r a c i a s de nuevo!!



Héctor Miguel wrote:

hola, Juan !

> ... hice la funcion indicada al final ... similar a ... BUSCARV pero ...

devuelve el comentario.

> ... pero ... no se me recalcula si se modifica algun comentario, ni

presionando F9 [...]

en tanto no exista algun evento que 'detecte' cambios en los comentarios de

las celdas...

[creo que] sera necesario desarrollar codigo que 'haga lo propio' ;)
puedes consultar un topico con bastante informacion sobre comentarios en...
http://www.mvps.org/dmcritchie/excel/ccomment.htm

saludos,
hector.

Pero al presionar F9 no se debería recalcular todas las fórmulas???
Esa es mi duda.

Slds,
Juan

"Héctor Miguel" escribió en el mensaje
news:

hola, Juan !

> ... hice la funcion indicada al final ... similar a ... BUSCARV pero ...

devuelve el comentario.

> ... pero ... no se me recalcula si se modifica algun comentario, ni

presionando F9 [...]

en tanto no exista algun evento que 'detecte' cambios en los comentarios

de las celdas...

[creo que] sera necesario desarrollar codigo que 'haga lo propio' ;)
puedes consultar un topico con bastante informacion sobre comentarios

en...

http://www.mvps.org/dmcritchie/excel/ccomment.htm

saludos,
hector.

hola, Juan !

... al presionar F9 no se deberia recalcular todas las formulas??? [...]

SIP ;) [pero... 'siempre y cuando']
si se cambian/modifican los 'valores' que intervienen en el 're-calculo' [es decir... LAS CELDAS]
y los comentarios...
- son 'objetos de dibujo' [shapes]
- NO son 'afectados' por cambios en los valores de las celdas
- NO 'afectan' [el recalculo de] el modelo [cuando se modifica 'su' contenido
=>aun por macros<= [a menos que las macros'...']

saludos,
hector.

Bue... yo pensaba que al presionar F9 se forzaba a recalcular todas las
fórmulas, así no hayan sufrido cambio las celdas a las que se hace
referencia. De todas formas KL dio una solución para este problemas en un
hilo más arriba.

Al agregarle
Application.Volatile
al inicio de la función, se recalcula al presionar F9.

Slds,
Juan




"Héctor Miguel" escribió en el mensaje
news:

hola, Juan !

> ... al presionar F9 no se deberia recalcular todas las formulas??? [...]

SIP ;) [pero... 'siempre y cuando']
si se cambian/modifican los 'valores' que intervienen en el 're-calculo'

[es decir... LAS CELDAS]

y los comentarios...
- son 'objetos de dibujo' [shapes]
- NO son 'afectados' por cambios en los valores de las celdas
- NO 'afectan' [el recalculo de] el modelo [cuando se modifica 'su'

contenido

=>aun por macros<= [a menos que las macros'...']

saludos,
hector.

Saludos Jua:
Fijate que me he tomado la libertad de modificar tu función (que por
cierto esta genial!) para que en la celda me devuelva el dato hallado y
también me 'hale' el comentario de la celda referenciada
Funciona bien cuando la matriz en donde se hace la búsqueda está en el
mismo libro, pero deja de funcionar si el libro de la matriz de búsqueda
está cerrado.
Tienes alguna sugerencia para que tu función pueda realizar búsquedas en
hojas que estén en otro libro, aunque este último esté cerrado???
Ya sé que vas a decir que la solución + rápida es que todas las hojas
estén en el mismo libro, pero la configuración de mi sistema me obliga a
tener las tablas en libros diferentes.

Gracias!


Juan Sánchez wrote:

Algo parecido me pidió un usuario acá y le hice la función indicada al
final. Es similar a la función BUSCARV pero en este caso devuelve el
comentario.
El único pero es que no se me recalcula si se modifica algún comentario, ni
presionando F9. Si se modifican los valores de las celdas a las que hace
referencia al función, allí si se actualiza. Si alguien puede corregir ese
problema, en buena hora.

Slds,
Juan


Function BuscarVComentario(Valor_Buscado As Variant, Matriz_Busqueda As
Range, Indicador_Columna As Integer, Optional Ordenado As Boolean = True) As
String

Dim PrimeraCol As Range
Dim ColResultado As Range
Dim Indice As Long
Dim PosDato As Long
Dim Buscar As Boolean


If Indicador_Columna >= 1 And Indicador_Columna <> Matriz_Busqueda.Columns.Count Then
Set PrimeraCol = Matriz_Busqueda.Columns(1)
Set ColResultado = Matriz_Busqueda.Columns(Indicador_Columna)
BuscarVComentario = PrimeraCol.Address & ";" & ColResultado.Address

PosDato = 0
Indice = 1
Buscar = True

Do While Indice <= PrimeraCol.Cells.Count And Buscar
If Ordenado Then
If PrimeraCol.Cells(Indice).Value <= Valor_Buscado Then
PosDato = Indice
Indice = Indice + 1
Else
Buscar = False
End If
Else
If PrimeraCol.Cells(Indice).Value <> Valor_Buscado Then
Indice = Indice + 1
Else
PosDato = Indice
Buscar = False
End If
End If
Loop

BuscarVComentario = "(Sin comentario)"
If PosDato <> 0 Then
On Error Resume Next
BuscarVComentario = ColResultado.Cells(PosDato).Comment.Text
Else
BuscarVComentario = "#N/A!"
End If
Else
BuscarVComentario = "#REF!"
End If


End Function