Menetapkan variabel berdasarkan rumus di VBA Excel

1

Saya mencoba melakukan makro sederhana yang menjalankan rumus dan menampilkannya di kotak pesan. Sekarang saya punya:

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

Yang tidak saya miliki adalah nilai yang ditetapkan untuk CAT1. Pada dasarnya saya membutuhkannya untuk menjalankan formula =COUNTIF(F2:F1000,"x")dan mengaturnya sebagai variabel CAT1. Saya telah menelusuri seluruh Google, tetapi sebagian besar yang saya temukan hanyalah orang-orang yang mencoba menggunakan makro untuk mengatur rumus dalam sel, yang merupakan kebalikan dari yang saya butuhkan.

Apa yang harus saya tambahkan ke formula kotak pesan kecil saya untuk menetapkan rumus di atas sebagai variabel CAT1?

microsoft-excel vba macros Kefka
sumber
CAT1 = COUNTIF(F2:F1000,"x")
DavidPostill

Jawaban:

2

Bagaimana tentang:

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

masukkan deskripsi gambar di sini

Siswa Gary
sumber
Jawaban sederhana yang bagus. Saya akan memberi mereka CAT1 = Application.CountIf(Range("F2:F1000"), "x").
CharlieRB
Sempurna, terima kasih. Itu adalah kurung [] yang tidak bisa saya pahami.
Kefka