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

Combobox in abhängigkeit einer anderen befüllen

Frage Entwicklung VB for Applications

Mitglied: tommhii

tommhii (Level 1) - Jetzt verbinden

15.05.2009, aktualisiert 09:32 Uhr, 12590 Aufrufe, 7 Kommentare

Hallo
ich habe 2 comboboxen die combobox2 soll in abhängigkeit der Combobox1 befüllt werden.wenn der Wert in zelle b13 in der combobox ausgewählt wird soll die combobox2 nur die werte von c13-c17
wenn der wert b18 in combobox ausgewählt wird soll cbo2 wert c18-c24 anzeigen

hab mal hier was probiert geht aber nicht
was mache ich falsch

Private Sub ComboBox1_Change()

If Worksheets("Server").ComboBox1 = "b13" Then
Worksheets("Server").ComboBox2.Clear
Worksheets("Server").ComboBox2.AddItem "c13"
Worksheets("Server").ComboBox2.AddItem "C14"
Worksheets("Server").ComboBox2.AddItem "c15"
Worksheets("Server").ComboBox2.AddItem "C16"
Worksheets("Server").ComboBox2.AddItem "C17"



ElseIf Worksheets("Server").ComboBox1 = "b18" Then
Worksheets("Server").ComboBox2.Clear
Worksheets("Server").ComboBox2.AddItem "c18"
Worksheets("Server").ComboBox2.AddItem "C19"
Worksheets("Server").ComboBox2.AddItem "c20"
Worksheets("Server").ComboBox2.AddItem "C21"
Worksheets("Server").ComboBox2.AddItem "c22"
Worksheets("Server").ComboBox2.AddItem "C23"
Worksheets("Server").ComboBox2.AddItem "c24"
ElseIf ComboBox1 = "b25" Then
Worksheets("Server").ComboBox2.Clear
Worksheets("Server").ComboBox2.AddItem "c25"

'ElseIf ....

End If

End Sub


Danke erstmal
Mitglied: 76109
15.05.2009 um 14:59 Uhr
Hallo tommhii,

Zitat von tommhii:
hab mal hier was probiert geht aber nicht
was mache ich falsch

Das hier ist schon mal falsch
01.
ElseIf ComboBox1 = "b25" Then
Wenn Du Textvergleich machst, dann verwende den Like-Operator. Im Gegensatz zu "=" unterscheidet das Like nicht zwischen Groß- und Kleinschreibung.

Vorausgesetzt die ComboBox1 ist schon initialisiert, dann sollte das hier funktionieren:
01.
Private Sub ComboBox1_Change() 
02.
    With Worksheets("Server") 
03.
        If .ComboBox1 Like "b13" Then 
04.
            Call InitCombBox2(13, 17) 
05.
        ElseIf .ComboBox1 Like "b18" Then 
06.
            Call InitCombBox2(18, 24) 
07.
        ElseIf .ComboBox1 Like "b25" Then 
08.
            Call InitCombBox2(25, 30) 
09.
        'ElseIf .... 
10.
     
11.
        End If 
12.
    End With 
13.
End Sub 
14.
 
15.
Private Sub InitCombBox2(ByVal Von As Integer, ByVal Bis As Integer) 
16.
    Dim i As Integer 
17.
    With Worksheets("Server") 
18.
       .ComboBox2.Clear 
19.
        For i = Von To Bis 
20.
            .ComboBox2.AddItem "c" & i 
21.
        Next 
22.
       .ComboBox2.Text = "c" & Von 
23.
    End With 
24.
End Sub
Gruß Dieter
Bitte warten ..
Mitglied: tommhii
18.05.2009 um 16:15 Uhr
Danke es klappt

hab nun noch eine Frage ich habe 6 Textboxen un 2 comboboxen und einen CommButton (eintragen) nun möchte ich das alle 6 Textboxen und die 2 comboboxen Pflichtfelder sind und man den command button erst betätigen kann wenn alles gefüllt wurde.

hat jemand eine Idee wie man das machen kann hab da schon was probiert wenn ich nur eine Textbox hätte klappt es

danke erstmal
Bitte warten ..
Mitglied: 76109
19.05.2009 um 11:23 Uhr
Hallo tommhii,

so geht's:

01.
CommButton.Enabled = False 
02.
CommButton.Enabled = True
Bedingung nicht erfüllt = False
Bedingung erfüllt = True

