MACRO - NASCONDI RIGHE CON FORMULA SENZA TESTI VISIBILI

Question

Buongiorno,
sto cercando di creare una macro che secondo una selezione mi nasconda e scopra una determinata selezione di seguito il codice:

Sub NascondiVuote()

Range("A1:A153").Select  
Selection.SpecialCells(xlCellTypeBlanks).Select  
Selection.EntireRow.Hidden = True  

End Sub
Sub ScopriTutto()

Range("A1:A153").Select  
Selection.EntireRow.Hidden = False  

End Sub

---

!! nel range selezionato sono presenti però delle celle con formula (collegate ad altri fogli di lavoro), quello che vorrei fare è che se le celle contengono solo la formula ma non il testo si nascondano.

Grazie
Olivia