Java面试题及答案，VBA常用语法_vba面试(1)，java面试多长时间较好

先自我介绍一下，小编浙江大学毕业，去过华为、字节跳动等大厂，目前阿里P7

深知大多数程序员，想要提升技能，往往是自己摸索成长，但自己不成体系的自学效果低效又漫长，而且极易碰到天花板技术停滞不前！

因此收集整理了一份《2024年最新Java开发全套学习资料》，初衷也很简单，就是希望能够帮助到想自学提升又不知道该从何学起的朋友。

既有适合小白学习的零基础资料，也有适合3年以上经验的小伙伴深入学习提升的进阶课程，涵盖了95%以上Java开发知识点，真正体系化！

由于文件比较多，这里只是将部分目录截图出来，全套包含大厂面经、学习笔记、源码讲义、实战项目、大纲路线、讲解视频，并且后续会持续更新

如果你需要这些资料，可以添加V获取：vip1024b （备注Java）

正文

lastRow = Sheets(sheetName).UsedRange.Rows.Count

//删除多行

Rows(“7:12”).Delete

Range(“A12:Q12”).Clear

Range(“A12:Q12”).ClearContents

//插入一行

Sheets(sheetName).Rows(10).Insert

//为某单元格赋值

Range(“B” & 1).Select

Selection.formula = “D”

//contains,包含

If InStr(str, “zhangsan”) <> 0 Then

Else

End If

//for循环 + Replace

For i = 0 To UBound(arr)

arr(i) = Replace(Trim(arr(i)), “,”, “”)

arr(i) = Replace(valueArr(i), “;”, “”)

Next i

//Split

list = “1,2,3,4”

arr = VBA.Split(list, “,”)

//获取某单元格公式

Range(“A12”).formula

//return

exit function(函数)

exit sub(事件过程)

//截取字符串

Mid(a, 2, 3) '提取第二个字符开始之后的3个字符

//获取字符串的首字符

Left(month, 1)

//获取其它sheet单元格数据（第6行第21列）

Sheet1.Cells(6, 21).value

//获取单元格背景色

Range(“A1”).Interior.ColorIndex

//设置单元格背景颜色

For Each item In Range(Range(“A1”), Range(“H10”))

If item.value = 0 Then

   item.Interior.ColorIndex = 10

ElseIf item.value = 1 Then

   item.Interior.ColorIndex = 11

End If

Next

//赋值

Dim a As range

Set a = Sheets(sheetName).range(“A1:C6”)

a.Borders.LineStyle = 1//表格线宽度

a.Font.ColorIndex = 1//颜色

a.Font.Name = “Arial”//字体

a.HorizontalAlignment = xlCenter//居中

//计算方法耗时

Dim t As Single

t = Timer

Timer - t

//do循环

Sub ClassNamer()

Dim MyClasses As New Collection    ' 建立一个集合对象（Collection）。

Dim Num    ' 计数用变量，用来对对象的个数计数。

Dim Msg As String    ' 提示信息用变量。

Dim TheName, MyObject, NameList    ' 对象信息用变体。

Do

    Dim Inst As New Class1    ' 建立 Class1 的新实例。

    Num = Num + 1    ' 把计数变量 Num 加一，然后要求输入新对象个体的名称。

    Msg = "Please enter a name for this object." & Chr(13) _

     & "Press Cancel to see names in collection."

    TheName = InputBox(Msg, "Name the Collection Items")

    Inst.InstanceName = TheName    ' 将名称送入对象实例。

    ' 若用户输入了名称，将它加入集合。

    If Inst.InstanceName <> "" Then

        ' 将命名的对象加入集合。

        MyClasses.Add item := Inst, key := CStr(Num)

    End If

    ' 清除当前的引用，为对下一个对象做准备。

    Set Inst = Nothing

Loop Until TheName = ""

For Each MyObject In MyClasses    ' 建立名称列表。

    NameList = NameList & MyObject.InstanceName & Chr(13)

Next MyObject

' 将名称列表在消息框中显示出来。

MsgBox NameList, , "Instance Names In MyClasses Collection"



For Num = 1 To MyClasses.Count    ' 从集合中删除名字。

    MyClasses.Remove 1    ' 因为每删除一个对象后，集合

            ' 会自动重排顺序，故每次迭代时只需删除第一个

Next        ' 对象即可。

End Sub

//debug输出

Debug.Print

//字符串长度

Len(str)

//switch

Select Case myVal

Case 1

Case 2

Case 3

Case Else

End Select

//获取当月最后一天

day(DateSerial(year(Date), month(Date) + 1, 0))

//代码换行

_

//判断是否是数字

IsNumeric

//退出循环

Exit For

2、 excel vba快速填充公式（也就是往下拉）




---



### 最后

> 由于细节内容实在太多了，为了不影响文章的观赏性，只截出了一部分知识点大致的介绍一下，每个小节点里面都有更细化的内容！

![](https://img-blog.csdnimg.cn/img_convert/5d2becf17bcc0bb1a65722be662d4889.webp?x-oss-process=image/format,png)

**小编准备了一份Java进阶学习路线图（Xmind）以及来年金三银四必备的一份《Java面试必备指南》**

![](https://img-blog.csdnimg.cn/img_convert/9c4c841cba6449ce150905d97f3c33a3.webp?x-oss-process=image/format,png)



**网上学习资料一大堆，但如果学到的知识不成体系，遇到问题时只是浅尝辄止，不再深入研究，那么很难做到真正的技术提升。**

**需要这份系统化的资料的朋友，可以添加V获取：vip1024b （备注Java）**
![img](https://img-blog.csdnimg.cn/img_convert/b48c3bb09a68f82b51115a8a47eb08c9.jpeg)

**一个人可以走的很快，但一群人才能走的更远！不论你是正从事IT行业的老鸟或是对IT行业感兴趣的新人，都欢迎加入我们的的圈子（技术交流、学习资源、职场吐槽、大厂内推、面试辅导），让我们一起学习成长！**
*

[外链图片转存中...(img-gi9p3TiJ-1713556956811)]



**网上学习资料一大堆，但如果学到的知识不成体系，遇到问题时只是浅尝辄止，不再深入研究，那么很难做到真正的技术提升。**

**需要这份系统化的资料的朋友，可以添加V获取：vip1024b （备注Java）**
[外链图片转存中...(img-kWpM56b3-1713556956811)]

**一个人可以走的很快，但一群人才能走的更远！不论你是正从事IT行业的老鸟或是对IT行业感兴趣的新人，都欢迎加入我们的的圈子（技术交流、学习资源、职场吐槽、大厂内推、面试辅导），让我们一起学习成长！**