Wie wähle ich einen Bereich basierend auf dem Zellenwert in einer anderen Spalte in Excel aus?
In diesem Artikel werde ich in einer anderen Spalte darüber sprechen, wie Bereiche basierend auf dem Zellenwert ausgewählt werden. Wenn in den Zellen in Spalte C FALSE angezeigt wird, werden die relativen Zellen in Spalte A und Spalte B wie im folgenden Screenshot ausgewählt ausgewählt. Es gibt keine integrierte Funktion, mit der Sie diese Aufgabe lösen können. In diesem Artikel kann ich sie jedoch mit einem VBA-Code behandeln.
Wählen Sie den Bereich basierend auf dem Zellenwert in einer anderen Spalte anhand des VBA-Codes aus
Wählen Sie den Bereich basierend auf dem Zellenwert in einer anderen Spalte anhand des VBA-Codes aus
Wählen Sie den Bereich basierend auf dem Zellenwert in einer anderen Spalte anhand des VBA-Codes aus
1. Aktivieren Sie das gewünschte Blatt und drücken Sie Alt + F11 Tasten zum Aktivieren der Microsoft Visual Basic für Applikationen Fenster.
2 Klicken Insert > Modulund fügen Sie dann den folgenden Code in den neuen ein Modul Fenster.
VBA: Wählen Sie den Bereich basierend auf dem Zellenwert aus
Sub SelectByCellValue()
'UpdatebyExtendoffice20161128
Dim lastrow As Long
Dim xRg As Range, yRg As Range
'change Sheet1 to suit
With ThisWorkbook.Worksheets("Sheet2")
lastrow = .Cells(.Rows.Count, "C").End(xlUp).Row
Application.ScreenUpdating = False
For Each xRg In .Range("C1:C" & lastrow)
If UCase(xRg.Text) = "FALSE" Then
If yRg Is Nothing Then
Set yRg = .Range("A" & xRg.Row).Resize(, 2)
Else
Set yRg = Union(yRg, .Range("A" & xRg.Row).Resize(, 2))
End If
End If
Next xRg
Application.ScreenUpdating = True
End With
If Not yRg Is Nothing Then yRg.Select
End Sub
3. Drücken Sie F5 Taste zum Ausführen des VBA, und dann wurden die Bereiche basierend auf den Werten in Spalte C ausgewählt.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!