Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zahlenfolge in allen sheets suchen

Zahlenfolge in allen sheets suchen
17.04.2005 17:14:05
Thomas
Hallo,
ich hänge hier an einer stelle und brauche mal hilfe. Irgendwie komme ich nicht drauf....
Ich möchte einfach nur eine Zeichenfolge (eine Azftrags-ID) Sheetübergreifend suchen.
D.h. beim eingeben des "Auftrages" wird der Auftrag in 3-4 verschiedenen sheets gespeichert. Wenn ich danach auf "löschen" drücke, soll der Auftrag natürlich auch an allen stellen wieder gelöscht werden.
Die sheets worin der auftrag gespeichert wird, können dabei unterschiedlich sein.
Darum einfach in allen sheets nach der eindeutigen Auftrags-Id suchen...
Danke vorab, Thomas
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlenfolge in allen sheets suchen
17.04.2005 17:44:23
Beni
Hallo Thomas,
da ich nicht weiss, in welcher Spalte die ID steht, gehe von SpallteA aus.
Gruss Beni

Sub Thomas()
Dim Mldg, Titel, Wert, Zelle
Mldg = "Auftras-ID eingeben"
Titel = "Datesatz löschen"
Wert = InputBox(Mldg, Titel)
For sh = 1 To Sheets.Count
With Worksheets(sh).Columns(1)
Set Zelle = .Find(Wert, LookIn:=xlValues, LookAt:=xlWhole)
If Not Zelle Is Nothing Then
.Rows(Zelle(1, 1).Row).EntireRow.Delete
End If
End With
Next sh
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige