Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Daten löschen mit User Form und VBA |
08.01.2018 22:49:46 |
Ben |
|
|
|
09.01.2018 06:57:53 |
Gast62743 |
|
|
|
09.01.2018 07:11:00 |
Gast57975 |
|
|
|
09.01.2018 10:56:09 |
Ben |
|
|
|
09.01.2018 11:54:32 |
SJ |
|
|
Von:
Ben |
Datum:
08.01.2018 22:49:46 |
Views:
1018 |
Rating:
|
Antwort:
|
Thema:
Daten löschen mit User Form und VBA |
Moin Moin :)
ich bräuchte einmal etwas Hilfe. Ich arbeite momentan an einem Projekt und habe nun Folgende Situation:
Über ein GUI wird der Nutze aufgefordert Daten einzutragen die dann in Form einer Tabelle auf dem Spreadsheet erscheinen. Aufgelistet werden sie chronologisch sprich:
A B C D
1. xxx xxx xxx
2. xxx xxx xxx
3. xxx xxx xxx
Hoffe die veranschaulichung ist klar (sonst einfach auf die Screenshots schauen).
Ich habe nun ein zweites GUI wo der zu löschende Eintrag in eine Textbox eingegeben wird. Hierzu gibt man die Nummer des Eintrag ein (z.B. 2.) und click auf den löschen Button. Es funktioniert wunderbar und die komplette 2. zeile wird gelöscht und die 3. zeile springt an die stelle der zweiten hoch.
Nun mein Problem. Die 3. bleibt leider eine 3, ich hätte es aber gerne so, dass sie nun als 2. Eintrag gezählt wird.
Der code zum löschen der Einträge ist wie folgt:
'Take number input from GUI textbox and find in spreadsheet
Set lookuprow = Sheet1.Range("A:A").Find(What:=deletenrtxt.Value, LookIn:=xlValues)
x = lookuprow.Row
'Delete rows corresponding to textbox input
Rows(x).EntireRow.Delete
Screenshot1: https://imgur.com/a/8Xeyz
Screenshot2: https://imgur.com/a/U1HMp
Kann mir jemand sagen wie ich es hinkriege, dass sich die neuen Zahlen automatisch anpassen?
Vielen Dank :)
|
- 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
|
Daten löschen mit User Form und VBA |
08.01.2018 22:49:46 |
Ben |
|
|
|
09.01.2018 06:57:53 |
Gast62743 |
|
|
|
09.01.2018 07:11:00 |
Gast57975 |
|
|
|
09.01.2018 10:56:09 |
Ben |
|
|
|
09.01.2018 11:54:32 |
SJ |
|
|