Выбор метода не удался, когда активировать метод успешно !!! очень странно - PullRequest
0 голосов
/ 29 апреля 2019

Я написал эти коды VBA, которые отлично работают, за исключением одной проблемы.В заявлении rs.activate я ранее написал rs.select, который не работал.

Мой вопрос заключается в том, почему rs.activate работает здесь, а не rs.select

Sub Extract_Data()

Checklist.Sheets.Add.Name = "DataNew"


Set msi = ThisWorkbook.Sheets("MS Info")
Set rs = ThisWorkbook.Sheets("Result")
Set tmp = ThisWorkbook.Sheets("Temp")

Set evd = Checklist.Sheets("Evaluation Details")
Set smm = Checklist.Sheets("Summary")


'''''''''''''''''''''''''''
'''''''few more codes''''''
'''''''''''''''''''''''''''


rs.Activate

 With rs.Range("A2:H" & Range("G" & Rows.Count).End(xlUp).Row)
    .SpecialCells(xlBlanks).FormulaR1C1 = "=R[-1]C"
    .Value = .Value
 End With


 With rs.Range("N2:P" & Range("G" & Rows.Count).End(xlUp).Row)
    .SpecialCells(xlBlanks).FormulaR1C1 = "=R[-1]C"
    .Value = .Value
 End With

'''''''''''''''''''''''''''
'''''''few more codes''''''
'''''''''''''''''''''''''''

end sub

1 Ответ

1 голос
/ 29 апреля 2019

Как уже говорилось, вам на самом деле не нужно использовать .Activate, потому что вы указываете, из какого Листа ваш Диапазон .

Вы можете безопасно удалить любые .Activate или .Select, и ваш код будет работать.

Надеюсь, это поможет.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...