[VBA] Problem ze złączeniem kodu w komórce 'RowSource'. |
[VBA] Problem ze złączeniem kodu w komórce 'RowSource'. |
18.01.2013, 08:47:42
Post
#1
|
|
Grupa: Zarejestrowani Postów: 1 Pomógł: 0 Dołączył: 18.01.2013 Ostrzeżenie: (0%) |
Witam,
Jestem początkującym i za wiele nie wiem o accesie czy vba. Mam mały problem ze złączeniem kodu w komórce 'RowSource' dla listy. To jest kod, który odpowiada za pokazywanie na liście tylko osób z danej zmiany, którą wybieramy w comboboxie. Kod Lista0.RowSource = "SELECT Employees.[EmployeeID], Employees.[Shift], Employees.[EmployeeNumber], Employees.[FirstName], Employees.[LastName] FROM Employees Where [Shift] Like '*" & Me.Combo5 & "*' ORDER BY Employees.[LastName]; " Do niego muszę dołączyć, albo sprawić żeby oba kody mogły działać w jednej komórce 'RowSource' Kod LEFT JOIN Selected ON Employees.EmployeeID=Selected.SelectedID WHERE (((Selected.SelectedID) Is Null)) Mam nadzieje, że ktoś zna odpowiedź. Z góry dziękuje za pomoc! |
|
|
21.01.2013, 08:00:40
Post
#2
|
|
Grupa: Zarejestrowani Postów: 1 421 Pomógł: 310 Dołączył: 18.04.2012 Ostrzeżenie: (0%) |
Kod Lista0.RowSource = "SELECT Employees.[EmployeeID],
Employees.[Shift], Employees.[EmployeeNumber], Employees.[FirstName], Employees.[LastName] FROM Employees LEFT JOIN Selected ON Employees.EmployeeID=Selected.SelectedID Where [Shift] Like '*" & Me.Combo5 & "*' AND (((Selected.SelectedID) Is Null)) ORDER BY Employees.[LastName]; " |
|
|
Wersja Lo-Fi | Aktualny czas: 27.04.2024 - 10:41 |