VBA-不打开从其他工作簿获取单元格值

VBA-不打开从其他工作簿获取单元格值,vba,cell,excel,Vba,Cell,Excel,我正在努力获取其他工作簿的单元格值,而不打开它 以下是我的一些代码: Range(“F3”)=“C:\inetpub\vhosts\hotdogo.com\httpdocs\private\excel\[Launch Pad.xls]Sheet1'!$B$12” 当要提取的单元格值的数据类型为Date、Integer或任何非字符串数据类型时,此代码运行良好。但是字符串数据类型不能正常工作,它只返回N/A 谢谢有人能给我这个问题的答案 请不要使用引号(“”)进行尝试。这应该会有帮助。您可以尝试以下

我正在努力获取其他工作簿的单元格值,而不打开它

以下是我的一些代码:

Range(“F3”)=“C:\inetpub\vhosts\hotdogo.com\httpdocs\private\excel\[Launch Pad.xls]Sheet1'!$B$12”

当要提取的单元格值的数据类型为Date、Integer或任何非字符串数据类型时,此代码运行良好。但是字符串数据类型不能正常工作,它只返回N/A


谢谢有人能给我这个问题的答案

请不要使用引号(“”)进行尝试。这应该会有帮助。

您可以尝试以下答案

Sub ReadDataFromAnotherWorkBook()

    ' Open Workbook A with specific location
    Dim src As Workbook
    Set src = Workbooks.Open("C:\Users\chan.yoonghon\Desktop\Excel\BookA.xlsx", True, True)

    Dim valueBookA As Integer
    Dim valueBookB As Integer

    valueBookA = src.Worksheets("sheet1").Cells(1, 1)
    Cells(1, 1).Value = valueBookA

    ' Close Workbooks A
    src.Close False
    Set src = Nothing

     ' Dialog Answer
    MsgBox valueBookA
End Sub

如果在equal之后添加文本函数,其工作原理如下:

Range("F3")= "=text("'C:\inetpub\vhosts\hotdogko.com\httpdocs\private\excel\[Launch Pad.xls]Sheet1'!$B$12 " ;"") "

也许您应该检查
是否正确,因为有时您必须添加双精度

您有一个等号(=),它告诉Excel下面是一个公式或数字。请尝试删除等号。删除=号没有帮助。它返回字符串公式