由于近期要用到excele中的宏,竟然网上没有一个简单的完整demo(可能太简单了吧),在这里整理成demo,对于简单的设置应用足够了。

大前提:excle表分sheet,sheet中是cell.

Sub test() ' 开始一个宏的模块 test是名字 可任意取名

在操作某一个sheet之前要选中

Sheets("sheet1").select  ' 选中sheet

Dim va as Integer ' 定义一个类型为integer 的变量 va

va = Range("B3").Value ' 给va 赋值为B3单元格的值

If va > 0 Then  ' if 条件语句 都是这种格式

va = 100

Else

va = -100

End if

Select Case va  ' case 条件语句

Case -100

va = -1000

Case 100

va = 1000

Case Else

va  = 0

End Select

Dim i As Integer ' 定义变量i

'循环

For i=1 To 10 Step 2  ' for循环  从1开始 10结束 每个循环i 增加2

Cells(i,1) = va  ' 将va 的值赋值给 Cells(i,1) 单元格 第i 行 第一列

Next

For Each rag In [a1:a10]  ' 将a1 -a10单元格进行循环 每次循环值给rag

i = i+1

rag.Value = i

rag.Interior.ColorIndex = 3   '将这个单元格的颜色变为3  这是颜色的索引 每个数字代表不同的颜色

If i = 5 Then

' Exit Sub  ' 退出整个程序 程序接续

Exit For   '退出这个For循环 但是程序往下进行

End If

Next     ' for循环固定格式不要忘

Range("A1").Offset(5,1) = va ' 将va的值赋值给A1单元格向下偏移5行,向右偏移1列的这个单元格

End Sub ' 结束宏的这个模块

附一个简单的例子:

Dim va As Integer
Dim myStr As String

Sub test1()

Dim i As Integer
Dim j As Integer

i = 3
j = 3
Rem 将b3 到b16的单元格value 循环赋值给rag;
For Each rag In [b3:b16]
    myStr = rag.Value
    Rem 如果value中含有北 或者 南 那么放在cells单元格
    If ((InStr(1, myStr, "北") <> 0) Or (InStr(1, myStr, "南") <> 0)) Then 
       Rem Sheets("sheet2").Select
       i = i + 1
       Cells(i, j) = myStr
       Rem Sheets("sheet1").Select
    End If
Next

End Sub

excele 中的宏的简单语法相关推荐

  1. Excel中的宏--VBA的简单例子

    第一步:点击录制宏 第二步:填写宏的方法名 第三步:进行一系列的操作之后,关闭宏 第四步:根据自己的需要查看,修改宏 第六步:保存,一般是另存为,后缀名为.xlsm,否则宏语言不能保存. 到此为止恭喜 ...

  2. 【ABAP系列】SAP ABAP 宏的简单使用

    公众号:SAP Technical 本文作者:matinal 原文出处:http://www.cnblogs.com/SAPmatinal/ 原文链接:[ABAP系列]SAP ABAP 宏的简单使用 ...

  3. ANTLR笔记2 - 简单语法说明

    ANTLR的语法文件使用扩展巴科斯范式EBNF描述,记得编译原理的用起来非常简单,需要进一步了解的是怎么构造自己的recognizer和translator.很多的语法不需要从头写,一方面很多语言标准 ...

  4. C/C++ 中的宏 (macros) 与宏展开的可视化显示

    C/C++ 中的宏 (macros) 与宏展开的可视化显示 1. Replacing text macros (替换文本宏) https://en.cppreference.com/w/cpp/pre ...

  5. python展开 c函数中的宏预处理_Linux C语言结构体-学习笔记

    Linux C语言结构体简介 前面学习了c语言的基本语法特性,本节进行更深入的学习. 预处理程序. 编译指令: 预处理, 宏定义, 建立自己的数据类型:结构体,联合体,动态数据结构 c语言表达式工具 ...

  6. C++中的宏定义详解

    转载自:C++中的宏定义 和 C++宏定义详解 目录 一.#define解析 1 #define命令剖析 1.1   #define的概念 1.2 宏替换发生的时机 1.3 ANSI标准说明了五个预定 ...

  7. Excel VBA简单语法

    摘要: 该文为想要学习VBA编程的会计和编程同学有使用VBA实现Excel自动化处理和一定的个性化定制Excel操作提供参考 第一篇为::VBA简单语法 第二篇为: Excel 编写第一个简单的VBA ...

  8. C语言怎么判断字符YN,c语言中的宏_详解(转)

    1. 简单宏定义 简单的宏定义有如下格式: [#define指令(简单的宏)] #define 标识符替换列表 替换列表是一系列的C语言记号,包括标识符.关键字.数.字符常量.字符串字面量.运算符和标 ...

  9. C语言中的宏函数与宏定义

    目录 1.无参宏定义 1.1 无参数宏定义的格式: 1.2 使用说明: 2.带参宏定义 2.1 带参数宏定义的格式: 2.2 使用说明: 3.带参宏定义与函数调用的区别 4.头文件中常用的宏定义 5. ...

最新文章

  1. [:zh]给机械课程设计的一封信[:] 2017-12-23
  2. mysql查看锁表与解锁
  3. 改进初学者的PID-微分冲击
  4. Firefox下去掉密码自动填充
  5. 论文阅读:BPFINet: Boundary-aware progressive feature integration network for salient object detection
  6. java判断是否失效_java – 如何在输入有效之前检查无效输入和循环?
  7. 简单说几个常见的数据结构
  8. centos 网络自动连接_自动连接最优信号 腾讯云?云兔解决物联网络连接问题
  9. 这么多技术我该怎么学 杨中科
  10. windows功能_windows必备的系统功能增强2具,免费,简单,实用
  11. 【编译原理】语义分析S属性定义的自下而上计算
  12. iOS 9的App Thinning方案如何节省存储空间
  13. 【汇编语言实验一】用机器指令和汇编指令编程(1)
  14. 从键盘输入一个四位数,输出该四位数的个位,十位,百位和千位数分别是什么。
  15. 玩转Qml(18)-用户向导
  16. Linux如何带压缩密码的7z,Linux 压缩和解压 7z
  17. 模电——电源与地之间并联电容的作用
  18. Python中squeeze函数用法
  19. 使用CARLA模拟器实现DQN自动驾驶(三)导航系统
  20. matlab绘图(1)

热门文章

  1. 边缘化你必须知道的一件事!(FEJ知识点总结)
  2. 投资理财-关于打新的
  3. struts2标签解析(一)
  4. python制作图片数据集 h5py_python库——h5py入门讲解
  5. 解决 Hexo 配置 Valine 报错问题
  6. 如何支持github账号登录
  7. POJ - 1579 Function Run Fun
  8. 新媒体运营教程:运营活跃社群的玩法分析
  9. iData数据工厂升级啦!V2.3版体验有多妙?赶紧来了解一下吧…
  10. STM32F103学习笔记(1)掌握GPIO操作—输出模式(推挽/开漏)