Visual Basic for Applications 宏语言

打开VB编辑器

首先打开Excel,组合键Alt+F11

加载宏

找到相应的宏,点击“执行”

举例

Sub 评分()
Dim i As Integer
For i = 3 To 11
t = Sheets(1).Cells(i, 2).Value '取得成绩
If t >= 90 Then
j = "A"
ElseIf t >= 80 Then
j = "B"
ElseIf t >= 70 Then
j = "C"
ElseIf t >= 60 Then
j = "D"
Else
j = "E"
End If
Sheets(1).Cells(i, 3) = j
Next
End Sub

常用语法

Sheets(1).Name                  '工作表名字
Sheets.Count '工作表数量
Sheet1.UsedRange.Rows.Count '指定工作表已使用的行数
ThisWorkbook.Sheets(1).UsedRange.Columns.CountSheet1 '已使用的列数
Sheets(1).Cells(r, c).Value '获取单元格的值
ActiveSheet.Cells(r, c) '活动工作表单元格
MsgBox "hello furong" '消息框

最新文章

  1. [翻译]AKKA笔记 - ACTOR MESSAGING - REQUEST AND RESPONSE -3
  2. Linux初学 - 文件夹及文件操作
  3. js中的遍历foreach,$.each(),$().each()
  4. 解析iOS开发中的FirstResponder第一响应对象
  5. WPF自定义数字输入框控件
  6. 慕课linux学习笔记(七)常用命令(4)
  7. php使用 _before_index() 来实现访问页面前,判断登录
  8. vue-router跳转页面
  9. 浅谈Linux虚拟内存
  10. mysql一致性读
  11. c/c++ 多线程 detach的困惑
  12. Vue常用V-标签
  13. Legend 图例
  14. 理解 boxsizing
  15. 查询字符串(性能对比): Array Vs HashMap
  16. windows系统上搭建redis集群哨兵及主从复制
  17. 软件项目管理:什么是baseline
  18. Hyperledger Fabric v1.1.0安装记录(国内源版)
  19. VirtualBox虚拟机网络环境解析和搭建-NAT、桥接、Host-Only、Internal、端口映射
  20. adc 测量子系统

热门文章

  1. 阿里RDS数据库 全量备份恢复到本地MYSQL
  2. Reveal v4(8796) 使用
  3. SQLAlchemy如何筛选值为None的列?那么django呢
  4. Hadoop 部署之 HBase (四)
  5. 微信小程序---查看更多的显示与隐藏
  6. Flutter 异步Future与FutureBuilder实用技巧
  7. IDEA在引入Maven项目后Dependencies中在出现红色波浪线
  8. 关于Python Web框架——Tornado
  9. @ControllerAdvice和@ExceptionHandler
  10. prometheus 监控 redis + rabbitmq