个人中心
我的提问
我的回答
今日任务
我的设置
退出
文档资料
电脑网络
体育运动
医疗健康
游戏
社会民生
文化艺术
电子数码
娱乐休闲
商业理财
教育科学
生活
烦恼
资源共享
其它
歪果仁看中国
爱问日报
精选问答
爱问教育
爱问公益
爱问法律
Sub Macro1() [E1]="=(A1+B1)*C1" End Sub
1个回答
[haipεliηk] 在浏览WWW时,文字下方画有底线,或图形有框线时,将滑鼠移到该区域,滑鼠形状会变成手指,按下滑鼠後,便会连到另一个网页。这样的动作就是超链接。 网页中链接其它网页的文本串称为HYPERLINK.
你手工填的有错误. 代码是这样的 Sub 按钮2_单击() For Each rng In Range("c1:c10") rng.Offset(, 1) = IIf(rng.HasFormula, "有", "无") Next End Su
2个回答
不知道你只需要在A1具备这种功能,还是在一定区域内具有这种功能,先帮你做成A1到A10单元格具有这种功能吧,如果另有要求,再修改代码.具体见附件.
3个回答
上传一个样表上来,帮你做一下!
A列的第一行起,查找“张三”所在的行号公式如下: =MATCH("张三",A:A,)
Sub xx() Dim i& Dim arr, brr, crr() aa = Timer Application.ScreenUpdating = 0 arr = Range("a1:a65536") brr = Range("b1:b65536") For i = 1 To 65536 ReD...
打开这个excel ,另存为副本, (最好放到某个文件夹内) 按alt+F11, 视图---代码窗口 --把如下复制进去--按F5 运行即可 Sub fencun() Application.ScreenUpdating = False b = Sheets.Count For i = b To 1...
PublicFunctiongetteacher(rng1,rng2)Dimc :Setsh=Sheets("任课")cq=Right(Year(Now()),2)&IIf(Month(Now())<8,"春","秋")xy=Application.Match(cq,sh.Cells(2,1).Re...
这个一般的 教育书店 都有售卖的 !
你把光标定在下一行按Ctrl+D就可以了
这个需求说明白些就是根据月、年求出当月天数。 一般函数公式: =DAY(DATE(B1,A1+1,0)) VBA自定义函数: Function Mday(m%, y%) Mday = Day(DateSerial(y, m + 1, 0)) End Function 具体请参看附件:
加三角比较困难,但是可以设置成黄色,这个容易做到。
千寻千解系列图书(共7本,其中6本是讲excel的),是用案例形式讲解的,不过我建议你先看一本基础的书。
我今年自学的。感觉开始上手了。 1。如果你工作中用EXCEL的话,就从宏开始,录几个宏简化自己的工作。 2。结下来尝试写代码,处理复杂的。 3。找网上的例子,揣摩代码。试验一个一个SUB或函数的效果 4。找个教程一步一步学一篇, 边看边动手找教程的 例子 写代码
VBA即Visual Basic Application。 在Office系列软件如Excel,Word等中就有。按下ALT+F11调出。 CAD中也有。 现在很多有二次开发功能的软件都有!
两种方法:打开VB编辑器(VBE) 【1】在新的Excel中新建模块,把原来的VBA代码copy进去。 【2】在VB编辑器(VBE)工程资源窗口中,按着Ctrl把带原来的VBA代码的模块拖(复制)到新的文件中(如图,将模块1copy到Book2中)