Office: Drop Down Liste aus einer Zeile? und auto. Ausfüllen

:-? Na dann, auf die Suche, fertig, ...

Edit:

Hat die Formatierung etwas damit zu tun?

Zuerst steht in der Zelle eine 1, wird aber durch die Formatierung als 001 angezeigt. Nach der DD-Liste steht in der Zellverknüpfung wieder nur eine 1 drin.

Habe die Zelle auch Formatiert das jetzt da drin auch 001 steht, aber weiterhin zeigt es den selben Fehler.

Darauf hin habe ich den WVERWEIS Bereich verkleinert, sprich nur auf eine Spalte, aber auch hier ohne Erfolg.

Muß für heute leider schluss machen, mein Chef will mich für heute nicht mehr sehen... :evil:

Hoffentlich habe ich morgen auch die gute Einstellung und den Willen hier weiter zu machen.

Gruß und danke
Emi

 

Hallo!

Ja, das wird wahrscheinlich der Knackpunkt sein.
Da könnte die Funktion TEXT helfen:

	C
3	001 aaa
4	1
5	aaa

Zelle	Formel
C3	=TEXT(C4;"000")&" "&C5

(Die Formatierung in C4 habe ich absichtlich auf "Standard" gelassen, damit der Effekt deutlich wird.)

Das müsste dann aber auch bei der Quelle für das DropDown gemacht werden; also TEXT um die erste INDEX herum.

 

:lol: Ich habe mir die Arbeit gemacht und die Tabelle2 neu erstellt, so dass die einzelnen Daten nicht mehr in Spalten, sondern in Zeilen stehen.

Muß ich jetzt immer noch die 2 Zellen zusammenführen
=TEXT($F$4;"000")&" "&$G$4

oder kann ich diese jetzt direkt irgendwie mit der DD-Liste zusammen erfassen?

Die DD-Liste habe ich dieses Mal im Entwurfsmodus gefunden.

Gruß Emi

Edit:

Habe in der DD-Liste jetzt nur die Nummer stehen, sollte auch funktionieren.

Jetzt habe ich dazu einen kleinen VBA-Code,

Code:

Private Sub ComboBox1_Change()
   Dim Auswahl As String
   Dim Nummer As Range
   Dim Ergebnis As String
   'Variablen festlegen

   Auswahl = ComboBox1.Text
   Set Nummer = Worksheets("Tabelle2").Range("F4:F63").Find(Auswahl).Offset(0, -1)
   Ergebnis = Nummer.Value
      While Len(Ergebnis) < 3
         Ergebnis = "0" & Ergebnis
      Wend
End Sub

Wie bekomme ich jetzt den Code so hin das er den gefundenen Zeile die Werte in Tabell2!F5 in Tabelle3!G5 setzt und Tab2!F6 in Tab3!B2 usw.

Edit:

Kann ich hier mit dem Offset arbeiten?
Sprich ich lasse ihn vergleichen und wenn er den selben Inhalt gefunden hat sollte er doch an der ersten Zelle stehen, dann Zelle für Zelle über Offset der Zeile entlang .Copy und ... Range("G5").Value = ???.
Kann ich da sagen ...=

Mir scheint als wäre das ein Kinderspiel, doch an irgendetwas bleib ich doch immer hängen...

geht so etwas?
Range("Tabelle3!G5").Value = Range("Tabelle2!F5").Value

:-| Ich, besser gesagt das Hirn braucht Pause....