>>Textfeld mit Daten füllen über DD-Liste<< :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2000] >>Textfeld mit Daten füllen über DD-Liste<<

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

E-MaX-I
Newbie
Newbie

Anmeldedatum: 31.08.2008
Beiträge: 20
Wohnort: Lkr. Karlsruhe

Verfasst am: 02.09.2008, 18:39

Hi,

ich habe viele kleine Probleme mit meinem Projekt, drum wäre ich dankbar wenn mir hier weitergeholfen wird.

Problem:

Über die DropDown Liste wähle ich etwas aus und da soll automatisch die passende Nr. im Textfeld stehen.

Bsp.: ich wähle im DD-Liste "A" aus, dann soll automatisch "0001" im Textfeld stehen.

Falls dies mit einem Textfeld nicht gehen soll bin ich für andere Lösungen dankbar die man im Formular benutzen kann.

Die Excel Datei hängt an, so weit alles vorbereitet.

Vielen Dank im vorraus.

Gruß EMI

=========
Sad

Ich hab mich heute damit den ganzen Tag beschäftigt und muß sagen ich bekomme es nicht hin... Also, etwas hilfe bräucht ich schon als Newbie. Sad

Mappe1.xls

Beschreibung:

Hier ist alles soweit vorbereitet, nur den Teil den ich nicht hinbekomme hab ich weggelassen, denn als Neueinsteiger kann man so gut wie garnichts.

Download

Dateiname:

Mappe1.xls

Dateigröße:

25 KB

Heruntergeladen:

24 mal

Zuletzt bearbeitet von E-MaX-I am 05.09.2008, 12:01, insgesamt einmal bearbeitet

maninweb
Besserwisser

Anmeldedatum: 03.05.2008
Beiträge: 68
Wohnort: Herzogenrath

Verfasst am: 03.09.2008, 20:12

Hi E-MaX-I...

was hälst Du vor der beigelegten Lösung?

Diese basiert auf einem Kombinationsfeld aus der Formularsymbolleiste sowie den Formeln Adresse() und Indirekt().

Gruß

Mappe1.xls

Beschreibung:

Download

Dateiname:

Mappe1.xls

Dateigröße:

21 KB

Heruntergeladen:

26 mal

E-MaX-I
Newbie
Newbie

Anmeldedatum: 31.08.2008
Beiträge: 20
Wohnort: Lkr. Karlsruhe

Verfasst am: 04.09.2008, 14:17

Genau diese Funktion wollte ich.
Erst jetzt verstehe ich worauf ich achten soll... Laughing

Jetzt hab ich es geschaft das auch mit VBA zu lösen, nur fehlt mir die Formatierung. Möchte das die Nummer 4-stellig angezeigt wird.
Habe es mit Format und NumberFormat versucht, leider ohne Erfolg.

Rolling Eyes

Hab mir jetzt noch ein VBA Buch bestellt, hoffentlich kommt es schnell an.

Ach ja, stelle die aktuelle Mappe mal rein, vielleicht gibts noch paar Leut dennen es interessiert wie ich es hinbekommen habe und damit die Formatierung hinbekommen.

Gruß EMI

Mappe2.xls

Beschreibung:

Soweit funktioniert alles, fehlt nur die Formatierung mit den vier Zahlen.

Download

Dateiname:

Mappe2.xls

Dateigröße:

33.5 KB

Heruntergeladen:

24 mal

miriki
Schlauberger

Anmeldedatum: 05.03.2007
Beiträge: 472
Wohnort: Kiel

Verfasst am: 05.09.2008, 07:42

E-MaX-I hat Folgendes geschrieben:

Möchte das die Nummer 4-stellig angezeigt wird.
Habe es mit Format und NumberFormat versucht, leider ohne Erfolg.

Hast Du es mit dem benutzerdefinierten Format "0000" versucht?

Gruß, Michael

E-MaX-I
Newbie
Newbie

Anmeldedatum: 31.08.2008
Beiträge: 20
Wohnort: Lkr. Karlsruhe

Verfasst am: 05.09.2008, 09:25

Hi Michael,

ich habe es als Code >.Format("0000")<am Ende eingegeben gehabt, entweder zeigt er dann wie gehabt die Zahl an oder an anderer Stelle zeigt er dann nichts im Feld an. Habe auch NumberFormat versucht, aber dann geht garnichts mehr.

Beschäftige mich leider erst seit etwa einer Woche mit VBA. Früher war bei mir halt alles manuell gerechnet und mühsam rausgesucht, kopiert, eingefügt und und und... ja, und am Ende war doch vielles durcheinander.

Habe es vorhin versucht das er die Zahl in einer anderer Tabelle ablegt, wo die Zellen schon Formatiert sind, aber da ändert er die Formatierung.

Wink

Vielleicht gebe ich ja die Formatierung an der falschen Stelle ein. Werde jetzt erst mal etwas anders drangehen. Bin dir sehr dankbar und wäre dir auch sehr dankbar wenn du vielleicht mal an der Mappe zeigst wie du es genau meinst.

Gruß EMI

miriki
Schlauberger

Anmeldedatum: 05.03.2007
Beiträge: 472
Wohnort: Kiel

Verfasst am: 08.09.2008, 09:36

E-MaX-I hat Folgendes geschrieben:

an der Mappe zeigst wie du es genau meinst.

Die etwas angepaßte Prozedur sollte das machen:

Code:

Private Sub ComboBox1_Change()

Dim Auswahl As String
Dim Nummer As Range
Dim Ergebnis As String

Auswahl = ComboBox1.Text
Set Nummer = Worksheets("DDListe").Range("C3:C50").Find(Auswahl).Offset(0, -1)
Ergebnis = Nummer.Value

While Len(Ergebnis) < 4
Ergebnis = "0" & Ergebnis
Wend

TextBox1.Text = Ergebnis

End Sub

Ich hab in erster Linie die DIMs mit Typangaben spezifiziert, "Ergebnis" dazugenomen und explizit die .Value bzw. .Text Eigenschaften der Elemente angesprochen.

Das Eigentliche macht WHILE / WEND, in dessen Schleifenkörper der String "Ergebnis" links solange mit "0" aufgefüllt wird, bis er eine Länge von 4 Zeichen hat.

Gruß, Michael

E-MaX-I
Newbie
Newbie

Anmeldedatum: 31.08.2008
Beiträge: 20
Wohnort: Lkr. Karlsruhe

Verfasst am: 10.09.2008, 07:48

Hi Micheal,

das ist so einfach und doch schon genial deine Lösung.
Frage mich gerade wiso ich nicht auf die Lösung kam... Rolling Eyes

Naja, nicht jeder kann es. Ich war zu sehr darauf fixiert es mit Format oder ähnlichem zu erledigen.

Bis jetzt komme ich mit dem rest gut weiter, sollte ich wieder irgendwo hängen bleiben meld' ich mich.

Nochmals vielen Dank für deine genialen Lösungen.

Gruß EMI

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Wie eerstelle ich eine Dropdown-Liste?	Moppel	Microsoft Excel Hilfe	4	03.01.2009, 16:08
	Diagram bereich zwischen zwei linen f...	Thagor	Microsoft Excel Hilfe	1	18.12.2008, 13:05
	Daten manuel lokal speichern	lord.mo	Microsoft Outlook Hilfe	1	14.12.2008, 09:30
	Liste aus Liste erstellen	TheRedNoseRudolf	Microsoft Excel Hilfe	6	11.12.2008, 14:10
	Wenn Funktion bei Daten	Ferrus	Microsoft Excel Hilfe	4	10.12.2008, 11:24

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de