选择题宏编程
❶ excel 选择单元格的宏编写问题
RANGE("A1").SELCET 选择单元格
SELECTIONG.…… 接下去是对选择的操作
❷ 数控编程宏程序的编程及应用及例题
用 户 宏 程 序
能完成某一功能的一系列指令像子程序那样存入存储器，用一个总指令来它们，使用时只需给出这个总指令就能执行其功能。
l 所存入的这一系列指令——用户宏程序
l 调用宏程序的指令————宏指令
l 特点：使用变量
一． 变量的表示和使用
（一） 变量表示
＃I(I=1,2,3,…)或＃[＜式子＞＝
例：＃5，＃109，＃501，＃[＃1＋＃2－12]
（二） 变量的使用
1． 地址字后面指定变量号或公式 0
格式： ＜地址字＞＃I
＜地址字＞－＃I
＜地址字＞[＜式子＞]
例：F＃103，设＃103＝15 则为F15
Z－＃110，设＃110＝250 则为Z－250
X[＃24＋＃18＊COS[＃1]]
2． 变量号可用变量代替
例：＃[＃30]，设＃30＝3 则为＃3
3． 变量不能使用地址O，N，I
例：下述方法下允许
O＃1；
I＃2 6.00×100.0;
N＃3 Z200.0；
4． 变量号所对应的变量，对每个地址来说，都有具体数值范围
例：＃30＝1100时，则M＃30是不允许的
5． ＃0为空变量，没有定义变量值的变量也是空变量
6． 变量值定义：
程序定义时可省略小数点，例：＃123＝149
MDI键盘输一． 变量的种类
1. 局部变量＃1~＃33
一个在宏程序中局部使用的变量
例： A宏程序 B宏程序
… …
＃10＝20 X＃10 不表示X20
… …
断电后清空，调用宏程序时代入变量值
2. 公共变量＃100~＃149，＃500~＃531
各用户宏程序内公用的变量
例：上例中＃10改用＃100时，B宏程序中的
X＃100表示X20
＃100~＃149 断电后清空
＃500~＃531保持型变量（断电后不丢失）
3. 系统变量
固定用途的变量，其值取决于系统的状态
例：＃2001值为1号刀补X轴补偿值
＃5221值为X轴G54工件原点偏置值
入时必须输入小数点，小数点省略时单位为μm
一． 运算指令
运算式的右边可以是常数、变量、函数、式子
式中＃j，＃k也可为常量
式子右边为变量号、运算式
1． 定义
＃I＝＃j
2． 算术运算
＃I=＃j+＃k
＃I=＃j－＃k
＃I=＃j＊＃k
＃I=＃j／＃k
3． 逻辑运算
＃I＝＃JOK＃k
＃I＝＃JXOK＃k
＃I＝＃JAND＃k
4． 函数
＃I＝SIN[＃j] 正弦
＃I＝COS[＃j] 余弦
＃I＝TAN[＃j] 正切
＃I＝ATAN[＃j] 反正切
＃I＝SQRT[＃j] 平方根
＃I＝ABS[＃j] 绝对值
＃I＝ROUND[＃j] 四舍五入化整
＃I＝FIX[＃j] 下取整
＃I＝FUP[＃j] 上取整
＃I＝BIN[＃j] BCD→BIN（二进制）
＃I＝BCN[＃j] BIN→BCD
1． 说明
1] 角度单位为度
例：90度30分为90．5度
2] ATAN函数后的两个边长要用“1”隔开
例：＃1＝ATAN[1]／[－1]时，＃1为了35．0
3] ROUND用于语句中的地址，按各地址的最小设定单位进行四舍五入
例：设＃1＝1．2345，＃2＝2．3456，设定单位1μm
G91 X－＃1；X－1．235
X－＃2 F300；X－2．346
X[＃1＋＃2]；X3．580
未返回原处，应改为
X[ROUND[＃1]＋ROUND[＃2]]；
4] 取整后的绝对值比原值大为上取整，反之为下取整
例：设＃1＝1．2，＃2＝－1．2时
若＃3＝FUP[#1]时，则＃3＝2．0
若＃3＝FIX[#1]时，则＃3＝1．0
若＃3＝FUP[#2]时，则＃3＝－2．0
若＃3＝FIX[#2]时，则＃3＝－1．0
5] 指令函数时，可只写开头2个字母
例：ROUND→RO
FIX→FI
6] 优先级
函数→乘除（＊，1，AND）→加减（＋，－，OR，XOR）
例：＃1＝＃2＋＃3＊SIN[＃4]；
7] 括号为中括号，最多5重，园括号用于注释语句
例：＃1＝SIN[[[#2+#3]*#4+#5]*#6]；（3重）
一． 转移与循环指令
1．无条件的转移
格式： GOTO 1；
GOTO ＃10；
2．条件转移
格式： IF[＜条件式＞＝ GOTO n
条件式：
＃j EQ＃k 表示＝
＃j NE＃k 表示≠
＃j GT＃k 表示＞
＃j LT＃k 表示＜
＃j GE＃k 表示≥
＃j LE＃k 表示≤
例： IF[＃1 GT 10] GOTO 100；
…
N100 G00 691 X10；
例：求1到10之和
O9500；
＃1＝0
＃2＝1
N1 IF [＃2 GT10] GOTO 2
＃1＝＃1＋＃2；
＃2＝＃2＋1；
GOTO 1
N2 M301．循环
格式：WHILE[＜条件式＞＝DO m；（m＝1，2，3）
…
…
…
ENDm
说明：1．条件满足时，执行DOm到ENDm，则从DOm的程序段
不满足时，执行DOm到ENDm的程序段
2．省略WHILE语句只有DOm…ENDm,则从DOm到ENDm之间形成死循环
3．嵌套
4．EQ NE时，空和“0”不同
其他条件下，空和“0”相同
例：求1到10之和
O0001；
＃1＝0；
＃2＝1；
WHILE [＃2LE10] DO1；
＃1＝＃1＋＃2；
＃2＝＃2＋＃1；
END1；
M30；
钻一百个孔的程式：
O0010;
#100=0;
#101=0;
G49 G80 G40;
M6 T1;
G00 G90 G54 X#100 Y#101;
G43 H1 Z100. M13 S2000;
N1 G54 X#100 Y#101;
G98 G81 R3. Z-18.F350;
N2 #100+10.
IF [#100 GT 100 ] GOTO 4;
G54 X#100 Y#101;
GOTO 2
N4 #101+10. #100=0.
IF [ #101 GT 100 ] GOTO 3;
GOTO 1;
N3 M30;
❸ C语言宏定义 中一选择题 概念性
答案肯定是B的，提问者的疑惑是30明明是一个
常数
，问什么会变成一个
字符串
呢!其实是提问者对
宏定义
的理解不够透彻造成的。
让我们来看一下宏定义的
含义
到底是什么(注:笔者自己的理解可能言语表达上不够严谨)，宏定义的作用是在
程序
编译以前，把宏定义的内容(
如题
中MAX)用事先安排好的内容(如题中30)代替，然后在进行编译，也就是说宏定义的作用就有点像是我们人在编程序，然后写上了30这个字符串。只不过这个写的
过程
有一部分工作是
编译器
帮助我们完成的。所以宏定义可以理解为用一个字符串特定且一定的代替另一个字符串，宏定义是不允许重复
定义
的。
❹ 以下两题如何用Excel中的宏编写程序
程序1
subWorkBook_BeforeClose(Cancle)
dimrasrange
foreachrinRange("b3:f3").Cells
ifr.Value<0orr.value>100then
msgboxr.address&"不在0-100之间，请修改！"
cancle=true
endif
nextr
endsub
程序2
subx()
dimrasrange
foreachrinsheet1.usedrange.cells
ifr>0andr<60then
r.color=vbRred
r.font.color=vbYellow
endif
nextr
endsub
❺ 用Excel中的宏编写下题程序，一定要用Excel的宏
Sub宏1()
[D1]=Time'记录开始时间
Columns("A:A").Select'选择A列
Range("A:A").AdvancedFilterAction:=xlFilterCopy,CopyToRange:=Range(_
"B1"),Unique:=True'将不重复的内容放B1开始
Range("C1").Select'选择C1
ActiveCell.FormulaR1C1="=COUNTIF(C[-2],RC[-1])"'以B1对A列计数
Range("C1").Select'选择C1
Selection.AutoFillDestination:=Range("C:C"),Type:=xlFillDefault'
Range("C:C").Select'粘贴到C列
[D1]=Time-[D1]'当前时间-开始时间
EndSub
❻ 关于宏的汇编程序题:
定义一个宏，宏名为EXCHANGE ，参数为 MEM1,MEM2,REG，调用时会在调用位置复制该段宏代码，并且将对应参数换成后面的参数值。。。。
❼ excel 里宏编程问题
i = Range("A45").Value'这一句中，如果A45单元格中有数值，应该这样写
For t = 2 To i Step 2'这一句中，应写成For t = 2 To i Step 2
'a = Cells(3, 9 * t / 2 - 7).Address'这一句不需要
'b = Cells(33, 9 * t / 2).Address'这一句不需要
'c = a + ":" + b'这一句不需要
Range(Cells(3, 9 * t / 2 - 7),Cells(33, 9 * t / 2)).ClearContents'单元格区域的表示方法是这样的，删除内容时无需先选择它
Next
❽ 宏程序怎么编程
这是前几天无聊时，IFGOTO格式写的一个法兰克通用飞面程序。
❾ 关于宏程序编程的问题向您请教
如果在程序中把坐标系用宏表示可以这样写，Ｇ１０Ｌ２Ｐ１这个代表的就是Ｇ５４，Ｇ１０Ｌ２Ｐ２代表的是Ｇ５５，一直到Ｇ１０Ｌ２Ｐ６代表Ｇ５９，如果想读当前主轴刀具号码的话是＃４１２０，你的程序中＃２０＝＃４１０７的意思是说当前使用的刀具补偿号带如到＃２０中，＃７是这个刀值的实际半径值，D#20=#［13000+#20］；这句的意思是＃１３０００代表的是刀值的长，如果你的＃２０＝１的话，也就是说是使用的１号刀具的长度值，等号后面就是＃１３００１，如果１号刀具的长度为１００的话，＃２０就等于１００，也就是说Ｄ１００了，（如果在主程序设D125能调也直径125的刀来吗？）这里面的Ｄ１２５不是代表直径为１２５的刀具，而是使用了１２５号刀的半径补偿
❿ excel 宏 编程：选取一个区域，要求生成两个折线图（前一半生成一个，后一半也生成一个），如何实现
调用下面的函数。（2007版以上excel适用）
两个函数选择的是同一数据作图，只是生成的图的位置不同。
sub ChartAdd1()
Range("a1:a8").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=ActiveSheet.Range("$a$1:$a$8")
ActiveChart.ChartType = xlLineMarkers
With ActiveChart.Parent
.Left = 750 '此处用以修改图表在工作表中的位置
.Top = 3000
End With
Range("a1").Select
End Sub
Sub ChartAdd2()
Range("a1:a8").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=ActiveSheet.Range("$a$1:$a$8")
ActiveChart.ChartType = xlLineMarkers
With ActiveChart.Parent
.Left = 750
.Top = 5700
End With
End Sub