Office: (Office 2010) Vorschlagsliste in jeder Zeile

Hallo zusammen,

zum Thema Vorschlagsliste habe ich schon einiges gelesen und festgestellt, dass eine ordentliche Vorschlagsliste bei Eingabe von Buchstaben nur mit einer ComboBox möglich ist.

Ist es möglich, dass man diese ComboBox auch in jeder Zeile hat und entweder einen Wert auswählen kann oder bei Eingabe der ersten Buchstaben Werte vorgeschlagen bekommt?

Hintergrund ist folgender. Im Tabellenblatt A habe ich eine Liste mit Namen und anderen Daten. Dies soll die Quelle für die Vorschlagsliste sein.
Im Tabellenblatt B möchte ich Anmeldungen eintragen, die untereinander dargestellt werden sollen. Jetzt würde ich gerne diese ComboBox in jeder Zeile angezeigt bekommen, so wie es auch über die Datengültigkeit möglich ist. Die Datengültigkeit reicht mir aber nicht, da ich gerne die Namen auch vorgeschlagen bekommen möchte.

Ich hoffe mir kann jemand helfen, vielen Dank aber auf jeden Fall schon mal.

Gruß
Dennis

:)

 

Hallo Dennis,

verwende doch eine Eingabemaske(Userform) dafür um deine Daten einzugeben. Eine Combobox in jeder Zelle empfinde ich persönlich nicht als zielführend, wenn Dir die Gültigkeit nicht reicht.

 

Hi,

schau dir mal das Beispiel DropDown Zoom mehrere auf meiner HP, Seite Beispiele m. VBA an - vielleicht wäre das eine Möglichkeit.

 

Hallo.

Habe mir jetzt ein Userform gebastelt.

Für den Namen habe ich eine Combobox, die die Werte aus einem anderen Datenblatt bekommt. Das funktioniert.

Wie bekomme ich es hin, dass 5 Checkboxen (Box 1-5) angemarkert werden, wenn ich eine sechste Checkbox aktiviere? Im Beispiel sollen die Zeiten angemarkert werden, wenn ich die Checkbox "alle Zeiten passen" anhake.

Jetzt sollen noch alle Daten in die Tabelle geschrieben werden und zwar in die erste leere Zeile. Spalten sollen B bis AC sein.

userform.png

 

Hi,

den Wert (Value) der Checkboxen die angehakt werden sollen auf True setzen
für erste leere Zeile findest du im Forum viele Beiträge!
Nur werde ich deine bestehende Datei jetzt nicht nachbauen....

 

Ok, die Checkboxen funktionieren.

Beim Übertragen in die Tabelle hapert es noch ein wenig. Das ganze soll ausgelöst werden, wenn ich einen Button drücke.

Folgenden Code habe ich bereits:
Code:

In Spalte A habe ich eine laufende Nummer, die immer ausgehend von der Zeile darüber um 1 erhöht werden soll. Wie muss ich den vorhandenen Code ergänzen?

Mir fehlen jetzt noch 25 Checkboxen, die in die Spalten E bis AC übertragen werden sollen. Und zwar so, dass wenn der Wert der Checkbox = True ist, dann soll ein x eingetragen werden.

Kann hier jemand helfen?

 

Hi,

nach dem Prinzip
if deineChk.value =true then
trage in Zelle was ein
end if

siehe Demo da arbeite ich dies in einer Schleife ab. (nur ich kann deine Datei nicht nachbauen!)

 

Danke, werde ich mir mal nachher anschauen.

Das verlangt ja auch keiner, wollte nur einen kleinen "Schubs" haben.

Das kann aber trotzdem alles mit in die Sub "daten_uebertragen_Click()" mit rein oder?

Gruß
Dennis

 

hi,

klar *wink.gif*, wenn einmal der Code passt, kann alles in einem ausgeführt werden.

 

Hi,

den Code habe ich soweit bei mir eingebaut und funktioniert auch. Allerdings werden die Werte der Checkboxen bereits in Spalte B ausgelesen. Die Werte sollen aber erst in Spalte E beginnen.

Kannst du mir sagen was der Code der zweiten Sub bewirkt?

Code:

 

Hi,

da lese ich nur die Überschriften der ersten Zeile des aktiven Tabellenblattes ab Spalte B ein um damit die Checkboxen(1 bis 10) zu benennen.
(ich war nur schreibfaul um die Checkboxen selber zu benennen)

 

Mein Code für die Übertragung in die Tabelle sieht jetzt so aus und funktioniert auch.

Code:

Mir fehlt aber noch, dass 5 Spalten in rot eingefärbt werden, wenn die Checkbox "keinezeitenpassen" des jeweiligen Tages auf true steht.

Code:

Der Code bewirkt momentan, dass der ganze Bereich gefärbt wird. Das soll aber nur in der jeweiligen Zeile passieren, wo die Daten gerade übertragen werden.

Montag = Spalte E bis I
Dienstag = Spalte J bis N
Mittwoch = Spalte O bis S
Donnerstag = Spalte T bis X
Freitag = Spalte Y bis AC

Wie muss ich den Code ändern? Oder muss der Code einfach oben in die Schleife mit eingebaut werden?

Danke für eure Hilfe.

Gruß
Dennis

 

Hallo Dennis,

da ich deine Datei nicht kenne..., kann ich Dir jetzt auch nicht sagen was Du anpassen musst!
Woher erkennt dein Programm das es sich z.B um Montag handelt?

 

Hallo,

hier eine zusammengekürzte Version meiner Datei.

Im Tabellenblatt "Anmeldungen" sollen die Tage rot eingefärbt werden, wenn jemand an diesem Tag gar nicht kann. Diese Tage werden über das Userform eingegeben. Wenn am Montag jemand gar nicht kann, sollen die Spalten E-I in der aktuellen Zeile rot eingefärbt werden. Die anderen Tage genauso, nur andere Spalten.

Ich hoffe das war einigermaßen verständlich.

Gruß
Dennis

 

Hi,

ich habe die Namen der Chk geändert damit das ganze in einer Schleife laufen kann ^^, wird dadurch um einiges kürzer.