Clever-Excel-Forum

Normale Version: Aufruf Eingabemaske ShowDataForm mit Vorbelegung
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo,

folgendes Problem nach 2 Wochen selber versuchen:

Ich öffne das Excel-Dateneingabeformular über ein Makro (Button - ActiveSheet.ShowDataForm). Nun startet das Formular immer mit dem ersten Wert in der Tabelle.

Ich möchte, dass das Formular mit einem bestimmten vorselektierten Wert startet.

z.B. Feldwert (separat): Müller oder eine Kundennummer. Ich möchte nun dass das Formular mit diesem Eintrag startet.

Ich bin kein Profi und bin für jeden Denkanstoß dankbar. 

Herzlichen Dank & Gruß
Hallöchen,

da solltest Du Dir wohl besser ein Userform programmieren (lassen) ...

Ansonsten, probiere es mal so:

Zitat:Sub MaskeAufrufen()
Application.SendKeys "%K"
Application.SendKeys "Müller"
Application.SendKeys "%t"
ActiveSheet.ShowDataForm
End Sub
Herzlichen Dank, der Application.SendKeys "Müller" funktioniert sehr gut.

Was ich aber benötige anstatt eines hart codierten "Müller", ist eine variable Zelle, z.B. A100

D.h. das Datenformular öffnet mit dem Eintrag in der Zelle A100, z.B. Müller oder Schmitz

Ich hoffe das ist möglich

Danke noch mal
Hallöchen,

statt
"Müller"
dann
Range("A100").Value
Du bist ein Genie!!!!

funktioniert super, vielen lieben herzlichen Dank!!!!!
Hi

SendKeys ist nicht gerade als empfohlen bekannt. Immer wieder von unerwünschten und nur schwer erkennbaren Effekten begleitet.
Der Code z.B. bewirkt in Excel 2010 das sich das Verhalten des NumLook umkehrt.
Code:
Sub MaskeAufrufen()
Application.SendKeys "%K"
Application.SendKeys "Müller"
Application.SendKeys "%t"
ActiveSheet.ShowDataForm
End Sub

Also Code ausführen Maske wieder schließen. Numlook steht laut Anzeige noch auf Num/on. Verhält sich aber wie Num/off. Code zweite mal.  Verhalten Numlook wieder normal.
 
SendKeys ungern.


Gruß Elex
Vielen Dank!

Du hast Recht, ganz schön unberechenbar das "Biest". Es erfüllt erstmal seinen Zweck, merke ich mir aber für die Zukunft! Danke noch mal
Hallöchen,

deswegen auch mein Hinweis mit dem Userform Smile