Set Regex = New RegExp
Regex.Pattern = """[^""]*""|[^,]*"
Regex.Global = True
//I have a for loop here to loop through records
text = Cells.Item(r, 7).Value
For Each Match In Regex.Execute(text)
count = count + 1
Next Match
これは私の正規表現コードです。データを取得するテーブルは次のとおりです。
デバッグ モードでコードを実行すると、PCBaa カウントは 2 になり、c3 と c4 は 14 になり、C6-c36 は 36 になります。