_QueryTable.TablesOnlyFromHTML Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Erstellt eine Datentabelle basierend auf Eingabewerten und Formeln, die in einem Arbeitsblatt definiert sind.
public:
property bool TablesOnlyFromHTML { bool get(); void set(bool value); };public bool TablesOnlyFromHTML { get; set; }Public Property TablesOnlyFromHTML As BooleanEigenschaftswert
Variant
Beispiele
In diesem Beispiel wird eine formatierte Multiplikationstabelle im Bereich A1:K11 in Sheet1 erstellt.
<span class="label">Set dataTableRange = Worksheets("Sheet1").Range("A1:K11")
Set rowInputCell = Worksheets("Sheet1").Range("A12")
Set columnInputCell = Worksheets("Sheet1").Range("A13")
Worksheets("Sheet1").Range("A1").Formula = "=A12*A13"
For i = 2 To 11
Worksheets("Sheet1").Cells(i, 1) = i - 1
Worksheets("Sheet1").Cells(1, i) = i - 1
Next i
dataTableRange.</span>
<i>Table</i>
<span class="label">rowInputCell, columnInputCell With Worksheets("Sheet1").Range("A1").CurrentRegion .Rows(1).Font.Bold = True .Columns(1).Font.Bold = True .Columns.AutoFit End With</span>
In diesem Beispiel wird eine formatierte Multiplikationstabelle im Bereich A1:K11 in Sheet1 erstellt.
<span class="label">Set dataTableRange = Worksheets("Sheet1").Range("A1:K11")
Set rowInputCell = Worksheets("Sheet1").Range("A12")
Set columnInputCell = Worksheets("Sheet1").Range("A13")
Worksheets("Sheet1").Range("A1").Formula = "=A12*A13"
For i = 2 To 11
Worksheets("Sheet1").Cells(i, 1) = i - 1
Worksheets("Sheet1").Cells(1, i) = i - 1
Next i
dataTableRange.</span>
<i>Table</i>
<span class="label">rowInputCell, columnInputCell With Worksheets("Sheet1").Range("A1").CurrentRegion .Rows(1).Font.Bold = True .Columns(1).Font.Bold = True .Columns.AutoFit End With</span>
In diesem Beispiel wird eine formatierte Multiplikationstabelle im Bereich A1:K11 in Sheet1 erstellt.
<span class="label">Set dataTableRange = Worksheets("Sheet1").Range("A1:K11")
Set rowInputCell = Worksheets("Sheet1").Range("A12")
Set columnInputCell = Worksheets("Sheet1").Range("A13")
Worksheets("Sheet1").Range("A1").Formula = "=A12*A13"
For i = 2 To 11
Worksheets("Sheet1").Cells(i, 1) = i - 1
Worksheets("Sheet1").Cells(1, i) = i - 1
Next i
dataTableRange.</span>
<i>Table</i>
<span class="label">rowInputCell, columnInputCell With Worksheets("Sheet1").Range("A1").CurrentRegion .Rows(1).Font.Bold = True .Columns(1).Font.Bold = True .Columns.AutoFit End With</span>
Hinweise
Mit Datentabellen können Sie eine "Was-wäre-wenn"-Analyse durchführen. Sie können bestimmte konstante Werte im Arbeitsblatt ändern und anschließend die Auswirkung auf Werte in anderen Zellen beobachten.