育才学习网1. 巨集和片语 是什么
“巨集”是台湾的一种叫法，也就是我们所说的“宏”，简体版的的office里没有这个命令，只有宏命令。
你在word里复制粘贴“巨集”，然后“繁转简”，就可以看到“巨集”自动变成“宏”，而你在网上查所有有关“巨集”的网页几乎都是繁体字。其实简单的说就是宏命令，你要是学过C语言应该就了解巨集的意思了。
他是一种工具，它可以让工作自动执行，也可以在窗体、报表及控件中加入功能。 举一个例子，如果您在窗体中加入命令按钮，该按钮的 OnClick 事件就会关联到一个宏，该宏包含您每次单击该按钮后所要执行的命令。
片语： 1.片语是起某一类词作用，在句子中可以单独作为一个句子成分的字群。 2.片语主要包括名词片语、形容词片语、动词片语、不定词片语、动名词片语、分词片语、副词片语、介系词片语、连接词片语和感叹词片语等。
3.同一个片语在句子中可以充当不同的句子成分。
2. [VBA] 如何 利用 Excel 4.0 巨集表 不启用巨集则关闭活页簿
（若是使用增益集，就不需要"启用巨集"，改天再来写）设"中"会出现以下讯息。设"低"不会出现讯息，直接启用巨集。 设"高"就直接停用巨集。以下就介绍如何达成此功能1.利用Excel 4.0巨集表来定义巨集函数。在工作表工具列按右键→插入→Excel 4.0 巨集表输入以下内容=ERROR(FALSE)=IF(ERROR.TYPE(RUN("TestMacro"))=4)=ALERT（"因停用了巨集功能，档案将被关闭！"，3）=FILE.CLOSE(FALSE)=END.IF()=RETURN()2.在VBAProject新增一个Module，键入以下内容Option Explicit
'为每个表定义隐藏名称Sub AddPrivateNames()
Dim sht As Worksheet
'列举ForEach sht In Worksheets
'为每一个工作表指定"巨集表位置" ThisWorkbook.Names.Add sht.Name & "!Auto_Activate", "=Macro1!$A$1", FalseNextEndSubSub HideMacroSheet()
'隐藏巨集表 ThisWorkbook.Excel4MacroSheets(1).Visible = xlSheetHidden
EndSub3.在Workbook的open事件呼叫HideMacroSheet、AddPrivateNames方法Option Explicit
PrivateSub Workbook_Open()
HideMacroSheet
AddPrivateNames
End Sub4.完成后就存档、关闭，然后再开一次刚刚储存的档案，记得至少要执行过一次巨集让刚刚设定的程式生效，然后再存一次档。？？5.尔后使用者只要不启用巨集，活页簿就会被关掉。
3. 如何做到excel停用巨集就无法开启档案求解
但是如果使用者没开启巨集
工作表的大部分功能就无法执行，
所以我想设计一个
"如果使用者开启档案的时候没有选择启用巨集，就无法开出档案（或档案就自动关闭）"，
供不特定人士来点选（所以没办法一一告知）
而我们单位也会有稽查人员不定期去稽查这个档
所以如果打开档案没执行巨集
功能不执行等於白放了这个档
之所以要设定巨集
是因为单位要求很麻烦
档案里是依时间来划分表格
表格内要连结开启别的档案
时间到了表格才能设定连结&；需字体变颜色~
我的表格360个~我不想每天人工去编辑连结&；改字体颜色
所以才需要写VBA
让使用者开启的时候excel自动去执行
所以才想知道有没有"如果使用者没开巨集~档案就关闭"的写法
用意是使用者要开启这个档就一定要选择启用巨集才行不知道你是否可以帮我找到强制执行的语法感谢哦
4. Access 搜寻框要如何制作（使用巨集）
1：先假设你要寻找的栏位名称是_ 姓名2：作一个按钮_假设名称是_寻找2.1_在按钮的On_Click输入BN = InputBox（"输入查询的姓名资料"）If BN "" Then Me.Undo Me！姓名.SetFocus DoCmd.FindRecord BN if isnull(me！姓名)=true or me！姓名="" then msgbox"查无" &BN &"资料"END IF3：作一个按钮_假设名称是_寻找下一笔3.1_在按钮的On_Click输入Screen.PreviousControl.SetFocus DoCmd.FindNext以上试试！希望有帮上忙.。