Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Bei Klick Optionsfeld vorgebene Werte in Access Tabelle schreiben

Frage Microsoft Microsoft Office

Mitglied: thomas1972

thomas1972 (Level 1) - Jetzt verbinden

04.02.2013 um 09:20 Uhr, 6407 Aufrufe, 3 Kommentare

Hallo,

ich habe ein Problem, wo ich nicht weiterkomme.

Ich habe ein Formular mit 3 Optionsfeldern

Herr
Frau
Sonstiges

Ich habe eine Tabelle 1, hier gibt es Spalten
Anrede
Anrede-Anschreiben

Ich möchte erreichen, wenn ich im Formular die Optionsfelder auswählen in der Tabelle

Bei Herr

Anrede -> Herr
Anrede-Anschreiben -> Sehr geehrter Herr

Bei Frau

Anrede -> Frau
Anrede-Anschreiben -> Sehr geehrte Frau

Bei Sonstiges

Anrede ->
Anrede-Anschreiben -> Sehr geehrte Damen und Herren

gefüllt wird.

Wie kann ich dieses per VBA umsetzen? Vielleicht kann mir hier jemand einen Tipp geben.


Mitglied: Pjordorf
04.02.2013 um 11:38 Uhr
Hallo thomas1972,

Zitat von thomas1972:
ich habe ein Problem, wo ich nicht weiterkomme.
Ist doch eigentlich der Klassiker für dei F1 Taste deiner Tastatur wenn du im VBA deines Access unterwegs bist, oder? Die Onlinehilfe zum Access und auch dort zum VBA ist ja auch nicht gering. Da findest du auch alle Antworten (sofern sinnvolle Fragen gestellt werden). Das Technet muss erstmal gelesen werden und von den ganzen Access Foren sowie Beispiel Codes im Internet ganz zu schweigen.

Wie kann ich dieses per VBA umsetzen?
Wie in jeder Programmiersprache halt. Das Optionsfeld auslesen, den Text für deine Spalte Anrede-Anschreiben aufgrund des Wertes des Optionsfeldes definieren und, wenn noch gewünscht, diesen auch in der Tabelle speichern. Natürlich schauen ob der Text nicht schon vorhanden ist zum entsprechenden Wert des Optionsfeldes oder natürlich jedesmal einen neuen Eintrag hinzufügen wobei natürlich eventuelle Primärschlüßel berücksichtigt werden müssen.

Vielleicht kann mir hier jemand einen Tipp geben.
Ja. Bitte nicht diesen Artikel von dir anschließend wieder Löschen. Bis jetzt hast du es ja immer getan und damit hilfst du anderen absolut nicht weiter, wenn du deine Fragen immer wieder einfach löscht bzw. Sperrst damit keiner diese mehr Lesen kann hier im Forum. dazu ist ein Forum nicht da. Solltest du Private Antworten auf deine Fragen haben wollen, dann bitte einen Privatlehrer anheuern oder nur mit menschen direkt Sprechen.

Gruß,
Peter
Bitte warten ..
Mitglied: SlainteMhath
04.02.2013, aktualisiert um 11:50 Uhr
Moin,

als erstes nimmst Du die beiden Felder in die Du schreiben willst in dein Formular auf und blendest Sie aus.
Im OnChange Ereignis der OptionGroup packst Du dann in etwa Folgendes:
01.
select case me.<name der optionsgruppe>.value 
02.
  case is = <wert für "Herr"> 
03.
    me.Anrede="Herr" 
04.
    me.Anrede-Anschreiben="Sehr geehrter Herr" 
05.
  case is = <wert für "Frau"> 
06.
[etc...] 
07.
end select
Und das dürfte dann auch schon alles gewesen sein.

lg,
Slainte

PS.:
@napperman : Neee, ElseIf ist sowas von hässlich...
@Pjordorf : Nu sei halt nicht gleich so ^^
Bitte warten ..
Mitglied: napperman
04.02.2013 um 11:43 Uhr
Moin,

