Atribuindo uma variável baseada em uma fórmula no Excel do VBA

Question

Estou tentando fazer uma macro simples que executa uma fórmula e a exibe em um msgbox. Agora eu tenho:

Sub basic_messagebox()
    Dim CAT1 As Integer
    MsgBox "The total number of possible Cat I: " & CAT1
End Sub

O que eu não tenho é um valor definido para CAT1. Basicamente, eu preciso executar a fórmula =COUNTIF(F2:F1000,"x") e defini-la como a variável CAT1. Eu estive pesquisando tudo, mas a maioria do que eu estou achando é apenas pessoas tentando usar macros para definir fórmulas nas células, o que é o oposto do que eu preciso.

O que eu preciso adicionar à minha pequena fórmula msgbox para definir a fórmula acima como a variável CAT1?

    

Answer 1

Que tal:

Sub basic_messagebox()
    Dim CAT1 As Integer
    CAT1 = [COUNTIF(F2:F1000,"x")]
    MsgBox "The total number of possible Cat I: " & CAT1
End Sub