VBA常用技巧代码解析

aming1688

说明：
一 D,E,F,G列的名字对应图片库中的名字
二 希望能用宏，批量导入对应名称的图片到单元格
三 图片覆盖于单于格中文字的上方
四 如果出现空时，显示为“暂无

赵国辉

very good!

wangjfnm

楼主辛苦了！非常感谢

yuanzhuping

技巧186         定时关机
       在VBA中可以使用Shell函数执行Shutdown.exe程序实现定时关闭电脑，如下面的代码所示。

1. Sub Shutdown()
   
2.     Shell ("at 08:31 Shutdown.exe -s")
   
3. End Sub

复制代码

代码解析：
       Shutdown过程使用Shell函数在08:31时自动关闭电脑。Shell函数执行一个可执行文件，语法如下：
       Shell(pathname[,windowstyle])
       参数pathname是必需的，要执行的程序名，以及任何必需的参数或命令行变量，可能还包括目录或文件夹，以及驱动器。在Macintosh中，可以使用MacID函数来指定一个应用程序的署名而不是名称。表格中列出了执行windows中常用程序的代码。
      
       参数windowstyle是可选的，表示在程序运行时窗口的样式。如果省略，则程序是以具有焦点的最小化窗口来执行的。windowstyle参数的值如表格所示。
      

yuanzhuping

技巧187         打开指定的网页
       使用VBA可以打开指定的网页，如下面的代码所示。

1. #001  Sub Hyperlink()
   
2. #002      ActiveWorkbook.FollowHyperlink _
   
3. #003          Address:="http://club.excelhome.net/dispbbs.asp", _
   
4. #004          NewWindow:=True
   
5. #005  End Sub

复制代码

代码解析：
       Hyperlink过程使用FollowHyperlink方法打开Excel Home论坛的主页。
       FollowHyperlink方法对指定超链接进行处理以下载目标文档，然后将该文档在适当的应用程序中显示出来，语法如下：
expression.FollowHyperlink(Address, SubAddress, NewWindow, AddHistory, ExtraInfo, Method, HeaderInfo)
       其中参数expression是必需的，返回一个Workbook对象。
       参数Address是必需的，String类型，目标文档的地址。
       参数SubAddress是可选的，目标文档中的位置，默认值为空字符串。
       参数NewWindow是可选的，Variant类型，如果该值为True，则将目标应用程序显示到一个新窗口中。默认值为False。
       运行Hyperlink过程将打开Excel Home论坛的主页。

『懷卍眞』

谢谢

liming000628

谢谢，谢谢大虾

jKKL

感觉版主分享，如获珍宝

w_hb

谢谢楼主，学习中。。。。。。。。。。。。

forgetmenotdale

谢谢楼主的分享！