Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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
GELÖST

Inhalt eines Textfeldes abhängig von CheckBoxen

Frage Entwicklung VB for Applications

Mitglied: mag-lion

mag-lion (Level 1) - Jetzt verbinden

20.04.2010 um 12:42 Uhr, 3782 Aufrufe, 4 Kommentare

Hallo,

heute quält mich folgendes Problem:

Ich erstelle eine Word-Vorlage. Das Ausfüllen soll erleichtert werden,
durch Selektion von Checkboxen, die mit Inhalt hinterlegt sind.
Beispiel:
CheckBox1=Telefonnummer
CheckBox2=Telefaxnummer
CheckBox3=Mobilnummer

Je nachdem, welche CheckBoxen angereuzt werden, ändert sich
der Inhalt in diesen einem Textfeld.

Kann also so aussehen:
Telefonnummer
Mobilnummer

oder so:
Telefonnummer
Telefaxnummer

Wird der Eintrag bei Telefaxnummer deaktiviert muss Telefonnummer
stehen bleiben. Oder es kommt zur Telefonnummer die Mobilnummer
dazu und dann doch noch die Telefaxnummer dazwischen...

usw. usf.

Packe ich das Ganze in eine if-Abfrage oder wäre case besser.
Schließlich gibt es 8 Kombinationen.

Mir fehlt der Ansatz...

Gruß
mag
Mitglied: bastla
20.04.2010 um 17:24 Uhr
Hallo mag-lion!

Vielleicht (ungetestet) so:
01.
Dim Liste As String 
02.
If CheckBox1 Then Liste = "Telefonnummer" 
03.
If CheckBox2 Then Liste = Liste & " " & "Telefaxnummer" 
04.
If CheckBox3 Then Liste = Liste & " " & "Mobilnummer" 
05.
TextBox1.Text = Replace(Trim(Liste), " ", vbNewLine) 'ev Leerzeichen am Anfang per Trim() entfernen und trennenden Leerzeichen auf Zeilenschaltung ändern
Grüße
bastla
Bitte warten ..
Mitglied: mag-lion
06.05.2010 um 14:28 Uhr
Hallo bastla,

hatte kurzfristig noch andere Igel zu kämmen, deshalb die lange Pause.

Deine Lösung könnte imho passen, aber wie bringe ich diese unter?
Im Moment habe ich jeder Checkbox folgendes zugeordnet:

01.
  
02.
Sub chkbox1_AfterUpdate() 
03.
    If chkbox1 Then 
04.
        txtbox.Value = txtbox1 
05.
        If chkbox2 Then


Naja, und das ist mein Problem mit den 8 Varianten.
Also - noch nicht gelöst.


Gruß
mag
Bitte warten ..
Mitglied: bastla
06.05.2010 um 14:49 Uhr
Hallo mag-lion!

Und wenn Du meinen Vorschlag von oben in ein "Sub CheckCheck()" verpackst und in jedem "AfterUpdate()"-Ereignis (aller beteiligten CheckBoxen) aufrufst?

Grüße
bastla
Bitte warten ..
Mitglied: mag-lion
06.05.2010 um 15:07 Uhr
Hallo bastla,

ja
ja
ja

kurz, knapp = funktioniert.
(Der Wald und die Bäume...)

Recht herzlichen Dank.


Gruß
mag
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Checkbox Event (11)

Frage von Markus2016 zum Thema Batch & Shell ...

Datenbanken
Access Checkbox mit Kombifeld und dann filtern

Frage von atomas42 zum Thema Datenbanken ...

Datenbanken
gelöst Access 2010 Textfeld automatisch aktualisieren (2)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Microsoft Office
gelöst Absatz in Textfeld deaktivieren (6)

Frage von eraiser zum Thema Microsoft Office ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
CNC Maschinen verlieren Netzwerkverbindung (kurioser Fehler) (21)

Frage von NoHopeNoFear zum Thema LAN, WAN, Wireless ...

Webentwicklung
Aktuellen Mitarbeiter auf Homepage anzeigen (13)

Frage von alemanne21 zum Thema Webentwicklung ...

Drucker und Scanner
Erfahrungen mit Enterprise-Tintenstrahldruckern A4 und A3 (13)

Frage von User1000 zum Thema Drucker und Scanner ...