Ciao ragazzi,
ho un problema con il mio Excel 2007 di cui non trovo soluzione apparente: forse è un bug?
Passo all'esempio.
Creo un nuovo foglio di lavoro, nella cella A1 inserisco una parola a caso e nelle celle A1:A2 vi aggiungo anche un colore di riempimento come sfondo.
Poi prendo queste 2 celle e le copio in A4:A5.
Ora, se io seleziono la colonna, clicco su trova e lascio la casella di ricerca vuota, lui mi trova la casella A2, poi se clicco ancora la A3, la A5 ecc.
Io però devo fare in modo che mi selezioni direttamente la cella A3, quindi quando vado in trova, clicco su formato, riempimento e metto nessun colore.
Poi ri-seleziono la colonna, clicco su trova e magicamente mi compare un messaggio che mi dice che è impossibile trovare i dati cercati.
Perché? E come fargli individuare questa cella allora?
Grazie

__________________
Mai visto un regalo di laurea così! (regalos de bodas in spagnolo o geschenkideen freundin in tedesco), forum tags

ma se la cella A3 è vuota cosa dovrebbe cercare ?

la cella vuota appunto, ma che non abbia colore!!
boh!?

ghisirds ha scritto:la cella vuota appunto, ma che non abbia colore!!
boh!?

Da inesperta, FORSE il "colore" non è un "dato", ma un "formato" quindi non è un possibile parametro di "identificazione" di una cella. Anche se scrivessi in una cella con carattere 12 e in un'altra 14, non credo potresti discriminarle con questo sistema e individuarne una scartando l'altra. Da A2 in giù, sempre celle vuote sono!
ciao
Albry

Forse con qualche riga di Visual Basic si può fare ...............
devo provare ........

Guarda se puoi adattare questa funzione alle tue
esigenze, così comè conta nella cella A1 il numero
di celle di coloro rosso trovate nell'intervallo specificato
in questa formula che dovrai copiare nella cella A1
=COUNTBYCOLOR(A10:C30;3;FALSO) dove 3 indica
il codice del colore.

la funzione invece dovrai copiarla in un nuovo modulo
di VBA

Function CountByColor(InRange As Range, _
WhatColorIndex As Integer, _
Optional OfText As Boolean = False) As Long


Dim Rng As Range
Application.Volatile True

For Each Rng In InRange.Cells

If OfText = True Then
CountByColor = CountByColor - _
(Rng.Font.ColorIndex = WhatColorIndex)
Else

CountByColor = CountByColor - _
(Rng.Interior.ColorIndex = WhatColorIndex)
End If

Next Rng

End Function