VBA学习-循环语句

这篇具有很好参考价值的文章主要介绍了VBA学习-循环语句。希望对大家有所帮助。如果存在错误或未考虑完全的地方,请大家不吝赐教,您也可以点击"举报违法"按钮提交疑问。

目录

一、基础知识学习

二、单元格格式

三、循环语句与判断语句


一、基础知识学习

1、对单元格赋值

Sub 赋值()

'对单元格进行赋值

Range("A1").Value = 100

End Sub

VBA学习-循环语句

2、多区域赋值

Sub 多个区域赋值()
'多区域赋值


Range("B1:C2").Value = 200
End Sub

 VBA学习-循环语句

 3、不连续区域赋值

Sub 不连续赋值()
'不连续的区域进行赋值


Range("B3,C5").Value = "不连续"
End Sub

VBA学习-循环语句

4、修改指定单元格

Sub 修改指定单元格()
'修改单元格
Range("B6").Value = "修改"

 VBA学习-循环语句

5、选定行的第一行

'行的第一行
Sub 第一行()
Rows("2:5").Rows(1).Select
End Sub

 6、选定列的第二列

'列引用
Sub 列选择()
Columns("B:G").Columns(2).Select

End Sub

7、offset属性:返回指定区域

offset(2,3)  向下偏移二行,向右偏移三列(负号是反方向偏移)

'偏移
Sub 偏移()
'向右偏移两行两列
Range("B1").Offset(2, 2).Select

8、End:获取行或列的首末行单元格

xlToLeft:返回最左端的单元格

xlToRight:返回最右端的单元格

xlToUp:返回最上端的单元格

xlToDown:返回最下端的单元格

'end应用
Sub End应用()
Range("I1").End(xlDown).Offset(1, 0) = 12

Range("I1").End(xlDown).Offset(0, 1) = "女"
End Sub

VBA学习-循环语句

9、inputbox :提示

Sub box窗口练习()
'box提示使用

gonghao = InputBox("请输入工号")
xingming = InputBox("请输入姓名")
bumen = InputBox("请输入部门")

Range("A1").End(xlDown).Offset(1, 0).Value = gonghao
Range("A1").End(xlDown).Offset(0, 1).Value = xingming
Range("A1").End(xlDown).Offset(0, 2).Value = bumen

End Sub

VBA学习-循环语句

二、单元格格式

Sub 设置单元格格式()

'合并单元格,并居中
Set biaoti = Range("A1:F1")
'合并单元格
biaoti.Merge
'字体居中
biaoti.HorizontalAlignment = xlCenter

'背景修改,字体颜色修改
Set biaotou = Range("A3:F3")
'字体居中
biaotou.HorizontalAlignment = xlCenter
'字体大小
biaotou.Font.Size = 12
'字体颜色:黑色
biaotou.Font.Color = 1
'字体加粗
biaotou.Font.Bold = True
'设置背景颜色
biaotou.Interior.ColorIndex = 15

'添加表格边框线   去除是flase
Range("A3:F9").Borders.LineStyle = True

End Sub

VBA学习-循环语句

三、循环语句与判断语句

 1、语法:

1)for循环

for 循环变量 = 初值 to 终值

        循环体

next 循环变量

2)if判断语句

if 判断 then

elseif then

else

end if

3)select case语句

Select Case分数

Case is >=90

        评定为优秀

Case is>=80

        评定为良好

Case Else

        评定为不合格

2、代码

Sub if语句()
'根据已有标准判断
For i = 2 To 7

    If Range("B" & i).Value < 60 Then
    Range("C" & i) = "不及格"
    ElseIf Range("B" & i).Value >= 60 And Range("B" & i).Value < 80 Then
    Range("C" & i) = "及格"
    ElseIf Range("B" & i).Value >= 90 Then
    Range("C" & i) = "优秀"
    Else
    Range("C" & i) = "良好"
    End If

Next i

End Sub
Sub case使用()

For i = 2 To 7

    Select Case Range("B" & i).Value
    Case Is >= 90
    Range("C" & i).Value = "优秀"
    Case Is >= 80
    Range("C" & i).Value = "良好"
    Case Is >= 60
    Range("C" & i).Value = "及格"
    Case Else
    Range("C" & i).Value = "不及格"
    End Select

Next i

End Sub

VBA学习-循环语句文章来源地址https://www.toymoban.com/news/detail-461557.html

到了这里,关于VBA学习-循环语句的文章就介绍完了。如果您还想了解更多内容,请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章,希望大家以后多多支持TOY模板网!

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处: 如若内容造成侵权/违法违规/事实不符,请点击违法举报进行投诉反馈,一经查实,立即删除!

