Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
VBA letzten 3 Zellen einer Spalte wählen unter einer Bedingung löschen |
24.06.2022 09:30:33 |
LordSaso |
|
|
|
24.06.2022 10:58:59 |
Gast54404 |
|
|
|
24.06.2022 11:37:55 |
Gast49243 |
|
|
|
24.06.2022 11:41:33 |
Gast15528 |
|
|
|
24.06.2022 11:51:42 |
Gast95897 |
|
|
|
24.06.2022 11:55:32 |
Gast72889 |
|
|
|
24.06.2022 12:02:39 |
Gast83970 |
|
|
|
24.06.2022 12:02:40 |
Gast85057 |
|
|
Von:
LordSaso |
Datum:
24.06.2022 09:30:33 |
Views:
1055 |
Rating:
|
Antwort:
|
Thema:
VBA letzten 3 Zellen einer Spalte wählen unter einer Bedingung löschen |
Hallo allerseits.
ich habe ein kleines Problem und bin leider auch ein blutiger Anfänger : Ich die letzten 3 Zellen einer Spalte auswählen und diese durch eine If-Abfrage je nach Wert entfernen. Das Problem ist VBA wählt die letzten 3 Zellen aus, wenn ich aber eine If-Abfrage starte mit der Bedingung das alles Werte unter 0 entfernt werden sollen löscht VBA immer wieder und wieder die letzten 3 Zellen einer Spalte bis keine Zahlen mehr übrig sind.
Ich möchte aber nur die letzten 3 Zellen einer Spalte ausgewählt haben und diese unter der Bedingung löschen wenn die Zahl kleiner als 0 ist.
Hier mein Code den ich benutzt habe:
Sub FilterX()
Dim Zellen As Variant
Zellen = Cells(Rows.Count, "P").End(xlUp).Offset(1 - 3).Resize(3).Select
If Zellen < 0 Then
Cells(Rows.Count, "P").End(xlUp).Offset(1 - 3).Resize(3).Value = ""
End If
End Sub
|
- 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
|
VBA letzten 3 Zellen einer Spalte wählen unter einer Bedingung löschen |
24.06.2022 09:30:33 |
LordSaso |
|
|
|
24.06.2022 10:58:59 |
Gast54404 |
|
|
|
24.06.2022 11:37:55 |
Gast49243 |
|
|
|
24.06.2022 11:41:33 |
Gast15528 |
|
|
|
24.06.2022 11:51:42 |
Gast95897 |
|
|
|
24.06.2022 11:55:32 |
Gast72889 |
|
|
|
24.06.2022 12:02:39 |
Gast83970 |
|
|
|
24.06.2022 12:02:40 |
Gast85057 |
|
|