当前位置:首页 > 资讯 > 正文内容

在excel中如何使用vba?(excel vba视频教程)

3周前 (05-28)资讯26

大家好,今天小编关注到一个比较有意思的话题,就是关于excel vba视频教程的问题,于是小编就整理了1个相关介绍excel vba视频教程的解答,让我们一起看看吧。

  1. 在excel中如何使用vba?

在excel中如何使用vba?

VBA算得上是Excel的顶级应用技术了,使用VBA几乎可以解决99.99%的Excel应用问题,本问题也不例外。通过VBA遍历同一路径下的所有文档,查找文档中的的特定内容,并把对应值提取出来。具体图文演示如下:

在excel中如何使用vba?(excel vba视频教程)

在excel中如何使用vba?(excel vba视频教程)

在excel中如何使用vba?(excel vba视频教程)

在excel中如何使用vba?(excel vba视频教程)

在"悟空问答\在excel中如何使用vba"这个文件夹路径下有几个文档,如题所描述,各文档中不同位置上的相同内容对应不同值,现在需要批量提取这个对应值,比如提取到测试工作薄里,效果如下图所示。

在excel中如何使用vba?(excel vba视频教程)

实现以上功能的VBA代码如下:

Sub VBA应用()

Dim mypath As String, file As String

Dim wb As Workbook

Dim rng As Range

mypath = ThisWorkbook.Path

Application.ScreenUpdating = False

Application.DisplayAlerts = False

file = Dir(mypath & "\*.xlsx")

Do While Len(file) > 0

If file <> ThisWorkbook.Name Then

Workbooks.Open mypath & Application.PathSeparator & file, False

Set wb = ActiveWorkbook

Set rng = wb.Sheets(1).UsedRange.Find("测试").Offset(0, 1)

If rng Is Nothing Then

Exit Do

Else

n = n + 1

With ThisWorkbook.Sheets(1)

.Cells(n + 1, 2) = rng.Value

.Cells(n + 1, 3) = Left(file, Len(file) - 5)

End With

End If

file = Dir

wb.Close

End If

Loop

Set wb = Nothing

Application.ScreenUpdating =True

Application.DisplayAlerts = True

End Sub

在excel中如何使用vba?(excel vba视频教程)

代码放入测试工作薄VBE编辑界面的模块中,按F5运行即可提取到各文档中测试对应的值。欢迎关注@Excel泥瓦匠,Excel学习,E路有你!

我记得大一的时候学过excel的,但是多年没用,后来毕业了出来工作,才知道excel的重要性。然后一步步的自学,到现在应该来说excel算是入门了。

我记得那会学Excel是在我要自学网学习的,里面的教程很全面,讲的也很好,那会从excel基础到excel函数,到excel vba基础,坚持了大概半年左右。到现在连接数据库,统计数据,办公室关于excel的问题都能解决。

很多人也知道excel的重要性,但是没办法坚持学习,为什么呢?我觉得最重要的一点就是没能学以致用,大家可能觉得跟老师说的一样,老一套,但是如果你能今天学习,明天用到工作上,领导认可,同事佩服,那自然学习热情高涨,越学越有劲

位置可以随机,但是相对位置一定要固定,且关键的单元格最好是唯一的,这样可以通过Range搜索或者用数组也可以,然后用offset定位到你要的数据进行读取,操作就可以了。

我是爱尚聊IE,欢迎关注我。这种方法我不建议使用VBA进行操作,当然VBA能实现,但是一旦引入的Excel被更改名字或者删除了,这样势必会导致数据丢失。

以下我通过vlookup的函数来告诉你如何将A表格数据导入到B表格数据内。

函数为vlookup(查找值,查找区间,0或者1)

首先,你需要保证A和B单元格的查找项一致。也就是上面括号内的第一个要一致。

然后查找区间选择A表格,因为是将A数据导入B数据,然后选择0,进行精确查找,这样的话,这个数据就会查找到了。

同时!

如果你为了以后数据丢失,你可以先复制这个查找到的数据,然后粘贴为文字格式,这样即使A数据表数据变化,也不会导致B数据表变化。