Das geht relativ einfach über ein Ereignis.
Mache ein Rechtsklick auf das Optionsfeld und wähle den Reiter Ereignis aus.
Hier dann bei geändert ein neues Ereignis hinzufügen.
Sinngemäß:

If Me.Anrede.Value="Frau" Then
Me.Anrede-Anschreiben="Sehr geehrte Frau"
ElseIf Me.Anrede.Value="Herr" Then
Me.Anrede-Anschreiben="Sehr geehrter Herr"
ElseIf.....

End If
Bitte warten ..
Ähnliche Inhalte
Datenbanken
Werte aus einer Tabelle ersetzen Werte aus einer anderen Tabelle
Frage von neotm1Datenbanken2 Kommentare

Hallo, ich versuche mit MSSQL eine Abfrage hinzubekommen, in der Werte Aus Tabelle1 Spalte2 in eine andere Tabelle schreibt, ...

Microsoft Office
Excel-Werte eingeben und in neue Tabelle schreiben
gelöst Frage von werner1966Microsoft Office9 Kommentare

Hallo Leute, Ich hätte da mal bitte einen Lösungsvorschlag von Euch zu Excel oder Libre Calc: Mein Wissen ist ...

Microsoft Office
MS Office Access, prüfen ob wert in einer anderen tabelle vorhanden
gelöst Frage von badni12Microsoft Office11 Kommentare

Hallo Ich habe ein Insert Into Programm geschrieben, dass die Werte vom Formular x (basierend auf die Tabelle x) ...

Microsoft Office
Aus Access Tabelle in bestehende Tabelle Excel an eine bestimmte Mappe Werte übergeben
Frage von thomas1972Microsoft Office2 Kommentare

Hallo, ich komme hier an einer Stelle nicht weiter. Wie ist es möglich aus einer Access Tabelle gewisse Spalten ...

Neue Wissensbeiträge
Sicherheit

TLS-Zertifikat und privater Schlüssel von Microsofts Dynamics 365 geleakt

Information von Penny.Cilin vor 1 StundeSicherheit

Microsoft hat versehentlich das TLS-Zertifikat inklusive dem privaten Schlüssel seiner Business-Anwendung Dynamics 365 geleakt. TLS-Zertifikat und privater Schlüssel von ...

Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 23 StundenViren und Trojaner1 Kommentar

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Router & Routing

Lets Encrypt kommt auf die FritzBox

Information von bitcoin vor 1 TagRouter & Routing

In der neuesten Labor-Version der FB7490 integriert AVM unter anderem einen Let's Encrypt Client für Zugriffe auf das Webinterface ...

Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 4 TagenInternet19 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
Brainstorming, einfachste Option 1 getrenntes LAN (mit WAN zugang)
Frage von 132954LAN, WAN, Wireless13 Kommentare

Hi, folgendes: Wir bekommen eine Glasfaser Leitung, Und das sollte Optional so aussehen: Ein Modem/Router für das WAN, ein ...

Batch & Shell
Trusted Sites für alle User auf dem PC einpflegen
Frage von xXTaKuZaXxBatch & Shell12 Kommentare

Aufgabestellung: Es sollen auf 1 PC (bzw. mehreren PCs) vertrauenswürdige Sites per Powershell eingetragen werden, die für alle User ...

Netzwerkgrundlagen
Hi eine blöde frage. xD
Frage von 132954Netzwerkgrundlagen12 Kommentare

Also: Habe 2012 r2 essentials neuinstalliert, allerdings installiert diese version ja gleich diesen gangen AD kram mit, den hab ...

Netzwerkmanagement
Firefox Profieles im Roaming
gelöst Frage von Hendrik2586Netzwerkmanagement12 Kommentare

Hallo liebe Leute. :) Ich hab da ein kleines Problem, welches anscheinend nicht unbekannt ist. Wir nutzen hier in ...