[Excel] Daten aus Access in Excel Userform

bdrescher

Grünschnabel
Hallo ich habe eine Userform mit der mache ich in Access ein Update mit Folgendem Code
Code:
Private Sub combobox1_Change() 
Dim DB As DAO.Database 
Dim tblTabelle As DAO.Recordset 

Set DB = DAO.OpenDatabase("N:\Roentgen\Röntgensoftware\Data.mdb") 
Set tblTabelle = DB.OpenRecordset("NDZustand", dbOpenTable) 

With tblTabelle 
  .MoveFirst 
  .Index = "ID" 
  .Seek "=", "1" 
  .Edit 
  !NDZustand = ComboBox1.Value 
  .Update 
  
End With 

Set DB = Nothing 
Set tblTabelle = Nothing 

End Sub



damit schreibe ich ja in die Datenbank

Nun würde ich aber gerne bei Starten der Userform diese ComboBox1 mit dem Wert füllen der in der Datenbank eingetragen ist.

Danke für eure Hilfe
 
Weißt du nicht, wie du aus einer Datenbank liest oder weißt du nicht wie du es hinbekommst, dass beim Starten der Userform aus der Datenbank gelsen wird?

Für letzteres:
Code:
Private Sub UserForm_Initialize()
'...
End Sub
 

Neue Beiträge

Zurück