Проблема ссылки из другой книги с использованием VBA, потому что я хочу сделать показ - PullRequest
Новая
       11

Проблема ссылки из другой книги с использованием VBA, потому что я хочу сделать показ

0 голосов
/ 21 января 2019

Я только начинаю изучать VBA, и это мой заданный вопрос.Это требует, чтобы я использовал диапазон данных из моей рабочей книги 17067513_Excel.Я должен использовать COUNTIF, чтобы узнать, сколько ячеек содержит более 40 меток.Можете ли вы взглянуть на мой код и помочь мне 

Sub Test()
    Dim iVal As Integer
    iVal = Application.WorksheetFunction.CountIf(Workbooks("17067513_Excel.xlsx").Worksheets("17067513").Range("N2:N296"), ">40%")
Sheets("VBA").[B1] = iVal
End Sub

1 Ответ

0 голосов
/ 21 января 2019

Если вы хотите написать код для расчета COUNTIF, а также данные (диапазон, необходимый для расчета) и код, включенные в одну и ту же книгу, вы можете попробовать следующее: 

Option Explicit

Sub Countif()

    Dim Result As Long
    Dim rng As Range

    Set rng = ThisWorkbook.Worksheets("1706751").Range("N2:N296")

    Result = Application.WorksheetFunction.Countif(rng, ">40%")

End Sub

Примечание: Сохранить рабочую книгу как книгу Excel с поддержкой макросов (* .xlsm)

...