Hej - mam formularz, na którym znajduje się pole "kombo". Chciałbym, aby dane do tego "kombo" były wywoływane przez kod VBA (nie przez właściwości i kreator kwerend, ponieważ później będę potrzebować VBA do wykonania kilku operacji). Kod z VBA wygląda tak jak niżej wkleiłem. I fajnie, ten kod działa - tylko dla pierwszej wartości rekordu w bazie danych (chodzi mi o pierwszy wpis). Jak to naprawić?
Dim rst As Dao.Recordset
Dim strSql As String
strSql = "SELECT KartyProjektow.KP_krotkaNazwaProjektu From KartyProjektow"
Set rst = CurrentDb.OpenRecordset(strSql)
przypisanie = rst!KP_krotkaNazwaProjektu
rst.Close
Set rst = Nothing
Kombi5.RowSource = przypisanie