暂无图片
暂无图片
暂无图片
暂无图片
暂无图片

单元格(Range)对象之赋值

VBA语言専攻 2023-05-16
129
【分享成果,随喜正能量】很多时候,并不是别人在折磨我们,而是我们用自己的价值观去评判对方的是非对错,是我们在折磨自己。
《VBA之Excel应用》(10178983)是非常经典的,是我推出的第七套教程,定位于初级,目前是第一版修订。这套教程从简单的录制宏开始讲解,一直到窗体的搭建,内容丰富,实例众多。大家可以非常容易的掌握相关的知识,这套教程共三册,十七章,都是我们在利用EXCEL工作过程中需要掌握的知识点,希望大家能掌握利用。今日讲解的内容是:单元格(Range)对象之赋值            
           

第四章 单元格(Range)对象  

大家好,我们这章开始学习单元格对象。单元格(Range)对象是Excel VBA中最重要的对象之一。本章概述了Range对象的属性和方法,包括如何声明一个单元格对象,如何选择单元格对象,以及对行、列的操作,还讲解了如何对单元格进行复制、粘贴、清除、计数,以及对当前区域CurrentRegion的讲解,还涉及到单元格的联合与交叉等。通过这章的学习,大家会更清楚地看到VBA的结构,以及在实际工作中VBA的综合利用。
         

第一节 对单元格对象的赋值  

在EXCEL VBA中,单元格对象是非常重要的一块内容,甚至可以说,绝大多数代码的执行都是和单元格对象相关的。这讲中我们就来认识这个单元格对象。

利用Range语句对单元格赋值实例  

 我们看下面的代码:
         
Sub mynz() '利用Range语句对单元格赋值实例
    Range("A3").Value = 2
    Range("B1:B4").Value = 5
    Range("C1:C2,D3:D4").Value = 10
End Sub
         
代码截图:
         
代码讲解:在上述代码中,我们用了三条语句来给单元格赋值,Range("A3").Value = 2 是仅对一个单元格的赋值;Range("B1:B4").Value = 5 是对"B1:B4"连续的单元格进行赋值;Range("C1:C2,D3:D4").Value = 10是对"C1:C2,D3:D4"非连续区域的单元格进行赋值。大家要记住这些基本的写法,以便在自己的代码中应用。
         
代码的执行效果:
本讲内容参考程序文件:工作簿04.xlsm
   
 
我20多年的VBA成果全在下面的资料中:
          
         
【分享成果,随喜正能量】世人不知因果,常谓人死后,则告了脱,无善恶果报,此为最误天下后世之邪见。须知人死之后,神识不灭。如人人能知神识不灭,则乐于为善。若不知神识不灭,则任意纵欲,杀父杀母,种种罪恶,由此而生。此种极恶逆之作为,皆断灭邪见所致之结果。人人能诸恶莫作,众善奉行,并须敦伦尽分,闲邪存诚,则国运可转,灾难可消。则天下太平,人民安乐。然此尚非究竟法。何为究竟法?是在念佛求生西方,了生脱死。

文章转载自VBA语言専攻,如果涉嫌侵权,请发送邮件至:contact@modb.pro进行举报,并提供相关证据,一经查实,墨天轮将立刻删除相关内容。

评论