如何在VBA中分配變量？

爲什麼這個工作？如何在VBA中分配變量？

echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding").Item(0).innerText

但是這將提高運行時錯誤438：

echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding") 
echipa1 = echipe.Item(0).innerText

來源

2017-09-14 Rius2

什麼數據類型是'meci2.getElementsByClassName（「COL-MD-3 EQUIPO NG結合」） '？如果它是一個對象，你還沒有說'Set echipe = meci2.getElementsByClassName（「col-md-3 equipo ng-binding」）'。什麼數據類型是'echipe'？（將一個對象的引用賦值給一個變量不同於將一個值賦值給一個變量。） – YowE3K

@ YowE3K它是一個對象，你解決了我的困境，謝謝。 – Rius2

@ YowE3K請發表一個答案，以便我可以接受 – Rius2

在聲明

echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding").Item(0).innerText

似乎已經聲明echipe是一個String，這是對一個String變量賦值有效的語法。（或許你沒有申報是什麼類型的echipe，因此它默認爲一個Variant，因此分配String值迫使它是Variant/String。）

然而，在聲明中

echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding")

看來您已宣佈echipe是某種對象，或者甚至可能是非常通用的類型Object。爲給一個變量分配給某個對象的引用正確的語法爲Set variable = object所以，你的情況，你需要

Set echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding")

來源

2017-09-24 19:59:17 YowE3K

抱歉，但它一直以來我這樣做很長一段時間... 我可能是錯的，但我認爲這將是正確的：

echipe = meci2.getElementsByClassName("col-md-3 equipo ng-binding").Item(0) 

echipa1 = echipe.innerText

對不起，如果我錯了...祝你好運！

來源

2017-09-14 22:52:19 scott

您使用'echipe.innerText'意味着'echipe'是一個對象，所以它仍然需要'Set echipe = ...'。 – YowE3K

如何在VBA中分配變量？

回答

相關問題