Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
27.01.2023 13:37:52 |
Paul |
|
|
|
27.01.2023 14:29:16 |
Gast90029 |
|
|
Makro soll Zeile löschen, wenn 2 Zellen in der Zeile bestimmten Wert haben |
27.01.2023 14:39:52 |
Gast90029 |
|
|
|
27.01.2023 14:48:58 |
Gast40900 |
|
|
|
27.01.2023 16:55:58 |
Gast46344 |
|
|
|
30.01.2023 10:25:21 |
Gast5782 |
|
|
Von:
Gast90029 |
Datum:
27.01.2023 14:39:52 |
Views:
591 |
Rating:
|
Antwort:
|
Thema:
Makro soll Zeile löschen, wenn 2 Zellen in der Zeile bestimmten Wert haben |
Sub Test()
Dim Anzahl As Long
'Anzahl = ...
Dim wks As Excel.Worksheet
Dim i As Long
Set wks = Worksheets("Sheet1")
For i = Anzahl To 1 Step -1
If DeleteCondition(wks, i) Then
Debug.Print "Deleting row " & Format$(i, "00")
Call wks.Rows(i).Delete(xlShiftUp)
End If
Next
End Sub
Private Function DeleteCondition(Worksheet As Excel.Worksheet, RowIndex As Long) As Boolean
With Worksheet
DeleteCondition = .Cells(RowIndex, "G").Value = 1 _
And .Cells(RowIndex, "V").Value = 0
End With
End Function
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
27.01.2023 13:37:52 |
Paul |
|
|
|
27.01.2023 14:29:16 |
Gast90029 |
|
|
Makro soll Zeile löschen, wenn 2 Zellen in der Zeile bestimmten Wert haben |
27.01.2023 14:39:52 |
Gast90029 |
|
|
|
27.01.2023 14:48:58 |
Gast40900 |
|
|
|
27.01.2023 16:55:58 |
Gast46344 |
|
|
|
30.01.2023 10:25:21 |
Gast5782 |
|
|