11,excel vba 代码的简化和重复使用_初识函数.

在没有洗衣机的年代, 我们是怎么洗衣服呢? 

博主在七岁那年就会洗衣服了. 

洗衣服大概分为下面几个步聚 

1,先扔进水里打湿

2,捞出来抺上肥皂

3,在搓衣板下搓几下

4,扔进洗水里漂一下

5,拧干

每次洗衣服都要经历这些步聚.博主毕竟比较懒,就会想到有没有一种办法.  我只要把衣服扔进去.我就不用理会 这些麻烦的步聚,

过一段时间. 它就帮我洗好了呢. 

就好像数学上我们学过的函数一样.  y=a(x),  我只要知道告诉这个函数x 等于多少,就可以得到y了. 

有点类似于:  洗好的衣服= a(衣服)   我只要把衣服扔进去,就可以不用管它是怎么弄的.过段时间就出来了. 

于是乎,有这种功能的设备,后来就问世了,名叫做点点didi洗衣机

在洗衣机里

 

函数  洗衣机(x)

1,先扔进水里打湿

2,捞出来抺上肥皂

3,在搓衣板下搓几下

4,扔进洗水里漂一下

5,拧干

结束 函数

 

当我们哪天想洗衣服的时候,  只要 先上  洗衣机(x=衣服) , 我们就不用管洗衣服需要什么步聚了,反正我们只要知道它会反回给我们洗好的衣服就好了.

 

函数的英文叫 function. 基于上述的一些道理, 我们有时候写程序,可能也想好了一个功能,需要很多步聚.

比如 我想给一个单元格的内容改成红色,且每个值都要乘上520 ,且前面还要加上  爱你  两个字.

 

Public Sub diandian11()

  Range("A1").Font.ColorIndex = 3
  Range("A1").Value = Range("A1").Value * 520
  Range("A1").Value = "爱你" & Range("A1").Value
  
  

End Sub

 

有时候我们可能想把任一个一个单元格也做如上面的操作. 
但是每次都要计算做了什么操作很麻烦,想到上面的函数,,由是我想对 单元格 a2 ,也做上面的操作,接下来写个函数

就叫做 loveyou 吧

Function loveyou(danyuange)

   danyuange.Font.ColorIndex = 3

   danyuange.Value = danyuange.Value * 520
   danyuange.Value = "爱你" & danyuange

End Function

整个代码如下:

Public Sub diandian11()

     loveyou Range("A2")
 

End Sub

Function loveyou(danyuange)

    danyuange.Font.ColorIndex = 3

    danyuange.Value = danyuange.Value * 520
    danyuange.Value = "爱你" & danyuange

End Function

我们会对 A2 也做上面的操作

 

运行一下. 

 

如果你不用函数, 想对这两个做这种操作,那你可能需要这样写了

 

如果你想对一百个做这种操作呢? 

 

所以有了函数这个东西, 就可以简化我们的代码, 不仅是代码数里上,同时也是思维上,我们不用关心怎么洗洗衣服,

不用关心里面做了什么,只知道我扔进了衣服,它就给我洗好了. 

而这里, 我们也只要知道, 扔进去一个单元格, 它就会帮我做这些操作了. 

所以函数其实就是, 你给它扔进一个东西,它会按你原先写好的步骤,帮你处理好后,返回给你.