| |
 | Online-Kurs: Grundlagen des 3D-Druck-Designs für Industrieingenieure , ein Kurs
|
Autor
|
Thema: Zeilen nach Bezeichnung löschen (445 mal gelesen)
|
thewolff Mitglied
 
 Beiträge: 140 Registriert: 03.06.2003
|
erstellt am: 06. Apr. 2004 08:41 <-- editieren / zitieren --> Unities abgeben:         
Hallo Leute, wenn in einer Tabelle (immer SpalteB) Materialbezeichnungen stehen, und ein bestimmtes Materialzeile gelöscht werden soll, wie muss ich das machen? Suchen nach B2, wenn Material = Kupfer dann zeile (es darf aber keine Leere Zeile bleiben). Aber wie ist der Befehl dafür? ------------------ Gruß Marco [Diese Nachricht wurde von thewolff am 06. Apr. 2004 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Dittrich Mitglied SysAdmin
 
 Beiträge: 388 Registriert: 06.06.2000 Wenn es nicht geht, probier was anderes, vielleicht geht es dann auch nicht.
|
erstellt am: 06. Apr. 2004 08:50 <-- editieren / zitieren --> Unities abgeben:          Nur für thewolff
|
thewolff Mitglied
 
 Beiträge: 140 Registriert: 03.06.2003
|
erstellt am: 06. Apr. 2004 09:39 <-- editieren / zitieren --> Unities abgeben:         
|
startrek Moderator Architekt
   
 Beiträge: 1361 Registriert: 13.02.2003 .
|
erstellt am: 06. Apr. 2004 10:30 <-- editieren / zitieren --> Unities abgeben:          Nur für thewolff
Hiho Marco, versuchs mal so ähnlich:
Code:
Sub del_rows() Dim x$, i& x = InputBox("Suchbegriff eingeben", "Zeilen löschen") For i = Cells(Rows.Count, 2).End(xlUp).Row To 1 Step -1 If Cells(i, 2).Value = x Then Rows(i).Delete Next End Sub
CU  Nancy Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
thewolff Mitglied
 
 Beiträge: 140 Registriert: 03.06.2003
|
erstellt am: 06. Apr. 2004 12:21 <-- editieren / zitieren --> Unities abgeben:         
|