领支付宝红包 赞助服务器费用

相关文章

  • 机器学习基础知识(1)

    机器学习是一种通过输入大量数据来构建一种模型(网络),这个训练好的模型将会被用来预测或执行某些操作,这个训练的过程和方法就是机器学习。 我们也可以理解为构建一个“函数”,使得这个函数面对我们的输入数据能够返回出某些结果,而寻找或者说构建这个函数

    2024年02月14日
    浏览(39)
  • 深度学习基础知识笔记

    怎么样提特征 (1)无人驾驶, 计算机视觉 (2)人脸识别 移动端-计算量太大,速度慢,卡。 参数:成千上百万的。 (3)医学 (4)变脸 (5)图像自动上色 有监督的问题, 1 分类: 挑战:照射角度,形状改变,部分遮挡,背景混入 套路:收集数据给定标签,训练分类器

    2024年02月13日
    浏览(62)
  • 深度学习基础知识整理

    Auto-encoders是一种人工神经网络,用于学习未标记数据的有效编码。它由两个部分组成:编码器和解码器。编码器将输入数据转换为一种更紧凑的表示形式,而解码器则将该表示形式转换回原始数据。这种方法可以用于降维,去噪,特征提取和生成模型。 自编码器的训练过程

    2024年01月17日
    浏览(50)
  • Go基础知识学习

    百度百科中Go语言的介绍: Go(又称 Golang)是 Google 的 Robert Griesemer,Rob Pike 及 Ken Thompson 开发的一种静态强类型、编译型语言。Go 语言语法与 C 相近,但功能上有:内存安全,GC(垃圾回收),结构形态及 CSP-style 并发计算。 Go 语言出生名门,是由Google公司开发出来的。 Go(

    2024年02月12日
    浏览(37)
  • 基础知识学习---排序算法

    1、本栏用来记录社招找工作过程中的内容,包括基础知识学习以及面试问题的记录等,以便于后续个人回顾学习; 暂时只有2023年3月份,第一次社招找工作的过程; 2、个人经历: 研究生期间课题是SLAM在无人机上的应用,有接触SLAM、Linux、ROS、C/C++、DJI OSDK等; 3、参加工作

    2024年02月09日
    浏览(52)
  • 音频数据处理基本知识学习——降噪滤波基础知识

    滤波是一种信号处理方法,它可以通过消除或减弱信号中的某些频率分量,来实现信号的去噪、去除干扰、增强某些频率成分等目的。常见的滤波方法包括低通滤波、高通滤波、带通滤波等。 降噪是一种信号处理方法,它可以通过消除或减弱信号中的噪声成分,来提高信号的

    2024年02月15日
    浏览(49)
  • 深度学习torch基础知识

    detach是截断反向传播的梯度流 将某个node变成不需要梯度的Varibale。因此当反向传播经过这个node时,梯度就不会从这个node往前面传播。 拼接:将多个维度参数相同的张量连接成一个张量 torch.nn.DataParallel(module, device_ids=None, output_device=None, dim=0) module即表示你定义的模型,devic

    2024年02月13日
    浏览(46)
  • (学习笔记)TCP基础知识

    TCP 是 面向连接的、可靠的、基于字节流 的传输层通信协议。 面向连接:一定是[一对一]才能连接,不能像UDP协议可以一个主机同时向多个主机发送消息,也就是一对多是无法做到的; 可靠的:无论网络链路中出现了怎样的链路变化,TCP都可以保证一个报文一定能够到达接收

    2024年02月16日
    浏览(56)
  • linux基础知识学习记录

    计算机组成:计算机主要硬件和软件2部分组成。 计算机软硬件的概念:硬件是可以看得见的物理实体,软件是运行在硬件上不可见的程序。 计算机软硬件的关系:没有硬件,程序就不会存在;没有软件,硬件就是破铜烂铁。 计算机硬件的组成:CPU(中央处理器)、内存、硬盘

    2024年02月07日
    浏览(42)
  • 【TypeScript】基础知识学习笔记

    TypeScript的特点: JavaScript的超集,满足所有的JS语法 含有面向对象的静态类型 起步安装:1、npm i typescript -g 2、tsc 文件名 一、TS的基本数据类型 基本数据类型:number、boolean、string、undefined、null、symbol、bigint、void 当中的类型有大小写的区分:大写的类型是给对象使用,小写

    2024年02月09日
    浏览(54)

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

博客赞助

微信扫一扫打赏

请作者喝杯咖啡吧~博客赞助

支付宝扫一扫领取红包,优惠每天领

二维码1

领取红包

二维码2

领红包