suche mit Makro auf anderem Tabellenblatt

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub CommandButton1_Click() Dim rngFind As Range Dim strTitel As String strTitel = InputBox("Artikel-Nr.:", "Artikel-Nr. eingeben", , 5, 5) With Worksheets("Tabelle2") Set rngFind = .Columns("B").Find(strTitel, _ LookIn:=xlFormulas) If Not rngFind Is Nothing Then MsgBox "Es wurde gefunden in Zeile " & rngFind.Row Else MsgBox "Es wurde nichts gefunden" End If End With End Sub

Private Sub CommandButton1_Click() Dim rngFind As Range Dim strTitel As String strTitel = InputBox("Artikel-Nr.:", "Artikel-Nr. eingeben", , 5, 5) Set rngFind = Sheets("Tabelle2").Columns("B").Find(strTitel, LookIn:=xlFormulas) If Not rngFind Is Nothing Then MsgBox rngFind.Value Else MsgBox "Es wurde nichts gefunden" End If End Sub

persönliches Hallo an Nepumuk
Es gibt gleich 2 Kritiken an mir, auch wegen der Beispiel Datei Laufwerk C: auflisten. Ich möchte beides hören.
Ja, ich nehme Kritik ernst, bin hier zutiefst betroffen über den Vorwurf Dateienn zu zerstören,nur nehmen alle Excel Profis bitte etwas zur Kenntnis. Wenn man mich niedermacht gehe ich zuerst in die Knie und bin verwirrt, denn der Vorwurf hat es in sich. Das wäre ja ernste Gefährdung von ahnungslosen Fragenden, die ja nicht damit rechnen das damit ihre Dateien zerstören könnten.
Ich bin kein Excel Profi, aber meine Gründlichkeit besteht darin solche Vorwürfe zu prüfen. Indem ich eigene Beispiel Dateien öffen und höflich um Angaben bitte wie man die zerstört. Das will ich selbst sehen!! Ich bin bereit berechtigte Kritik anzunehmen und zu beachten. Meine Stärke ist lieber alles zu prüfen, besonders in Grundsatzfragen die Dateien gefährden können.
Meines Wissens kann ich keine öffentlichen Variablen zerstören, weil alle Makros lediglich in meiner Beispiel Datei laufen, mit Dim deklariert sind (nicht Public), und keine anderen Makros aufgerufen werden. Lediglich die Set Variablen wurden zum Schluss nicht gelöscht. Ob Set Variable in einer anderen Mappe die geöffnet ist weiter existieren weiss ich nicht, prüfe es aber nach. Ich habe auch nicht verstanden wie ich konstante Variable veränderen soll, oder ganze Klassen zerstören kann?
Deutlich erkennbar ist für mich das die Profis im Forum alle Variable auf ihre Art deklarieren. Darin kann man Klassen oder Typen erkennen. Diese Schreibweise ist aber nicht zwingend notwendig. Weil alle Profis die MS Empfehlung beachten dürften sie kaum mit meinen Variablen in Konflikt kommen. Für mich sind sie leichter verständlich. Wo liegt also hier das Problem?
Vielleicht liegt der Hauptpunkt des Ärgerniss ja in meiner Antwort das die Syntac nicht klappt. Das habe ich überprüft, denn mir ist aufgefallen das beim Suchlauf Tabelle2 nicht angegeben war. Das wurde ja berichtigt, aber einfach übersehen, das die Suchdaten in Tabelle2 in Spalte A stehen. Computer sind nun mal nicht schlau, sie können Fehler nicht selbst korrigieren. Die Rückmeldung musste logischweise lauten: MsgBox "kann keine Daten finden"
Das ist mir aber selbst erst aufgefallen, als ich das Makro in einer Mappe getestet habe. Ich war erstaunt das es nicht klappte, und dann kontrollierte ich so lange, bis ich den Schreibfehler sah.
Gruss Adis

Hallo Adis,
sobald ich auf diese Anweisung laufe: End
Sind alle Variablen zurückgesetzt und alle Klassen zerstört. Nicht irgendeine Datei. Klassen sind virtuelle Objekte die ich im Arbeitsspeicher anlege und die werden dabei gelöscht. Auch geöffnete Datenbanken werden geschlossen.
Diese Anweisung ist, wenn es nur dieses eine Makro in der Mappe gibt kein Problem. Ich habe aber Mappen mit über 100.000 Zeilen Code die teilweise auf 2-3 Datenbanken zugreifen und da ist die End-Anweisung pures Gift. Ich muss nämlich anschließend die Klassen neu initialisieren, Variablen füllen und Datenbanken wieder verbinden (das dauert ein paar Sekunden).
Für mich ist dein Makro ja auch kein Problem, denn darauf bin ich nicht angewiesen. Aber es gibt genügend Leute die sich Code aus Foren zusammenklauben ohne groß Zusammenhänge zu verstehen. Und darum muss ein Code nicht nur solitär funktionieren sondern darf auch in komplexeren Strukturen keine nachteilige Auswirkung haben.
Gruß
Nepumuk

Beliebteste Forumthreads (12 Monate)

suche mit Makro auf anderem Tabellenblatt

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

68 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

suche mit Makro auf anderem Tabellenblatt

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

68 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread