简体   繁体   中英

passing variables from multiple workbooks to one workbook

I am using Visual basic from excel to open a different workbook and pass some things from one to another. I have the second file opening fine however I cant get the second file to read the things I need.

Sub createExcel()
Cells(1, 1).Text = "va02"
Dim objExcel
    Set objExcel = CreateObject("Excel.Application")
    objExcel.Visible = True
    Set objWorkbook = objExcel.Workbooks.Open(filepath)
    End Sub

this is my code to open the second application. I have 2 variables in 2 cells in the first workbook. How would one go about getting the variables. the problem i have encountered is; the second workbook can be called from any file, in any folder.

i would try variable = Workbooks(firstWorkbook.xlsm).worksheets(sheet1)... however the worksheets dont have the same names either. please help

thanks

Your code is in Workbook1, and opens Workbook2. So it's Workbook1 that does everything - so " I cant get the second file to read the things I need" is not meaningful.

  Sub Demo(filepath as string)
  ThisWorkbook.Worksheets(1).cells(1,1).text = "This is written by initial Workook"      
  Dim Wb as Workbook
  Set Wb = Workbooks.Open(filepath)
  Wb.Sheets(1).cells(1,2) = "So is this, even though it's in a different workbook"
  End Sub

The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM