Thread: Trying something with Record Set
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Mike Mike is offline
external usenet poster
  
Posts: 3,101
Default Trying something with Record Set
Sheets(wsName).Range("A" & i) = rs1!Range("DBDataField1").Value 'Same Error

Sheets(wsName).Range("A" & i) = Range("DBDataField1").Value
and this will list VENDOR_ID where it should be 44

Maybe its not ment to be

"Rick Rothstein (MVP - VB)" wrote:

Sheets(wsName).Range("A" & i) = rs1![NamedRange1] 'will not work

Try it this way (where I assume the name of your range is NamedRange1...

Sheets(wsName).Range("A" & i).Value = Range("NamedRange1").Value

Rick

Reply With QuoteReply With Quote