小编Luc*_*otz的帖子

我一直在寻找这个问题,但我还没有成功.

我试图在VBA中使用range with cells命令,最后一行是可变的.而且,我没有连续的专栏.

我必须选择范围S2:S9和U2:U9(如前所述,最后一行可以是变量).我知道这个命令有效:

Range(Cells(2, 19), Cells(NumberofRows, 19)).select

但我需要选择2个不连续的不同列.我正在尝试这样的事情,但没有成功:

Range(Cells(2, 19), Cells(NumLinhas, 19);(Cells(2, 21), Cells(NumLinhas, 21)).Select

有谁知道怎么做？

我在使用 VBA 中的 ON ERROR GOTO 功能时遇到一些问题。事实上，我不太确定我想要的是否真的可能。

我正在不同的网站收集一些信息，完整的代码在这里

Dim IE As InternetExplorer
Dim html As HTMLDocument
Set IE = New InternetExplorer
Dim Ano As Long
Dim offsetCount As Long
Dim URL As String
Dim NUMERO As String

Ano = 2012
offsetCount = 2

Do While Ano >= 2005

    Range("E1").Value = Ano
    Range("D2").Select

    Do While ActiveCell.Row <= 5571
        URL = ActiveCell.Text
TryEnterSite:
        IE.navigate URL

        Do While IE.ReadyState <> 4
            DoEvents
        Loop

        Set html = IE.document

        On Error GoTo TryEnterSite

        NUMERO = …