Легенда:
 новое сообщение
 закрытая нитка
 новое сообщение
 в закрытой нитке
 старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
Господа, будьте снисходительны, не бросайтесь сразу штрафовать за, как вам кажется, глупые вопросы - beginners на то и beginners.
Помогите пожалуйста сделать запрос с параметром из vba 15.09.04 16:27 Число просмотров: 1118
Автор: Мила Статус: Незарегистрированный пользователь
|
Помогите пожалуйста! В Excel заполняется каждый день информация и сохраняется в конце дня в базу basa1.mdb
В ячейке (допустим) К2 через ComboBox можно выбрать службу (Slu)
Как мне через параметр сделать выборку из базы для службы, чтобы этот параметр, ссылаясь на ячейку К2, выбирал службу и выводил соответствующую строку из базы в файл
К2
Это Excel лист
Участок фио служба(Slu) дата факт штат отп
44444 ППППП бухг 09.06.2004 11 10 1
34567 ПЕПЕП тэс 10.06.2004 5 5 1
89101 АAAA хим 11.06.2004 154 154 2
12134 МMMM хим 12.06.2004 30 28 1
45678 яяяя тэс 26.08.2004 1 2 3
33333 тытыты бухг 10.06.2004 5 4 4
Private Sub CommandButton2_Click()
Dim Slu As String
Dim xlApp As Excel.Application
Dim RWB As Workbook
Dim DB1 As Database
Set DB1 = OpenDatabase("c:\basa1.mdb")
Set RS1 = DB1.OpenRecordset(Name:="Select ush, fio, data, fakt, stat,otp from TAB2 where Slu = ?????????", Type:=dbOpenDynaset)
Set xlApp = New Excel.Application
Set RWB = Workbooks.Open("d:\Vibor\Vstav.xls")
Worksheets("Лист1").Range("A1").CopyFromRecordset RS1
End Sub
Спасибо всем. еmail : karag1@yandex.ru
|
- Помогите пожалуйста сделать запрос с параметром из vba - Мила 15.09.04 16:27 [1118]
|
|
|
подробно о проекте
Анализ криптографических сетевых...
