Verwenden der “MergeArea” -Methode des “Range” -Objekts
Die “MergeArea” -Methode des “Range” -Objekts wird verwendet, um ein “Range” -Objekt zurückzugeben, das einen Bereich von verbundenen Zellen darstellt, die eine bestimmte Zelle enthalten. Diese Methode hat keine Argumente und funktioniert nur bei Zellen, die bereits mit anderen Zellen kombiniert sind.
Um Zellen mit der “MergeArea” -Methode zusammenzuführen, können wir zuerst die “Merge” -Eigenschaft oder die “MergeCells” -Methode verwenden, um den gewünschten Zellbereich zu kombinieren, und dann die “MergeArea” -Methode verwenden, um auf den verbundenen Zellbereich zu verweisen. Im folgenden Codebeispiel wird gezeigt, wie die Zellen G1 bis I3 mithilfe der “Merge” -Eigenschaft kombiniert und dann mit der “MergeArea” -Methode auf diesen Bereich verbundener Zellen verwiesen wird.
Sub MergeCellsUsingMergeAreaMethod() 'Combining cells G1 to I3 Range( “G1:I3” ). Merge = True 'Refers to a range of merged cells containing G2 cells Range( “G2” ). MergeArea.Select End Sub
Wir können sehen, dass die Zellen G1 bis I3 zu einer großen Zelle zusammengeführt wurden, und der Wert aus Zelle G1 wird weiterhin in der Mitte der zusammengeführten Zelle angezeigt. Wir können auch sehen, dass der Bereich der verbundenen Zellen durch unseren Code ausgewählt wurde, indem wir die “MergeArea” -Methode verwenden, um auf den Bereich der verbundenen Zellen zu verweisen, die Zelle G2 enthalten.
Um die Verbindung von Zellen mit der “MergeArea” -Methode aufzuheben, können wir zuerst die “Merge” -Eigenschaft oder die “MergeCells” -Methode verwenden, um die Verbindung des gewünschten Zellbereichs aufzuheben, und dann die “MergeArea” -Methode verwenden, um auf diesen Bereich einzelner Zellen zu verweisen. Im folgenden Codebeispiel wird gezeigt, wie Sie die Verbindung der Zellen G1 bis I3 mithilfe der “Merge” -Eigenschaft aufheben und dann die “MergeArea” -Methode verwenden, um auf diesen Bereich einzelner Zellen zu verweisen.
Sub UnMergeCellsUsingMergeAreaMethod() 'Unmerge cells G1 to I3 Range( “G1:I3” ). Merge = False 'Refers to the range of individual cells containing G2 cells Range( “G2” ). MergeArea.Select End Sub
Wir können sehen, dass die Zellen G1 bis I3 in einzelne Zellen aufgeteilt wurden und der Wert aus Zelle G1 in Zelle G1 angezeigt wird. Wir können auch sehen, dass der Bereich dieser einzelnen Zellen von unserem Code ausgewählt wurde, indem die MergeArea-Methode verwendet wurde, um auf den Bereich der einzelnen Zellen zu verweisen, die Zelle G2 enthalten.
Verwenden der UnMerge-Methode eines Objekts “Range”
Die “UnMerge” -Methode des “Range” -Objekts wird verwendet, um die Verbindung aller verbundenen Zellen in einem Zellbereich aufzuheben. Diese Methode hat keine Argumente und funktioniert nur für Zellbereiche, die mindestens eine verbundene Zelle enthalten.
Um die Verbindung von Zellen mit der “UnMerge” Methode aufzuheben, können wir die Methode für den Zellbereich ausführen, den wir teilen möchten. Das folgende Codebeispiel zeigt, wie Sie die Verbindung aller verbundenen Zellen in einem aktiven Arbeitsblatt mithilfe der Methode “UnMerge” aufheben.
Sub UnMergeCellsUsingUnMergeMethod() 'Unmerge all merged cells in the active worksheet ActiveSheet.Cells.UnMerge End Sub
Wir können sehen, dass alle verbundenen Zellen im aktiven Arbeitsblatt in einzelne Zellen aufgeteilt wurden und die Werte dieser Zellen an ihren ursprünglichen Positionen angezeigt werden.