具体可以参照下图

在excel中如何使用vba?(excel vba视频教程)

VBA相当于Excel的内层语言,你需要了解一般的语言结构,例如怎么触发一段语句,怎么写循环语句,条件语句,怎么跳出循环......总之需要有点计算机语言基础,但不需要特别精通。我相信你具备上述条件,然后仔细看看我的百度经验[傻瓜都会用VBA]后,一定会写VBA。加油💪

到此,以上就是小编对于excel vba视频教程的问题就介绍到这了,希望介绍关于excel vba视频教程的1点解答对大家有用。

分享给朋友:

“在excel中如何使用vba?(excel vba视频教程)” 的相关文章

历代速腾车长?(速腾尺寸长宽高对比?)

历代速腾车长?(速腾尺寸长宽高对比?)

大家好,今天小编关注到一个比较有意思的话题,就是关于新速腾长宽高是多少的问题,于是小编就整理了5个相关介绍新速腾长宽高是多少的解答,让我们一起看看吧。历代速腾车长?速腾尺寸长宽高对比?大众速腾长宽高?速腾l车长多少?19款速腾车长是多少?历代速腾车长?速腾长宽高分别为4753mm、1800mm、14...

长安cs75长宽高多少?(CS75车长多少?)

长安cs75长宽高多少?(CS75车长多少?)

大家好,今天小编关注到一个比较有意思的话题,就是关于长安cs75长宽高多少的问题,于是小编就整理了5个相关介绍长安cs75长宽高多少的解答,让我们一起看看吧。长安cs75长宽高多少?CS75车长多少?长安CS75的长宽高是多少呢?长安cs75多长多宽多高?长安cs75长宽高多少?长安cs75长宽高多...

朗逸车型都一样大吗?(上海大众朗逸长宽高是多少?)

朗逸车型都一样大吗?(上海大众朗逸长宽高是多少?)

大家好,今天小编关注到一个比较有意思的话题,就是关于朗逸长宽高多少的问题,于是小编就整理了4个相关介绍朗逸长宽高多少的解答,让我们一起看看吧。朗逸车型都一样大吗?上海大众朗逸长宽高是多少?历代朗逸尺寸?朗逸车身长?朗逸车型都一样大吗?不一样大。因为朗逸车型有多种不同的车款和车型,其长、宽、高等尺寸差...

上班族饭盒多大合适?(一次性塑料饭盒的长宽?)

上班族饭盒多大合适?(一次性塑料饭盒的长宽?)

大家好,今天小编关注到一个比较有意思的话题,就是关于正常饭盒长宽高多少的问题,于是小编就整理了5个相关介绍正常饭盒长宽高多少的解答,让我们一起看看吧。上班族饭盒多大合适?一次性塑料饭盒的长宽?750方盒饭盒长宽高?1l的饭盒长宽高大概是多少?饭盒是几寸的?上班族饭盒多大合适?上班族单位大部分有食堂,...

尼桑新阳光底盘多少高?(11款阳光自重?)

尼桑新阳光底盘多少高?(11款阳光自重?)

大家好,今天小编关注到一个比较有意思的话题,就是关于日产新阳光长宽多少高的问题,于是小编就整理了3个相关介绍日产新阳光长宽多少高的解答,让我们一起看看吧。尼桑新阳光底盘多少高?11款阳光自重?新阳光2020款长宽高多少?尼桑新阳光底盘多少高?  底盘高度是117mm。  日产新阳光,是东风日产品牌目...

艾瑞泽5长宽高?(艾瑞泽7排量多大?)

艾瑞泽5长宽高?(艾瑞泽7排量多大?)

大家好,今天小编关注到一个比较有意思的话题,就是关于艾瑞泽7长宽高多少的问题,于是小编就整理了4个相关介绍艾瑞泽7长宽高多少的解答,让我们一起看看吧。艾瑞泽5长宽高?艾瑞泽7排量多大?jaecool7奇瑞参数?艾瑞泽7车长?艾瑞泽5长宽高?在定位上,“艾瑞泽5”处于“艾瑞泽7”(A+级)和“艾瑞泽3...