我正在尝试在VBA中创建一个用于单词的宏来浏览文档并获取文本格式的每个实例,并将其输入到表的不同行中。为此,我有一个循环遍历此格式的每个实例,并将其添加到队列中,并将队列中的每个项目放在表中的不同单元格中,但是当我运行程序时,我在< / p>
Imports System.Collection.Queue
表示“编译错误:找不到方法或数据成员”,它不会让我使用程序的队列元素。程序的其余部分都运行正常。我假设这是因为VBA无法访问System.Collection.Queue库。在那里我可以访问VBA中的队列函数或以不同的方式实现此程序而不使用队列吗?
答案 0 :(得分:2)
Dim q
Set q = CreateObject("System.Collections.Queue")
q.enqueue "A"
q.enqueue "B"
q.enqueue "C"
Debug.Print q.peek '>> "A"
Do While q.Count > 0
Debug.Print q.dequeue
Loop