Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
我怎样才能按下订阅按钮?(VBA)_Vba - Fatal编程技术网

我怎样才能按下订阅按钮?(VBA)

我怎样才能按下订阅按钮?(VBA),vba,Vba,我正试图按下youtube的订阅按钮,但看起来这是不可能的 我试过这个: WebBrowser1.Document.GetElementById("subscribe-button").InvokeMember("click") 我也试过各种代码,但都不管用 有什么解决方案吗?下面是一个使用IE的工作示例 Const className As String = "yt-uix-button yt-uix-button-size-default yt-uix-button-has-icon no

我正试图按下youtube的订阅按钮,但看起来这是不可能的

我试过这个:

WebBrowser1.Document.GetElementById("subscribe-button").InvokeMember("click")
我也试过各种代码,但都不管用


有什么解决方案吗?

下面是一个使用IE的工作示例

Const className As String = "yt-uix-button yt-uix-button-size-default yt-uix-button-has-icon no-icon-markup yt-uix-subscription-button yt-can-buffer yt-uix-servicelink yt-uix-button-subscribe-branded"

Sub ClickSubcribe()
    Dim ie As Object: Set ie = CreateObject("InternetExplorer.Application")

    With ie
        'Easter Egg?
        .navigate "https://www.youtube.com/watch?v=dQw4w9WgXcQ"
        .Visible = True
        Do Until .readystate = 4: DoEvents: Loop
        .document.getElementsByClassName(className)(0).Click
    End With

End Sub

在查看这篇文章时,我在Internet Explorer中找不到ID
订阅按钮,但我在Chrome中找到了。如果您使用的是Selenium,您可能需要首先确保元素确实存在,或者WebDriver已设置为使用Chrome。

我已经搜索了2个小时,尝试了许多不同的代码,但都没有效果!我已经说过了,否则我就不在这里了。你的问题无论如何都无法回答。请参阅和。您尝试了哪些不同的代码?查找所有div元素,然后按类查找,但我已经解决了这个问题。我只需要用IE检查,它有不同的代码..我用Chrome检查,但是VB使用IE,我没有注意:P用IE检查后,我可以让它工作!谢谢你的建议!