Hallo Nadine.Ich bin momentan beruflich wirklich stark unter Druck.
Trotzdem habe ich Dir mal ein Gerüst zusammengestellt, was auch funktioniert.
Damit, denke ich, kannst Du jetzt auch weiterarbeiten.
Bedenke bitte: ich behandle hier NUR das Change-Ereignis !
Ferner bin ich in der u.a. Routine sehr statisch.
D.h., die Routine ist derzeit NICHT portabel auf andere Bereiche gleicher Struktur.
Das muß auf jeden Fall eingearbeitet werden (durch Dich).
Überleg Dir aber mal selber, ob es nicht viel sinnvoller ist, eine Userform zu erstellen, in der Du definitiv nur mit diesen 3 Werten
arbeitest und nicht mit 65536 * 255 Zellen und Dich nicht rumschlagen mußt mit irgendwelchen Ereignissen.
Wenn Du nämlich irgendwann Deine 3 Werte hast, die entweder alle da sind oder eben nicht, dann kannst DU als
Programmiererin bestimmen, wo DU diese Dinger ablegen willst.
Du brauchst mit der aktuellen Idee zusätzlich in jedem Falle ein Worksheet_Deactivate-Ereignis, damit Du den User zwingen
kannst, erst seine Eingaben zu machen, bevor er auf ein anderes Blatt wechselt.
Desweiteren brauchst Du ein Worksheet_SelectionChange-Ereignis, damit Du den User ggf. immer wieder in seine Schranken
zur weiteren Dateneingabe zwingen kannst.
Denkst Du jetzt weiter, dann müßtest Du sogar noch ein Workbook_Close-Ereignis definieren, damit der Benutzer Dich nicht
doch noch an der Nase herumführt.
Du siehst selbst: so simpel die Aufgabe klingt, so umfangreich ist auch die Lösung.
Ich habe diese Routine speziell für Dich und in windeseile geschrieben.
Normalerweise muß das Ding noch gestrafft werden und all so ein Gedöns.
Aber ich dachte, daß Du ja etwas weiter kommen willst.
Daher diese etwas stümperhafte (weil eben schnelle) Codierung.
Anfrage ans gesamte Forum:
Sehe ich das nur so kompliziert oder hat jemand von Euch so eine AllRound-Lösung. oder eine bessere Idee ???
Wie gesagt: ich liebe Kritik an meiner Arbeit.
Nadine:
Wenn Du Fragen zu meiner Lösung hast: jederzeit (max@maxgalle.de)
Ab Montag habe ich etwas mehr Ruhe.
Und nun das CHANGE-Ereignis.
Kurze Erklärung:
Dem Eingabebereich C5:C7 mußt Du den Namen "Eingabe" verpassen.
Du kannst ihn auch HUGO nennen, mußt allerdings dann auch folgendes Statement entsprechend ändern:
Set xEingabe = Range("Hugo")
Hoffentlich habe ich Dir etwas weiter geholfen.
MAlexander