Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1772to1776
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1772to1776
1772to1776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hajo_Zi betr. Zeile löschen anderes Pro

Hajo_Zi betr. Zeile löschen anderes Pro
18.07.2020 11:15:35
Ralf
Ich bin es nochmal,
Ich habe eben den Code in eine andreren Program von mir kopiert. Da sind die Bedingungen anders .
Hier müsste man über die MASKE!B25 eingeben und gelöst wird erst dann, wenn ín der Maske!D27 + Maske!G27 Datum+Zeit
sowie "erledigt" der Vorgang abgeschlossen wird.
Nur denen Code in der Datenbank kopieren funktioniert in dien Falle leider nicht , weil dann dass löschen schneller erolgt,
als der eigentliche Vorgang abgeschlossen ist
Kannst du mir da eventuell ebenfalls behilflich sein.
https://www.herber.de/bbs/user/139149.xlsm
Gruß Ralf

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
betr. Zeile löschen anderes Pro
18.07.2020 11:30:57
Hajo_Zi
Hallo Ralf,
ich kann dazu nichts schreiben, da ich meinen Code nicht gefunden habe.

AW: betr. Zeile löschen anderes Pro
18.07.2020 11:49:30
Ralf
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 10 And Target = "löschen" Then
Application.EnableEvents = False
Rows(Target.Row).Delete
Application.EnableEvents = True
End If
End Sub

deinen Code musste ich wieder rausnehmen, weil wenn ich in der Maske!B25 "löschen" reinschreiben
ist der Kunde aus der Datenbank gleich gelöscht, ohne das ich in der Maske den Vorgang abgeschlossen habe.
das ist das Problem dabei
Gruß Ralf
Anzeige
AW: betr. Zeile löschen anderes Pro
18.07.2020 14:53:40
Hajo_Zi
Hallo Ralf,
Gut ich habe Deinen Kommentar auskommentiert und meinen eingefügt.
Bei Eingfabe in B28 wird kein Fehler ausgelöst.
Ich habe keine Ahnung welches Problem besteht.
Gruß Hajo
AW: betr. Zeile löschen anderes Pro
18.07.2020 20:19:31
Luschi
Hallo Ralf,
da Du ja keine Lust hattest, Dich mit meiner Lösung zu beschäftigen, eierst du jetzt immer noch herum:
bei mir läuft das so:
- wenn in einer Zellen der Spalte 'J' eine Änderung passiert
- wird die linke Nachbarzelle in Spalte 'I' neu berechnet
- liefert die Formel in dieser Zelle das Ergebnis 'Löschen'
- wird die Zeile, in der die Änderung erfolgte gelöscht
- aber nicht mit: Rows(Target.Row).Delete
- denn das ist kein guter Programmierstil
- sondern mit: Target.EntireRow.Delete xlShiftUp
- denn hier wird kein neues Rows-Objekt erzeugt
- sondern Target besitzt die nötige Eigenschaft/Property zum Löschen der gesamten Zeile
Gruß von Luschi
aus klein-Paris
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige