我用文字保存了一条快速消息，我想从excel消息中提取一些特定信息
例如快速消息的一部分：
97A - Safekeeping Account:
Qualifier : SAFE
Account Number: 223323
17B - Flag:
Qualifier: ACTI
Flag : Y
17B - Flag:
Qualifier: CONS
Flag : N
16S - End Block GENL:
GENL
16R - Start Block SUBSAFE(Sequence B Sub-safekeeping Account):
SUBSAFE
16R - Start Block FIN(Sequence B1 Financial Instrument):
FIN
35B - Ident. of the Financial Instr.:
Identification of Security: ISIN HHHGDJKKKK
Description of Security : bjjsdhaskhd
REGISTERED SHARES
93B - Balance:
Qualifier : AGGR
Quantity Type Code: UNIT
Balance : 8300, (8.300,00)
16R - Start Block SUBBAL(Subsequence B1b Sub-Balance):
SUBBAL
我想在Excel中提取3列：
97A_Account Number 35B_ Identification of Security 93B_Balance
223323 ISIN HHHGDJKKKK 8.300,00
然后循环到下一个97A Account Number, 35B IDenfication of Security and 93B Balance的word文件中，直到文档结尾
您可以为此提供VBA吗？