VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >
  • excel vba教程之浮动按钮 by:Qee用

1.  浮动按钮  by:Qee用

http://www.excelpx.com/dispbbs.asp?boardid=5&id=13551&star=1#63383
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  [Button].Top = Target.Top
End Sub
 
Sub Fill10()
‘自动填充十行
 
  Dim rg As Range
  Application.EnableEvents = False
  For Each rg In Selection
    rg.Resize(11, 1) = rg
  Next rg
  Application.EnableEvents = True
End Sub
 

相关教程