Supportnet / Forum / Tabellenkalkulation

Wie erzeuge ich mit VBA ein Fenster mit festgelegten Abmessungen, das es mir erlaubt, zwei Werte abzufragen und einzugeben, die dann automatisch in vorbestimmte Zellen eingetragen werden? Kann das Fenster nach der zweiten Eingabe automatisch geschlossen werden? Ich bin dankbar für jede Anregung. Gruß peko

1. unten auf den Karteireitern für die Tabellenblätter rechtsklicken, "Einfügen..." und dann "MS-Excel5-Dialog" wählen.
2. Abfragefenster zusammenbasteln
3. Makro basteln, wichtige Befehle:
DialogBlattListe("Dialog").Zeigen
BearbeitungsfeldListe(n).Text

Schau dir mal die Hilfe zu diesen Befehlen an. Mit den Beispielen solltest du eigentlich keine Probleme haben, diene Aufgabe zu lösen.

Gruss Flupo

Danke Flupo,

damit ist mir ein wenig geholfen, aber so richtig bringt mich das trotzdem nicht weiter.

Wäre toll, wenn jemand ein ganz kleines Beispiel (be)schreiben könnte.

Gruß peko

Hat denn wirklich niemand eine Ahnung?

Hallo,

hast Du es schon mit einer InputBox versucht?
Ich weiss nicht, wie man die Abmessungen beeinflußt, aber vielleicht hilft es trotzdem.

Option Explicit

Sub test()
Dim Wert
Wert = Application.InputBox("Bitte Wert eingeben:", "Wert Eingabe")
Cells(1, 1).Value = Wert
End Sub

Gruß
Günter

Danke Günter, hat prima geklappt!

Jetzt wäre es noch interessant zu erfahren, wie mehrere Werte in einer Box eigegeben werden können und wie man Postion und Abmessungen einer solchen Box beeinflusst.

Gruß peko

Hallo peko,

mehrere Werte kann Du auch eingeben, wenn Du ein eindeutiges Trennzeichen festlegst. Im Makro kannst Du die Länge der Zeichenkette herausfinden und dann die Position des Trennzeichens suchen, dann links von Trennzeichen 1. Wert, rechts davon 2.Wert.

Option Explicit

Sub test()
Dim n%
Dim Wert$
Wert = "Wert_eins#Wert_2"
For n = 1 To Len(Wert)
  If Mid$(Wert, n, 1) = "#" Then
    Cells(1, 1).Value = Left$(Wert, n - 1)
    Cells(1, 2).Value = Right$(Wert, Len(Wert) - n)
  End If
Next
End Sub

Wenn Du allerdings Position und Abmessungen genau brauchst, solltest Du es mit der Textbox versuchen. Das ist aber etwas komplizierter.

Gruß
Günter

Danke Günter, hat geklappt. Werde es jetzt mal mit der Textbox versuchen.

Vielleicht hat da auch jemand Tipps zu vergeben?

Gruß peko

Hi alle!

Um es noch mal zu präzisieren: Ich suche nach einer Möglichkeit, in EXCEL 2000 ein Fenster zu öffnen, das mir die Abfrage mehrerer Werte (z.B. Name, Vorname, Straße, PLZ, Wohnort) und deren Gesamtbestätigung erlaubt.

Ist jemand so Klasse in VBA, um - am besten mit einem Beispiel - wirkliche Hilfe zu geben?

Gruß peko

Hi alle nochmal!

SUPPORTNET ist wohl doch nicht so toll?
Werde mich wohl woanders umsehen müssen.

Gruß peko

Hi peko,

was hast Du denn selbst schon in diese Richtung gemacht?
Warum reicht die Inputbox nicht für Dich?
Hast Du es schon mit TextBox versucht?

Gruß
Günter

Hallo Peko,

ich meine, Flupo und insbesondere Günter haben sich doch schon recht viel Mühe gegeben, dir zu helfen und mehr als brauchbare Lösungen gefunden.

Es besteht m.E. also kein Grund, das SN zu beschimpfen und hier herumzupampen.

Ich habe eher den Eindruck, dass du keine wirkliche Hilfe, sondern einen Dummen suchst, der dir dein Problem "auf dem Silberteller" komplett fertig gelöst kredenzt.

Dafür ist das SN dann vermutlich wirklich nicht das richtige Forum.

Sollte dein Posting - was u.U. nicht völlig auszuschließen ist - ironisch gemeint sein, dann war es zumindest nicht so ironisch fomuliert, dass es für alle verständlich war.

CU
want2cu

Hallo Flupo und Günter,

ihr habt euch bisher wirklich Mühe gegeben, mein Problem aber leider nicht gelöst. Trotzdem danke dafür.

Die InputBox reicht nicht, weil mehrere Eingaben in einem Fenster erfasst werden sollen. Mit der TextBox (Günters Anregung) bin ich auch noch nicht so richtig weiter gekommen.

An want2cu: Ich habe niemanden beschimpft und auch nicht "herumgepampt". Ich suche auch keinen Dummen, sondern einen Intelligenten. Vielleicht bist du das? Im Übrigen habe ich in der Vergangenheit manchen Hilfesuchenden in verschiedenen Fragen den "Silberteller" gereicht, so dass meine Anfrage nach umfassender Hilfe auch von daher verständlich erscheinen muss. Nur: wer das nicht leisten kann, sollte nicht den Oberlehrer auspacken!

Besonders freundlicher Gruß an want2cu!

Danke Flupo und Günter!

Gruß peko

Habe nun lange gewartet. War wohl leider nichts mit echter Hilfe.

Trotzdem danke an alle, die sich bemüht haben!

Gruß peko

• abfrage
• Download-Fenster öffnet sich nicht
• Keylogger öffnet beim PC-Start Fenster