WorkbookBase.LinkSources-Methode

Gibt ein Array von Links in der Arbeitsmappe zurück.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel.v4.0.Utilities (in Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntax

'Declaration
Public Function LinkSources ( _
    type As Object _
) As Object
public Object LinkSources(
    Object type
)

Parameter

  • type
    Typ: System.Object
    Einer der XlLink-Werte, der den Typ der zurückzugebenden Links angibt.

Rückgabewert

Typ: System.Object
Ein Array von Linknamen in der Arbeitsmappe. nullNULL-Verweis (Nothing in Visual Basic), wenn die Arbeitsmappe keine Links des angegebenen Type enthält.

Hinweise

Die im Array zurückgegebenen Namen sind die Namen der verknüpften Dokumente, Auflagen bzw. DDE- oder OLE-Server. Das Format des Arrays ist ein eindimensionales Array für alle Typen außer Verleger und Abonnent. Die zurückgegebenen Zeichenfolgen enthalten den Namen der Linkquelle in der für den Linktyp geeigneten Notation. Für DDE-Links wird beispielsweise die Syntax "Server|Dokument!Element" verwendet.

Für Verleger- und Abonnentlinks ist das zurückgegebene Array zweidimensional. Die erste Spalte des Arrays enthält die Namen der Auflage, und die zweite Spalte enthält die Verweise der Auflagen als Text.

Optionale Parameter

Informationen zu optionalen Parametern finden Sie unter Optionale Parameter in Office-Lösungen.

Beispiele

Im folgenden Codebeispiel wird der aktuellen Arbeitsmappe ein externer Excel-Link hinzufügt, und mithilfe der LinkSources-Methode werden die Namen aller Excel-Links in der Arbeitsmappe abgerufen. Dann werden mithilfe der OpenLinks-Methode alle verknüpften Arbeitsmappen schreibgeschützt geöffnet.

Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.

Private Sub WorkbookLinkSources()
    Globals.Sheet1.Range("A1").Value2 = _
        "='C:\[Book2.xls]Sheet1'!R2C2"
    Dim links As Array = _
        CType(Me.LinkSources(Excel.XlLink.xlExcelLinks),  _
        Array)

    Dim i As Integer
    For i = 1 To links.Length
        Me.OpenLinks(links(i), True, Excel.XlLink.xlExcelLinks)
    Next i
End Sub
private void WorkbookLinkSources()
{
    Globals.Sheet1.Range["A1", missing].Value2 =
        @"='C:\[Book2.xls]Sheet1'!R2C2";
    Array links = (Array)this.LinkSources(Excel.XlLink.xlExcelLinks);

    for (int i = 1; i <= links.Length; i++)
    {
        this.OpenLinks((string)links.GetValue(i), true,
            Excel.XlLink.xlExcelLinks);
    }
}

.NET Framework-Sicherheit

Siehe auch

Referenz

WorkbookBase Klasse

Microsoft.Office.Tools.Excel-Namespace