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
Ricerca cella excel
Moderatori: isex, mariobrossh, donatella
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!ghisirds ha scritto:la cella vuota appunto, ma che non abbia colore!!
boh!?
ciao
Albry
-
cosimocs
-
cosimocs
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
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
