In un elenco di titoli librari(circa 3000...) alcuni sono uguali, ma non identici.
Tuttavia nella stringa dei titoli ci sono due valori identici: prezzo e data.
ESEMPIO:
- VIA DELLA SAGGEZZA TIBETANA (...) 12,00 mar-98
- VIA DELLA SAGGEZZA TIB (...) 12,00 mar-98

SO EXCEL 97

Qualcuno mi può cortesemente scrivere un Formula o una Macro per evidenziare i titoli uguali o simili, e, conseguentemente, cancellarne i doppioni?
Grazie per l'aiuto!!
Claudio

salve
io farei una cosa del genere avendo una tabella così formulata:
colonna A =titoli
colonna B= prezzo
colonna C= data

questa è la macro:

Option Compare Text
Sub EliminaDoppi()
With Sheets("foglio1")
Set area = .Range(("a2"), .Range("c2").End(xlDown))
area.Sort Key1:=.Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Set area = Nothing
For Each cl In .Range(("a2"), .Range("a2").End(xlDown))
cl.Offset(0, 3).Value = Left(cl, 7) & cl.Offset(0, 1) & cl.Offset(0, 2)
Next
Set riga = .Range("D2")
Do While Not IsEmpty(riga)
Set riga2 = riga.Offset(1, 0)
If riga2.Value = riga.Value Then
riga.EntireRow.Delete
End If
Set riga = riga2
Loop
.Columns("D:D").ClearContents
End With
End Sub

La macro sopra descritta, utilizza la colonna D come appoggio per scrivere un valore che è il risultato del concatenamento dei primi 7 caratteri del titolo + prezzo+data
facendo riferimento al tuo esempio: VIA DELLA SAGGEZZA TIBETANA (...) 12,00 mar-98
il valore che scrive in colonna D sarà = VIA DEL1201/03/98
comparando i valori della colonna D, cancellerà tutti i doppioni.
Prova la macro utilizzando una copia del tuo file.
saluti
Andrea

---

INTEGRAZIONE ALLA RISPOSTA PRECEDENTE

Ho creato la macro copiando il tuo testo, ma una volta lanciata mi è comparso

ERRORE DI RUN-TIME '9'
INDICE NON INCLUSO NELL'INTERVALLO

Dato il comando DEBUG è apparsa evidenziata la stringa:
Whith Sheets("foglio1").

Ritengo utile riportare due stringe "simili" complete a titolo di esempio; forse qualche dato non inserito entra in conflitto nella ricerca:
- 100 DISCHI IDEALI PER CAPIRE IL JA (Col. D vuota) 20,00 feb-04 FRANCHI IVO EDITORI RIUNITI
- 100 DISCHI IDEALI PER CAPIRE IL JAZZ (Col. D vuota) 20,00 feb-04 FRANCHI IVO EDITORI RIUNITI

Confido nel tuo ulteriore aiuto...
Grazie
Claudio