thommescan

Wenn ich das lese brauch ich glaube ich auch Urlaub Wenn ich das jetzt richtig verstanden habe, dann markiert deine Prozedur jetzt aus einer Auswahl alle Zellen wo irgendwas drin steht oder? wenn ich das aber teste funktioniert das bei mir nicht, da bei Range(sRange).Select immer ein Laufzeitfehler kommt. Mit dem Ausdruck sRange = sRange & "Cells(" & cell.Row & "," & cell.Column & ")" kann ich leider auch nicht so viel anfangen, da ich das in der Klammer nicht versteh. Formuliert das die allgemeine Position meiner bestimmten Zellen, d.h. die Reihe und die Zeile? Ist mir fast schon peinlich, dass ich da nicht durchsteig, aber jeder fängt einmal klein an. Liebe Grüße Thomas

Hi Streffin, auf die Idee bin ich ja noch gar nicht gekommen, dass man gar nicht nach den zellen fragt wo schuh drin steht, sondern nur die Zellen nichtmehr markiert in denen Schuh nicht drin steht Wie sollte aber dann meine If-Anweisung aussehen? Meine war ja scheinbar ein richtiger griff ins klo. gibt es auch einen Befehl um die Auswahl aufzuheben? Liebe Grüße Thomas

Hallo Lupo49, danke für deine schnelle Antwort. Wusste leider nicht wie ich meine Quellcodes richtig reinstelle, habs aber gerade gefunden. Bei mir wird also jede Zelle mit Schuh einzelnd markiert und dann wieder gelöscht und bei der letzten Zelle bleibt dann die Auswahl stehen? Oder habe ich das falsch verstanden? Was muss ich dann ändern, damit alle Zellen mit Schuh markiert werden? Liebe Grüße Thomas

Hallo zusammen, bin ein blutiger Programmier-Anfänger würde aber gerne mit VBA ein paar kleine Programme programmieren. Leider wurden mir schon bei meinen ersten Schritten große Steine in den Weg geworfen. Jetzt zu meinem Problem: Ich habe folgende Liste gegeben: Fuß Fuß Fuß Schuh Fuß Schuh Fuß Fuß Schuh Fuß Ich würde jetzt gerne alle Zellen markieren in denen Schuh steht. Am besten zeig ich euch jetzt erstmal meine Gehversuche. Sub Makro1() Dim zellen As Object For Each zellen In Selection 'Ich hab also alle Zellen markiert. If zellen = Schuh Then zellen.Select End If Next zellen End Sub Leider scheinen mir schon die ersten kleinen Programme zu schwer zu sein. Bei mir markiert es bei diesem Programm leider immer nur diese Zelle mit Schuh drin, die am weitesten unten in der Liste steht. Hat mir vielleicht irgendjemand einen Tipp wie es mir alle Zellen mit Schuh drin auswählt? oder wie ich dann gleich die ganzen Zeilen in denen Schuh steht markieren kann? Wär wirklich super, wenn ihr mir helfen könntet. Bin nämlich ziemlich montiviert meine Kreativität im Excel ein bißchen auszuleben. Liebe Grüße Thomas