2022-12-11 12:36来源:m.sf1369.com作者:宇宇
sub xx()
dim n%,i%
n=cells(1,1)
for i=1 to n
cells(i,3)=right((1000+i) & cells(1,2),5)
next i
end sub
造成死循环原因有这些:
1.没有循环终止条件
2.循环体执行不可能达到循环终止条件
3.循环次数过大
4.循环内的计算量过大造成死机
从原因中可以知道避免死循环的方法是,设定好循环终止条件,认真思考循环计算过程看是否每次循环都会在有限的时间内满足循环终止条件,想想循环次数是否过大,尽量让循环体中的计算量少
Sub aaa() For i = 1 To Range(a65536).End(xlUp).Row If Cells(i, 1) = 张 And Cells(i, 2) = 1 Then Cells(i, 3) = a NextEnd Sub如果要判断B列是否为空,可用函数 IsEmpty (Cells(i, 2)) ,当Cells(i,2)没有任何值时为真
合并两列:=A1&B1就行
不用下拉,找到那个下拉柄,双击!
请参阅附件
在Excel里按Alt+F11进入宏编辑器
输入
Sub main()
MsgBox Hello World!
End Sub
按F5运行(或者回到Excel那里按Alt+F8选择执行哪个过程)
Excel 函数即是预先定义,执行计算、分析等处理数据任务的特殊公式。
没有这一说。只有EXCEL中函数得运算
呵呵,你看看满意不满意吧
修改:估计你想要的是这种效果吧,我重新上传了附件
使用POWER函数。
格式:=POWER(number,power)
number为你要求幂的数。power为要求的次方。要求平方power为2。
如:8的平方 =8^2
A1的平方 =A1^2