GetPrecedents
Cell.GetPrecedents method
Obtient toutes les références apparaissant dans la formule de cette cellule.
public ReferredAreaCollection GetPrecedents()
Return_Value
Collection de toutes les références apparaissant dans la formule de cette cellule.
Remarques
Renvoie null s’il ne s’agit pas d’une cellule de formule.Toutes les références apparaissant dans la formule de cette cellule seront renvoyées, qu’elles soient référencées ou non lors du calcul. Par exemple, bien que la cellule A2 dans la formule “=IF(TRUE,A1,A2)” ne soit pas utilisée lors du calcul, elle l’est toujours pris comme précédents de la formule. Pour obtenir les références qui influencent uniquement le calcul, veuillez utiliserGetPrecedentsInCalculation
.
Exemples
[C#]
Workbook workbook = new Workbook();
Cells cells = workbook.Worksheets[0].Cells;
cells["A1"].Formula = "=B1+SUM(B1:B10)+[Book1.xls]Sheet1!A1";
ReferredAreaCollection areas = cells["A1"].GetPrecedents();
for (int i = 0; i < areas.Count; i++)
{
ReferredArea area = areas[i];
StringBuilder stringBuilder = new StringBuilder();
if (area.IsExternalLink)
{
stringBuilder.Append("[");
stringBuilder.Append(area.ExternalFileName);
stringBuilder.Append("]");
}
stringBuilder.Append(area.SheetName);
stringBuilder.Append("!");
stringBuilder.Append(CellsHelper.CellIndexToName(area.StartRow, area.StartColumn));
if (area.IsArea)
{
stringBuilder.Append(":");
stringBuilder.Append(CellsHelper.CellIndexToName(area.EndRow, area.EndColumn));
}
Console.WriteLine(stringBuilder.ToString());
}
[Visual Basic]
Dim workbook As Workbook = New Workbook()
Dim cells As Cells = workbook.Worksheets(0).Cells
cells("A1").Formula = "= B1 + SUM(B1:B10) + [Book1.xls]Sheet1!A1"
Dim areas As ReferredAreaCollection = cells("A1").GetPrecedents()
For i As Integer = 0 To areas.Count - 1
Dim area As ReferredArea = areas(i)
Dim stringBuilder As StringBuilder = New StringBuilder()
If (area.IsExternalLink) Then
stringBuilder.Append("[")
stringBuilder.Append(area.ExternalFileName)
stringBuilder.Append("]")
End If
stringBuilder.Append(area.SheetName)
stringBuilder.Append("!")
stringBuilder.Append(CellsHelper.CellIndexToName(area.StartRow, area.StartColumn))
If (area.IsArea) Then
stringBuilder.Append(":")
stringBuilder.Append(CellsHelper.CellIndexToName(area.EndRow, area.EndColumn))
End If
Console.WriteLine(stringBuilder.ToString())
Next
Voir également
- class ReferredAreaCollection
- class Cell
- espace de noms Aspose.Cells
- Assemblée Aspose.Cells