3

如何摆脱允许用户在我的 Excel 查看器控件中添加新工作表的最后一个工作簿选项卡?

SO16766034 问题示例

我找到了以下代码来隐藏上图中的按钮:

ExcelViewer1.Application.CommandBars["Workbook tabs"]._  
              Controls["Sheet List"].Visible = false;

但它会引发 COM 异常:

“对 com 组件的调用已返回错误 HRESULT E_FAIL”。

相同的命令适用于 Ply、Cell 等其他命令栏。

4

2 回答 2

0

尝试这个

Sub remove()
  ActiveWindow.DisplayWorkbookTabs = False
End Sub

Sub add()
  ActiveWindow.DisplayWorkbookTabs = True
End Sub
于 2015-07-08T18:06:50.213 回答
0

通过 C# 隐藏 excel 的标签栏(底部)的示例代码...

object misValue = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Excel.Application appExcel = new 
Microsoft.Office.Interop.Excel.Application();
appExcel.Visible = false;
Microsoft.Office.Interop.Excel.Workbook workbook = appExcel.Workbooks.Add(misValue);
Microsoft.Office.Interop.Excel.Worksheet worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.Sheets[1];
workbook.SaveAs(Environment.CurrentDirectory + @"\a.xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue);

appExcel.ActiveWindow.DisplayWorkbookTabs = false;

appExcel.Workbooks.Close();
appExcel.Quit();
Marshal.ReleaseComObject(worksheet);
Marshal.ReleaseComObject(workbook);
于 2017-11-15T15:28:03.920 回答