|
VBA и Oracle
|
|||
---|---|---|---|
#18+
Привет! Подскажите, 1. В ячейке есть строковое значение, мне его нужно записать в переменную, а далее мне эту переменную нужно использовать в запросе. 2. Как мне результат выборки в цикле заполнять на ячейку ниже, иначе все в одну перезаписывает 3. как присвоить переменной значение из выборки начал писать, вот что получилось пока что Sub tets() Dim cnORA As Object Dim rsORA As Object Dim vSore As String Set cnORA = CreateObject("ADODB.Connection") Set rsORA = CreateObject("ADODB.Recordset") vSore = Range("b5").Value cnORA.Open "Provider=MSDASQL.1;Password=llc;Persist Security Info=True;User ID=LLC;Initial Catalog=test;Data Source=LL_ora" rsORA.Open "select box_id from ll_list_det where cp_id=" & vSore, cnORA While Not rsORA.EOF Range("A1") = rsORA.Fields(0).Value rsORA.MoveNext Wend 'Range("A1").CopyFromRecordset rsORA rsORA.Close cnORA.Close End Sub ... |
|||
:
Нравится:
Не нравится:
|
|||
08.08.2017, 19:09 |
|
VBA и Oracle
|
|||
---|---|---|---|
#18+
Блин, по первому пункту не дописал, мне к полученному значению нужно с обеих сторон добавить одинарные кавычки. ... |
|||
:
Нравится:
Не нравится:
|
|||
08.08.2017, 19:12 |
|
VBA и Oracle
|
|||
---|---|---|---|
#18+
просто указав правильную ячейку, куда нужно записывать результат istasv89Range("A1") = rsORA.Fields(0).Value как нибудь так: Код: sql 1. 2.
... |
|||
:
Нравится:
Не нравится:
|
|||
08.08.2017, 20:34 |
|
|
start [/forum/topic.php?fid=51&gotonew=1&tid=1877949]: |
0ms |
get settings: |
12ms |
get forum list: |
5ms |
check forum access: |
1ms |
check topic access: |
1ms |
track hit: |
34ms |
get topic data: |
3ms |
get first new msg: |
3ms |
get forum data: |
0ms |
get page messages: |
103ms |
get tp. blocked users: |
0ms |
others: | 373ms |
total: | 535ms |
0 / 0 |