  Extreme Veteran
  Beiträge: 582
     
  | Hallo,  
  
Dreho52 - 26.04.20  09:25  
damit meine Objektliste nicht allzu lang wird,  
möchte ich per Makro (VBA) eine Abfragen und Formulare ausblenden.  
Naürlich soll es auch ein Makro geben, um alle versteckten Objekte wieder einzublenden.   
  
Das TableDef-Attribut dbHiddenObject ist dein Freund:  
  
Set Db = CurrentDb  
  
Db.TableDefs("DeineTabelle").Attributes = dbHiddenObject  
bzw.  
Db.TableDefs("DeineTabelle").Attributes = Db.TableDefs("DeineTabelle").Attributes - dbHiddenObject  
  
Hinterher jeweils   
  
Application.RefreshDatabaseWindow  
  
nicht vergessen.  
 ----- Gruss - Peter |