05.12.2017, 19:01
Hallo zusammen,
die Excel-Datei ist eine Versandliste. Wird etwas versendet sollte man dann das entsprechende Fach anklicken um somit die Zeile zu löschen. Der Löschvorgang dauert ca. eine halbe bis eine Sekunde. Es finden noch Zwischenspeicherungen statt.
Das funktioniert auch einwandfrei. Die User sind natürlich auch nicht dumm, man kann ja die ganze Zeile makieren und anschließend löschen (Entf-Taste drücken). Da aber noch auf einer weiteren Tabelle Informationen zu der vorherigen Tabelle existieren werden diese nicht mit gelöscht. Fazit bei Einlagerung eines neuen Produktes sind diese Infos auch gleich gegeben, was nicht sein darf. Über ein Code wird die "Entf"-Taste deaktiviert. Löschen einer ganzen Zeile ist so nicht mehr möglich (nur noch mit doppelklick auf eine Zelle und über Backspace oder Entfernen-Taste). Aber nun sind alle Seiten dieser Datei betroffen. Gibt es eine Möglichkeit das die Deaktivierung nur auf eine Tabelle wirkt? und nicht auf die ganze Datei?
Folgenden Code habe ich dort in "Diese Arbeitsmappe" eingegeben:
Private Sub Workbook_Activate ()
Application.OnKey "{DEL}", "" 'dekativieren der Entf-Taste
Application.OnKey "{Backspace}", ""
die Excel-Datei ist eine Versandliste. Wird etwas versendet sollte man dann das entsprechende Fach anklicken um somit die Zeile zu löschen. Der Löschvorgang dauert ca. eine halbe bis eine Sekunde. Es finden noch Zwischenspeicherungen statt.
Das funktioniert auch einwandfrei. Die User sind natürlich auch nicht dumm, man kann ja die ganze Zeile makieren und anschließend löschen (Entf-Taste drücken). Da aber noch auf einer weiteren Tabelle Informationen zu der vorherigen Tabelle existieren werden diese nicht mit gelöscht. Fazit bei Einlagerung eines neuen Produktes sind diese Infos auch gleich gegeben, was nicht sein darf. Über ein Code wird die "Entf"-Taste deaktiviert. Löschen einer ganzen Zeile ist so nicht mehr möglich (nur noch mit doppelklick auf eine Zelle und über Backspace oder Entfernen-Taste). Aber nun sind alle Seiten dieser Datei betroffen. Gibt es eine Möglichkeit das die Deaktivierung nur auf eine Tabelle wirkt? und nicht auf die ganze Datei?
Folgenden Code habe ich dort in "Diese Arbeitsmappe" eingegeben:
Private Sub Workbook_Activate ()
Application.OnKey "{DEL}", "" 'dekativieren der Entf-Taste
Application.OnKey "{Backspace}", ""
