2014-09-18 3 views
0

다음 코드가 있습니다. 내가 참조 tbloutput을하려고 할 때변수를 DAO.Recordset의 필드 참조로 설정

Dim tbloutput As DAO.Recordset 
Dim i As Integer 
Dim v As String 
Set tbloutput = dbLocal.OpenRecordset("tbl_temp_forecast") 

For i = 38 To 52 
v = CStr(i) 
.Cells(Rowindex, Columnindex).Value = tbloutput![v] 
Columnindex = Columnindex + 1 
v = "" 
Next 

내가 가진 문제입니다! [열 이름] 나는 V 또는 I하지만 간단한 tbloutput의 값을 사용하려면! [I] 또는 tbloutput! [V]가 작동하지 않습니다 .

이 문제에 대해 조언 해 주시겠습니까?

감사합니다.

답변

1

코드에 약간의 수정이 있습니다.

For i = 38 To 52 
    v = CStr(i) 
    .Cells(Rowindex, Columnindex).Value = "tbloutput![" & v & "]" 
    Columnindex = Columnindex + 1 
    v = "" 
Next 

이 작동하는지 알려줘 문자열 설정 tbloutput = dbLocal.OpenRecordset으로 정수 희미한 V로 DAO.Recordset 희미한 난 ("tbl_temp_forecast")로

희미한 tbloutput ...

관련 문제