Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在VBA中使用progressbar_Vba_Ms Word - Fatal编程技术网

在VBA中使用progressbar

在VBA中使用progressbar,vba,ms-word,Vba,Ms Word,我正在尝试更新一些我最初没有编写的代码 ProgressBar出现了一个错误,但我似乎无法确定问题是什么 我的代码是: Public Function CharStyles() As Dictionary Dim CharacterProgress As ProgressBar Set CharacterProgress = New ProgressBar ' some more code after this... End Function 将鼠标悬停在“New Progres

我正在尝试更新一些我最初没有编写的代码

ProgressBar出现了一个错误,但我似乎无法确定问题是什么

我的代码是:

Public Function CharStyles() As Dictionary

  Dim CharacterProgress As ProgressBar
  Set CharacterProgress = New ProgressBar

' some more code after this...

End Function
将鼠标悬停在“New ProgressBar”上-我看到错误“ProgressBar=对象变量或未设置变量”,但我似乎可以找到有关在VBA中使用ProgressBar的任何信息,以了解该错误的含义

有人能帮我理解这里的问题吗?大概这段代码以前工作过,所以我不确定我遗漏了什么导致它崩溃


谢谢。

Word没有易于使用的内置进度条,因此它可能是插件或自定义代码的遗留部分。我的猜测是,它对代码应该执行的其他任何操作都不重要,因此我将注释所有引用进度条的行。使用CTRL+F在
项目中搜索单词progress。在做任何事情之前,制作文件的第二份副本。此外,我建议您将
Option Explicit
作为模块的第一行,以帮助您识别其他问题。如果您决定要重新添加进度条,则有多种方法,所有方法都需要不同级别的工作。(但我不建议在这一点上担心美学。)谢谢。你知道他们是怎么做到的吗?我知道这是VB的一部分。是否有一个参考我需要添加,以便我的项目可以使用VB代码?