Member Avatar for R_K_Sarma

I have tried following code to open an existing excel file. the code gets executed but the excel file does not appear on the monitor please help.
Dim xlTmp As Excel.Application
Set xlTmp = New Excel.Application
xlTmp.Workbooks.Open "L:\FormsNRegisters\Accounts\Bill_Forms.xls"
Dim xlSht As Excel.Worksheet
Set xlSht = xlTmp.Sheets(1)

  • 2 Contributors
  • 2 Replies
  • 114 Views
  • 1 Day Discussion Span
  • Latest Post Latest Post by R_K_Sarma
Member Avatar for abu taher

try this

Dim xlApp As Excel.Application
Dim xlWB1 As Excel.Workbook

Set xlApp = New Excel.Application
xlApp.Visible = True
Set xlWB1 = xlApp.Workbooks.Open("L:\FormsNRegisters\Accounts\Bill_Forms.xls")
Member Avatar for R_K_Sarma

try this

Dim xlApp As Excel.Application
Dim xlWB1 As Excel.Workbook

Set xlApp = New Excel.Application
xlApp.Visible = True
Set xlWB1 = xlApp.Workbooks.Open("L:\FormsNRegisters\Accounts\Bill_Forms.xls")

Thank u abu Taher. it works

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.