Gruß Dieter
Bitte warten ..
Mitglied: tommhii
19.05.2009 um 11:46 Uhr
Hallo didi1954,
und wie bau ich das in den code ein
Bitte warten ..
Mitglied: 76109
19.05.2009 um 12:45 Uhr
Hallo tommhii ,

Zitat von tommhii:
und wie bau ich das in den code ein

Sorry,aber ich kenne Deinen Code nicht.

Definiere im Eigenschaftsfenster von CommandButton -> "Enabled = False"
D.h. der CommandButton wird deaktiviert angezeigt.

Prüfe Deine TextBoxen auf gültigen Ihnalt und setze Enabled auf True, z.B. so:


01.
If TextBox1.Text <> "" And TextBox2.Text <> "" And _ 
02.
   TextBox3.Text <> "" And TextBox4.Text <> "" And _ 
03.
   TextBox5.Text <> "" And TextBox6.Text <> "" Then CommandButton.Enabled = True
Gruß Dieter
Bitte warten ..
Mitglied: tommhii
19.05.2009 um 13:13 Uhr
hallo Dieter,
danke es klappt
Bitte warten ..
Mitglied: 76109
19.05.2009 um 13:20 Uhr
Hallo tommhii,

Zitat von tommhii:
danke es klappt
prima, gern geschehen.

Gruß Dieter
Bitte warten ..
Ähnliche Inhalte
Visual Studio
Ein ComboBox ändert andere Combobox-Selected Item
Frage von Teddy74Visual Studio3 Kommentare

Guten morgen, direkt ins Problem: Ich habe ein DataSet mit Liefer Termine. Kunde Soll 5 Liefertermine auswählen können. Dafür ...

Microsoft Office
Combobox verknüpfen
Frage von GundelputzMicrosoft Office1 Kommentar

Hallo alle zusammen, ich möchte mit Excel 2010 und VBA eine Tabelle durchsuchen. In der Tabelle sind Spalten wie ...

Batch & Shell
Powershell Combobox
gelöst Frage von PeterzBatch & Shell2 Kommentare

Hallo, wie kann ich bei einer Combobox und/oder einer Messagebox das rechts oben befindliche Kreuz (weiß auf rotem Grund) ...

PHP
Abhängigkeiten in den PHP-Skripts vorbeugen
Frage von itebobPHP2 Kommentare

PHP-Skripts vom Webspace des UsersA sind per symbolischen Link in Webspaces mehrerer User eingebunden. Die Websites dieser User sind ...

Neue Wissensbeiträge
Erkennung und -Abwehr

Sicherheitslücke Spectre und Meltdown: Status prüfen

Anleitung von Frank vor 3 StundenErkennung und -Abwehr

Nach all den Updates der letzten Woche sollte man unbedingt auch den Status prüfen, ob die Sicherheitslücke Spectre und ...

Microsoft Office

Office 2010 Starter erneut auf einer frischen Windows-Version installieren

Tipp von Lochkartenstanzer vor 1 TagMicrosoft Office9 Kommentare

Moin, vor ein paar Tagen schlug bei mir ein Kunde auf, der sein Widnows 7 geschrottet und es inklusive ...

Datenbanken

Upgrade MongoDB 3.4 auf 3.6

Erfahrungsbericht von Frank vor 1 TagDatenbanken

Seit kurzem gibt es das 3.6 Update für die MongoDB: Sicherheit, das Sortieren, Aggregation und auch die Performance wurde ...

SAN, NAS, DAS

Backdoor Zugang und Upload-Bug in vielen Western Digital MyCloud Geräten

Information von Frank vor 1 TagSAN, NAS, DAS2 Kommentare

James Bercegay von der Firma Gulftech hat die Fehler an Western Digital gemeldet und das Unternehmen stellt bereits ein ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

Drucker und Scanner
Gesucht DIN A3 Drucker
Frage von NebellichtDrucker und Scanner15 Kommentare

Hallo, ich möchte einen neuen DIN A3 Drucker kaufen. Um ab und zu, ca. 1 mal die Woche Farbausdrucke ...

iOS
Einladung vom iphone kalender
Frage von jensgebkeniOS15 Kommentare

Hallo Gemeinschaft, folgendes Problem - immer wenn ich von meinem Iphone einen Termin einztrage und diesem Termin Teilnehmer zuweise, ...

Windows Netzwerk
Drucker isolieren in Windows Domäne
gelöst Frage von lcer00Windows Netzwerk14 Kommentare

Hallo zusammen, habe eine Windows-AD (2012R2) in der es einen Druckerserver gibt. Mittlerweile verliere ich das Vertrauen in die ...