• 所有问题

    • EXCEL VBA代码问题

    一个工作薄里有5个工作表，当宏被禁用时，只显示第一个工表，2到5的工作表自动深度隐藏，
    当宏被启用时（最好是完全启用），自动隐藏第一个工作表，显示从2到5的工作表

    请问大神，如何实现

    举报该问题
    其他回答
    第1个回答  推荐于2016-08-21
    可以试试，在启用宏时，关闭工作事件中，隐藏2-5，显示1，再保存并关闭工作簿。
    在打开工作簿事件中，藏第一个工作表，显示从2到5的工作表，
    其实我没试过，估计有点用，但效果应该一般，
    想来，在使用中再禁用宏，作用就没有了。
    仅供参考吧。本回答被提问者采纳
    第2个回答  2015-11-06
    vba不能实现。
    启用宏就是启用VBA代码，宏被禁用时，word事件使用默认代码。VBA自定义代码不运行,任何自定义功能自然都不能实现。本回答被网友采纳
    相似回答
    Excel VBA错误怎么解决?答：重新创建宏：如果宏已被删除，你需要重新创建它。如果你有原始的宏代码，可以按照先前的步骤将其粘贴到VBA编辑器中。如果没有原始代码，你可能需要从头开始编写宏。使用其他电脑或版本的Excel：如果你有其他电脑或Excel版本可用，尝试在不同的环境中打开工作簿，看看是否仍然显示错误消息。这可以帮助确定问题...
    VBA代码为什么在中文Excel中显示乱码?答：如果我的猜测没有错的话，这是由于写 VBA 代码的人使用的是 繁体中文 操作系统，它在编辑 VBA 代码时使用了 Big5 码 或 CJK 码。所以，当你使用 简体中文 操作系统时，对于 VBA 来说就显示成乱码，无法正确执行。对于开发者来说，应该极力避免出现这种情况，尽量不要在 VBA 代码中使用非英文的字...
    EXCEL VBA的代码问题?答：我建议你按照以下的步骤来解决你的问题：定义变量。你需要定义一些变量来存储你需要操作的数据和范围，比如行数、列数、单元格值等。这样做是为了让你的代码更清晰和易懂，也方便后续的修改和调试。循环遍历。你需要使用For循环或者Do While循环来遍历每一行的数据，判断每一行是否满足删除或清除的条件。
    excel vba中写代码,录入中文全显示问号,这是怎么回事,该怎么解决? win...答：可能原因：语言语言代码问题 系统字体问题 解决方法：①在控制面板把语言区域调成中文 ②开始菜单--所有程序--Office 2013--Office 2013工具--语言首选项--添加设置中文为首选项 ③使用中文版Win10 ④对Excel使用转码工具(如AppLocale等)在无问题的WIN10电脑上拷贝一套字体到C;\windows\fonts\下，覆盖...
    Excel VBA错误?答：首先我们打开一个工作样表作为例子。方法/步骤2:使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Option Explicit Sub 错误示范()Dim zdrq As Variant zdrq = InputBox("输入一个大于65535的值")MsgBox zdrq End Sub 方法/步骤3:这段代码没有任何问题，实际使用中...
    EXCEL VBA代码的问题?答：xlx")While f <> ""With Workbooks.Open(p & f).VBProject.VBComponents.Remove.VBProject.VBComponents.Import "a.bas"End Withf = Dir()Wend工作原理，扫描所有的文件，移除里面的代码，重新导入。a.bas是标准工作簿导出的代码文件。注意，代码运行的前提是安全里面设置信任对工程对象的访问。
    EXCEL VBA的问题?答：lastRow = Cells(Rows.Count, "A").End(xlUp).Row '获取最后一行的行号 Dim i As Long For i = lastRow To 2 Step -1 '从最后一行向第二行循环 If WorksheetFunction.CountIf(Range("B" & i & ":Q" & i), Cells(i, "B")) > 1 _Or WorksheetFunction.CountIf(Range("B" & i...
    EXCEL VBA多行转一列,烦请大佬看下代码问题?答：【答案更新】你只需要在代码中设置好两个常量的值，即可。程序只遍历数据的行，避免了遍历所有数据的元素。这样比较节省时间，特别是数据较多时，尤为明显。Sub 数据转置()Rem 下面是声明两个常量 Const rg1$ = "C2" '【请用文本表示原数据第1个单元格的名称】Const rg2$ = "B2" '【请用文本...
    EXCEL VBA的代码问题?答：End(XX).Row这个函数它主要是查找最后一个非空单元格。End后面括号内XX有4种参数代表方向：xlup,xldown,xltoleft,xltoright 所以它不能用来实现非空行数。End(xlDown).Row效果如下，你会看到它的结果是6,xlDown是从1往下找，遇到的第一个空单元格就返回。xlDown效果如下，它是A列最后一行开始往上找，...
    大家正在搜
    EXCEL表格VBA代码解释器VBA 表格的隐藏代码EXCEL用VBA增加行VBA代码accessVBA代码EXCEL 宏Excel代码EXCELexcel VBA 提示
    相关问题
    EXCEL里面VBA代码问题！
    excel中vba代码的问题，请教一个思路即可
    excel vba 代码问题
    excel VBA 代码问题，显示语法错误。
    Excel中的VBA代码问题-应用程序定义或对象定义错误
    Excel vba出现错误
    excel VBA代码问题