Äîáðîå âðåìÿ ñóòîê! Äîëãî ìó÷àþñü íàä (êàê ìíå ñïåðâà ïîêàçàëîñü) åðóíäîâîé çàäà÷åé, õî÷ó ðàçîáðàòüñÿ ÷òî ÿ äåëàþ íå òàê. Ñóòü â ñëåäóþùåì. Åñòü áàçà äàííûõ, â íåé äâå òàáëèöû.
Ïåðâàÿ òàáëèöà "Ïåðå÷åíü", â íåé âñåãî 2 ïîëÿ:
1) "Êîä", òèï ïîëÿ "Ñ÷¸ò÷èê".
2) "Öâåò", òèï ïîëÿ "Òåêñòîâîå", íî çàïîëíÿåòñÿ îíî ÷åðåç ñïèñîê. Èñòî÷íèê ñòðîê: çàïðîñ êî âòîðîé òàáëèöå.
Ðàçðåøåí ââîä íåñêîëüêèõ çíà÷åíèé.
Âòîðàÿ òàáëèöà "Öâåòà", â íåé òàê æå 2 ïîëÿ:
1) "Êîä", òèï ïîëÿ "Ñ÷¸ò÷èê".
2) "ÍàèìåíîâàíèåÖâåòà", òèï ïîëÿ "Òåêñòîâîå".
 èñòî÷íèêå äàííûõ ïîëÿ "Öâåò" ïåðâîé òàáëèöû èñïîëüçóåòñÿ çàïðîñ:
SELECT Öâåòà.ÍàèìåíîâàíèåÖâåòà FROM Öâåòà;
Òàêèì îáðàçîì ÷åðåç ðåæèì òàáëèöû ÿ ìîãó âûáðàòü îäíî
èëè íåñêîëüêî çíà÷åíèé äëÿ êàæäîãî ïîëÿ "Öâåò" â ïåðâîé òàáëèöå. Åñëè ÿ âûáåðó íåñêîëüêî çíà÷åíèé äëÿ ïåðâîé çàïèñè â òàáëèöå (ñêàæåì âûáåðó "Êðàñíûé", "Çåëåíûé", "Ñèíèé" - ñðàçó 3), òî â ðåæèìå òàáëèöû ÿ áóäó âèäåòü âñå 3 çíà÷åíèÿ: îíè áóäóò ïåðå÷èñëåíû ÷åðåç ";" (÷åðåç òî÷êó ñ çàïÿòîé). Åñëè æå ïîñëå ýòîãî ÿ âûïîëíþ çàïðîñ "
SELECT Ïåðå÷åíü.Öâåò FROM Ïåðå÷åíü WHERE Ïåðå÷åíü.Êîä=1" òî â ðåçóëüòàòå çàïðîñà ÿ óâèæó 3 ñòðîêè. Âñ¸ âðîäå áû ðàáîòàåò êàê ïîëîæåíî. Ïðîáëåìû íà÷èíàþòñÿ äàëüøå... Òåïåðü ìíå íóæíî ïðîäåëàòü òîæå ñàìîå ÷åðåç VBA. Òî åñòü íóæíî ñôîðìèðîâàòü çàïðîñ ê ïåðâîé òàáëèöå ("Ïåðå÷åíü") è ïîëó÷èòü èç íå¸ ñïèñîê âñåõ öâåòîâ, ïåðå÷èñëåííûõ â ïîëå "Öâåò".
Äåëàþ ñëåäóþùåå:
Set RST = CurrentDb.OpenRecordset("SELECT Ïåðå÷åíü.[Öâåò] FROM Ïåðå÷åíü WHERE Ïåðå÷åíü.[Êîä]=1")
Do While Not RST.EOF
values = RST_NewsTag.Fields(0).Value
For Each v In values
Name = v.Value
Next v
RST.MoveNext
Loop
Ïðîáëåìà â òîì, ÷òî êîãäà äîõîäèò äî ñòðîêè "Name = v.Value" â ïåðåìåííóþ "Name" çàïèñûâàåòñÿ òîëüêî ïåðâîå çíà÷åíèå ïîëÿ "Öâåò". Òóäà ïîïàäàåò çíà÷åíèå "Êðàñíûé" (áåç òî÷êè ñ çàïÿòîé), òîãäà êàê â ýòîì ïîëå äîëæíî õðàíèòüñÿ (è çàïðîñ ê òàáëèöå ýòî ïîäòâåðæäàåò) âñå 3 çíà÷åíèÿ. Íî ÷åðåç VBA âèäíî òîëüêî îäíà.
Ïîìîãèòå ðàçîáðàòüñÿ - ÷òî ÿ äåëàþ íå òàê?
http://www.sql.ru/forum/1096911/poluchenie-znacheniya-polya-tablicy-soderzhashhego-spisok-dannyh-cherez-vba