Флажок Всплывающее окно в макросе - PullRequest
0 голосов
/ 07 декабря 2018

Макрос должен отображать 2 опции для выбора пользователем, и в зависимости от этого выбора должен выполняться определенный код

Например, в бюллетене

  • Percentage1 = 5%
  • Percentage2 = 2%

Пользователь выберет либо Option1, либо Option2, выполнение которых зависит от запуска макроса ввода.

Выше условия - небольшая часть всего моего макроса

Ниже приведен код, который должен быть в поле выбора

CallCount1 = Cells(Rows.Count, "A").End(xlUp).Row
Selection.AutoFilter field:=16, Criteria1:="ABANDON"
AbCount1 = Worksheets("Sheet1").AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count - 1
Percentage1 = (AbCount1 / CallCount1) * 100
MsgBox Percentage1
Selection.AutoFilter field:=14, Criteria1:=">=60"
AbCount2 = Worksheets("Sheet1").AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count - 1
AbCount = AbCount1 - AbCount2
CallCount2 = CallCount1 - AbCount2
Percentage2 = (AbCount2 / CallCount2) * 100
MsgBox Percentage2
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...