Ciao,
in una tabella come quella dell'immagine devo rendere visibili solo determinate righe in cui sono presenti delle celle bordate,


In questo caso le celle bordate sono possibili nelle col. C-D-E-F-G, mentre la lunghezza della tabella è varibile.
L'ideale sarebbe di avere a disposizione una macro che nasconda tutte le righe della tabella in cui nelle col. C:G non vi sono celle bordate.
Nell'esempio rimarrebbero visibili, o meglio scoperte, solo le righe 6, 15, 20, 26 mentre le altre verrebbero nascoste dalla macro.
In realtà la tabella è molto alta, si parla di circa 4500 righe, per cui il lavoro della macro sarebbe stra-benedetto :))
Terminato l'esame della tabella se non ci sono problemi ad usare l'opzione Celle > Formato > Nascondi e Scopri > Scopri righe bene, altrimenti occorrerebbe un codice dedicato che riporti la tabella al suo stato normale.
Come al solito... un TeraGrazie anticipato, buon pomeriggio
eZio

salve
buttata giù al volo
provale:

Sub nascondi()
Dim ctrl As Boolean
uriga = Range("C" & Rows.Count).End(xlUp).Row
n = 0
ctrl = False
Set area = Range("C3:G" & uriga)
For Each cl In area
n = n + 1
If cl.Borders.LineStyle = xlContinuous Then
ctrl = True
End If
If n = 4 Then
If Not ctrl Then
Rows(cl.Row).Hidden = True
End If
ctrl = False
n = 0
End If
Next
set area=Nothing
End Sub

Sub scopri()

Cells.EntireRow.Hidden = False
End Sub

saluti
Giap

---

Ciao,
scusami, ma ho potuto provarla solo ora, e come sempre tua duplice macro ... è perfetta!!
Grazie assai, buona giornata (qui in padania c'è una nebbia...che la tagli come il burro!!)
eZio