Cellules et VBA

Bonjour,

je souhaiterai deux choses :

- Premierement, comment, avec VBA, puis-je avoir connaissance des cellules excel qui ne sont pas vides sans avoir a parcourir toutes les cellules de la feuilles? Existe-t-il une structure, comme un arbre, qui est exploitable?

- Ensuite, supposons qu'une cellule contienne une formule dependant de deux cellules. Par exemple, la Cellule C1 = A1 + B1. Comment puis-je, en VBA, et au depart de la cellule C1, recuperer une liste de references vers les cellules A1 et B1?

Bav.

Reponse 1: Regarde du côté de SpecialCells

par exemple

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub Test1() Dim Plage As Range   Set Plage = Worksheets("Feuil1").UsedRange.SpecialCells(xlCellTypeConstants) 'Plage des valeurs 'Set Plage = Worksheets("Feuil1").UsedRange.SpecialCells(xlCellTypeFormulas) 'Plage des formules If Not Plage Is Nothing Then Debug.Print Plage.Address Set Plage = Nothing End If End Sub

---

Reponse 2: une petite fonction qui donne les précédents d"une cellule contenant une formule

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Function Preced(ByVal c As Range) As String   If c.HasFormula Then Preced = c.Precedents.Address End Function     Sub Test2()   Debug.Print Preced(Feuil3.Range("C1")) End Sub

---