日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

excel 中编程:vba 入门

發布時間:2025/3/8 编程问答 15 豆豆
生活随笔 收集整理的這篇文章主要介紹了 excel 中编程:vba 入门 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

2019獨角獸企業重金招聘Python工程師標準>>>

1. 打開編程環境:

alt+F11 打開開發環境 注意需要啟動宏,不然不能執行自定義的程序,保存后文件的后綴應該是:.xlsm 選擇一個 sheet 或一個模塊,右鍵查看代碼,即可編輯代碼

2. 函數與子程序:

函數可以用返回值,而子程序不能用返回值

Function myFun(a,b)myFun=a*b+2 '返回值不使用return,而是直接賦值給函數名 End FunctionSub mySub(a,b)MsgBox "result is"&(a+b) '連接字符串用& End Sub

3. 事件:

查看代碼時選擇 Worksheet ,然后在右側選擇要綁定的事件,綁定后可以通過事件來觸發對應的子程序

4. 復制內容:

Sub CopyRow()Worksheets("儲值卡").Range("H1:I2000").CopyWorksheets("test").SelectWorksheets("test").Range("C1:D2000").SelectWorksheets("test").Paste End Sub

5. 在一個函數(子程序)中調用另一外函數(子程序)

Call copyAll 'Call 子程序名 r=myFun(1,3) '調用有返回值的函數,像其它編程語言一樣

6. 獲取不為空的總行數:

Sub countRow()n = Range("A65536").End(xlUp).Row '獲取非空的總行數MsgBox n End Sub

相關文檔:

  • 微軟官方文檔:https://docs.microsoft.com/zh-cn/office/vba/api/overview/excel
  • w3c 教程:https://www.w3cschool.cn/excelvba/
  • 易百教程:https://www.yiibai.com/vba/vba_excel_objects.html (內容較少)
  • 轉載于:https://my.oschina.net/agui1989/blog/3005507

    總結

    以上是生活随笔為你收集整理的excel 中编程:vba 入门的全部內容,希望文章能夠幫你解決所遇到的問題。

    如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。