Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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

Access, per VBA Zeilen aus Kombifeld ausblenden

Frage Microsoft Microsoft Office

Mitglied: Valume91

Valume91 (Level 1) - Jetzt verbinden

16.09.2009 um 12:55 Uhr, 9977 Aufrufe, 6 Kommentare

Wie kann ich per VBA zeilen in einem Kombinationsfeld ausblenden, so das diese nicht mehr zur Auswahl stehen?

Hallo liebe Admins

Wie oben beschrieben möchte ich per VBA mehrere Zeilen aus einem Kombinationsfeld ausblenden, so das diese nicht mehr zu Auswahl stehen.
Der Grund dafür ist das ich 4 Kombinationsfelder habe.
Wobei man beim ersten eine Kategorie auswählt, und beim zweiten ist dann die Auswahl begrenzt auf die Felder die zur Kategorie gehören. Es werden also
felder ausgeblendet. Ich habe bereits in verschiedenen Foren gelesen das es in der Beispieldatenbank "beispielloesung.mdb" eine solche Funktion gibt.
Leider ist diese DB nicht mehr in Access 2003 enthalten und ich habe Sie auch nirgends zum Herunterladen gefunden.
Wenn mir jemand diese schicken könnte würde mir das schon sehr helfen!

MfG Valume
Mitglied: SlainteMhath
16.09.2009 um 13:28 Uhr
Moin,

normalerweise wird nach dem update der 1ten Kombobox die Datenquelle der 2ten Kombobox angepasst.

in etwa:

01.
sub Kombo1_onChange 
02.
  Kombo2.DataSource="SELECT UnterKategorie FORM tabelle WHERE Kategorie=" & Kombo1.Value 
03.
  Kombo2.requery 
04.
end sub
(Aus dem Kopf geschrieben - kann sein das die Methoden/Eigenschaften etwas anders benannt sind)

lg,
Slainte.
Bitte warten ..
Mitglied: Valume91
21.09.2009 um 16:39 Uhr
Tag Slainte

Danke erstmal für deine Antwort!
Entschuldige mich, aber ich verstehe den Code nicht ganz.
Wo kann ich eintragen welche Felder im Kombo2 angezeigt werden wenn Kombo1 z.B. den Wert "Endprüfung" hat?
Der Code sollte so "ähnlich" aussehen: ( nur das ich halt nicht weiss wie die Befehle lauten)

if Me.Kombo1 = "Endprüfung" Then
*befehl der die auswahl von Kombo2 auf dieunddie Kriterien eingränzt*
if Me.Kombo1 = "Fertigung1" Then
*Befehl der die Auswahl von Kombo2 auf dieunddie anderen Kriterien eingränzt*
if Me.Kombo1 = "Fertigung2" Then
*Befehl der die Kriterien von Kombo2 auf dieunddie nochmalsanderen Kriterien eingränzt*
usw.

MfG Valume
Bitte warten ..
Mitglied: SlainteMhath
22.09.2009 um 08:00 Uhr
Moin,

also der Profi legt in so einem Fall 2 Tabellen an:

Tabelle Kategorien:
KategorieID
KategorieText

Tabelle UnterKategorien
UnterKategorieID
KategorieID
UnterKategorieText

Die Datenquelle von Kombo1 ist Kategorien, die von Kombo2 UnterKategorien. In den Kombo's werden jeweils die IDs der Einträge gespeichert, also KategorieID bzw UnterKategorieID

Alles andere ist programtechnisch eine Katastrophe

lg,
Slainte
Bitte warten ..
Mitglied: Valume91
22.09.2009 um 11:18 Uhr
Moin Profi ;)

Danke! das hilft mir schon einiges weiter! Das werden jedoch viele Tabellen, da ich Unter und UnterUnter Kategorien habe. Wie verknüfe ich dann die beiden Tabellen richtig? Wo ist Primär und wo Fremdschlüssel? und welche Einstellungen muss ich da vornehmen damit es korrekt funktioniert? Ich nehme mal an ohne Ref Integrität? und Welchen Verknüpfungstyp?

Gruss Valume
Bitte warten ..
Mitglied: SlainteMhath
22.09.2009 um 11:25 Uhr
Hi,


Tabelle Kategorien:
KategorieID --> Primärschlüssel
KategorieText

Tabelle UnterKategorien
UnterKategorieID --> Primärschlüssel
KategorieID --> Fremdschlüssel (Kategorien.KategorieID)
UnterKategorieText

Verknüpfiungstyp wäre in dem Fall 1:n (Kategorien.KategorieID -> UnterKategorien.KategorieID)

Ref. Intgegrität brauchts da im Prinzip nicht.

lg,
Slainte
Bitte warten ..
Mitglied: Valume91
28.09.2009 um 15:56 Uhr
Ich werdes mal so versuchen, danke für deine Hilfe!
Sollte es nicht klappen komme ich sicher auf dich zurück ;)

lg Valume
Bitte warten ..
Ähnliche Inhalte
Datenbanken
Access Checkbox mit Kombifeld und dann filtern

Frage von atomas42 zum Thema Datenbanken ...

Datenbanken
gelöst Access 2010 Filter zurücksetzen (6)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

VB for Applications
gelöst VBA Code Änderung Access 2010 (6)

Frage von Dr.Cornwallis zum Thema VB for Applications ...

Microsoft Office
gelöst Excel VBA - Jede Zeile ohne aktuelles Datum entfernen (4)

Frage von abuelito zum Thema Microsoft Office ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Monitoring
Netzwerk-Monitoring Software (18)

Frage von Ghost108 zum Thema Monitoring ...

Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (13)

Frage von ZeroCool23 zum Thema Windows 10 ...

Router & Routing
gelöst Getrenntes Routing bei VoIP und Daten (12)

Frage von Hobbystern zum Thema Router & Routing ...