Tag: 对话框
Excel正在等待另一个应用程序来完成一个OLE操作
在你明显的去之前： Application.DisplayAlerts = False还没有解决我的问题。 我已经编写了一个VBA过程（在Excel 2010中启动），它围绕包含不同Excel文件的数组进行循环。 循环打开文件，刷新数据，保存并closuresarrays中每个项目的文件。 我已经写了一个错误catch子程序，所以我logging哪些excel文件无法打开/刷新/保存等，所以用户可以手动检查他们。 有些文件相当大，涉及大量的networking数据; 有时我得到一个对话框： Excel正在等待另一个应用程序来完成一个OLE操作 。 我可以使用Application.DisplayAlerts = False来禁用消息，但这大概会禁用所有的警报，所以我无法捕捉错误？ 此外，我已经使用该行进行了testing，并且不会停止popup对话框。 如果我按下进入它进行，但几分钟后可能会popup。 有没有一种方法可以停止消息而不停止其他警报？ NB。 我的进程有一个Excel的控制实例，它运行VBA并打开要在单独的实例中刷新的工作簿。 谢谢你的帮助 我的代码提取下面是包含刷新元素 Sub Refresh_BoardPivots_Standard() ' On Error GoTo Errorhandler Dim i Dim errorText As String Dim x Dim objXL As Excel.Application Set objXL = CreateObject("Excel.Application") GetPivotsToRefresh ' populate array from SQL For Each i In […]
在perl中自动执行excel文件处理，并避免对话/ UI交互
我如何保证当我通过OLE自动化Microsoft Excel时不会出现popup对话框？ 我正在使用Perl模块（Win32 :: OLE）。 我可以使用下面的代码避免大多数对话popup窗口： use Win32::OLE; use Win32::OLE::Variant; use Win32::OLE::Const; my $excel_symbols = Win32::OLE::Const->Load('Microsoft Excel'); my $excel = Win32::OLE->new('Excel.Application', sub { $_[0]->Quit();} ); $excel->{'Visible'} = 0; $excel->{'DisplayAlerts'} = 0; $excel->Workbooks->Open('c:\some_excel_file.xls', { 'UpdateLinks' => $excel_symbols->{'xlUpdateLinksNever'}, 'ReadOnly' => 1, 'IgnoreReadOnlyRecommended' => 1 }); 但是对于某些文件，我继续使用以下文本进行对话： 这个文件不是一个可识别的格式。 如果您知道该文件来自与Microsoft Excel不兼容的其他程序，请单击“取消”，然后在其原始应用程序中打开该文件。 如果您希望以后在Microsoft Excel中打开该文件，请以兼容的格式（如文本格式）将其保存。 如果您怀疑文件已损坏，请单击“帮助”以获取有关解决问题的更多信息。 如果您仍想查看文件中包含哪些文本，请单击确定。 然后在文本导入向导中单击完成。 确定取消 有时会出现一个类似的对话框，其中包含“确定”，“取消”和“帮助”button。 我无法控制提供给脚本的文件的质量。
excel vba打开对话框导入csv
我有这个由macroslogging器生成的vba代码。 它将csv文件导入到当前的Excel表格中，并具有一些特定的列设置。 现在，csv文件的path被硬编码为“C：\ Users \ myuser \ Desktop \ logexportdata.csv”。 我怎样才能改变这一点，以便有一个对话框提示要求用户find.csv文件进行导入？ Sub Import_log() With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;C:\Users\myuser\Desktop\logexportdata.csv", Destination:=Range( _ "$A$2")) .Name = "logexportdata" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .TextFilePromptOnRefresh = […]
VBA对话框在不同的工作簿中select范围
我想让用户select一个可能在不同工作簿中的范围。 我试图用inputbox（“”，type：= 8）来做到这一点，它可以在工作簿中select数据，但拒绝让我在不同的工作簿中select一个范围。 因此，我想要一个对话框，允许我执行这个任务。
添加“你确定吗？”我的excelbutton，我怎么能？
我的表单上有一个button，可清除整个8工作表工作簿。 我想偶尔清除一下，但是我不愿意这样做。 我尝试过使用Googlesearch，但是我发现每一个结果都假设我对VBA的掌握比我更强。 我怎么能这样做，当button被点击一个对话框popup“这将消除一切！你确定吗？[继续] [取消]”？ 谢谢。
