VBA代碼非常誘人,學習有用的知識是自己的事情

2021-01-11 VBA語言專家

對於初學者來說，多掌握一些VBA例行語句，對自己的代碼水平提高會有很大的幫助，視野開拓了，才不會拘泥於一處。給很多朋友的建議中，我總是說，在學習VBA代碼解決方案的時候，要學習數組與字典的應用，這樣才不會讓自己的思路故步自封，比如用代碼排重是非常困難的，但是採用了數組會讓你豁然開朗，而用了字典，真的讓你如沐晨風。

331 ActiveCell.Value = Month(Date) 在當前單元格中輸入今天所在的月份數

332 ActiveCell.Value = Day(Date) 在當前單元格中輸入今天的日期數

333 ActiveCell.Value = MonthName(1) 在當前單元格中顯示月份的名稱,本句為顯示"一月"

334 ActiveCell.Value = Hour(Time) 在當前單元格中顯示現在時間的小時數

335 ActiveCell.Value = Minute(Time) 在當前單元格中顯示現在時間的分鐘數

336 ActiveCell.Value = Second(Time) '在當前單元格中顯示現在時間的秒數

337 ActiveSheet.Shapes(1).Delete 刪除當前工作表中的第一個形狀

338 ActiveSheet.Shapes.Count 獲取當前工作表中形狀的數量

339 ActiveSheet.Shapes(1).TextEffect.ToggleVerticalText 改變當前工作表中第一個藝術字的方向

340 ActiveSheet.Shapes(1).TextEffect.FontItalic = True將當前工作表中第一個藝術字的字體設置為斜體

341 ActiveSheet.Shapes.AddTextEffect(msoTextEffect21, "三峽", _

"Arial Black", 22#, msoFalse, msoFalse, 66#, 80).Select 在當前工作表中創建一個名為"三峽"的藝術字並對其進行格式設置和選中

342 ActiveSheet.Shapes.AddLine(BeginX:=10, BeginY:=10, EndX:=250, _

EndY:=100).Select 在當前工作表中以(10,10)為起點(250,100)為終點畫一條直線並選中

343 ActiveSheet.Shapes.AddShape(Type:=msoShapeRightTriangle, _

Left:=70, Top:=40, Width:=130, Height:=72).Select 在當前工作表中畫一個左上角在(70,40),寬為130高為72的三角形並選中

344 ActiveSheet.Shapes.AddShape(Type:=msoShapeRectangle, _

Left:=70, Top:=40, Width:=130, Height:=72).Select 在當前工作表中畫一個以點(70,40)為起點,寬130高72的矩形並選中

345 ActiveSheet.Shapes.AddShape(Type:=msoShapeOval, _

Left:=70, Top:=40, Width:=130, Height:=72).Select在當前工作表中畫一個左上角在(70,40),寬為130高為72的橢圓

346 ActiveSheet.Shapes(1).Line.ForeColor.RGB = RGB(0, 0, 255) 將當前工作表中第一個形狀的線條顏色變為藍色

347 ActiveSheet.Shapes(2).Fill.ForeColor.RGB = RGB(255, 0, 0) 將當前工作表中第2個形狀的前景色設置為紅色

348 ActiveSheet.Shapes(1).Rotation = 20 將當前工作表中的第1個形狀旋轉20度

349 Selection.ShapeRange.Flip msoFlipHorizontal 將當前選中的形狀水平翻轉

350 Selection.ShapeRange.Flip msoFlipVertical 將當前選中的形狀垂直翻轉

351 Selection.ShapeRange.ThreeD.SetThreeDFormat msoThreeD1將所選取的形狀設置為第1種立體樣式

352 ActiveSheet.Shapes(1).ThreeD.Depth = 20將當前工作表中第一個立體形狀的深度設置為20

353 ActiveSheet.Shapes(1).ThreeD.ExtrusionColor.RGB = RGB(0, 0, 255) 將當前工作表中第1個立體形狀的進深部分的顏色設為藍色

354 ActiveSheet.Shapes(1).ThreeD.RotationX = 60將當前工作表中的第1個立體形狀沿X軸旋轉60度

355 ActiveSheet.Shapes(1).ThreeD.RotationY = 60 將當前工作表中的第1個立體形狀沿Y軸旋轉60度

356 Selection.ShapeRange.ThreeD.Visible = msoFalse 將所選擇的立體形狀轉換為平面形狀

357 Selection.ShapeRange.ConnectorFormat.BeginDisconnect 在形狀中讓指定的連接符起點脫離原來所連接的形狀

358 ActiveSheet.Shapes(1).PickUp 複製當前工作表中形狀1的格式

359 ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 260, 160, 180, 30).TextFrame.Characters.Text = "fanjy.blog.excelhome.net" 在工作簿中新建一個文本框並輸入內容

360 ActiveSheet.Shapes.AddLabel(msoTextOrientationHorizontal, 20, 80, 100, 200).TextFrame.Characters.Text = "fanjy.blog.excelhome.net" 在當前工作表中建立一個水平文本框並輸入內容。

任何時候，學習有用的知識是自己的事情，這個世界上除了父母，就是現實的娑婆去強迫令你學習新的知識。有位朋友在今年的7月份就在聯絡要學習VBA，到了11月還在聯絡我問：VBA好學嗎？嗚呼，如果在7月份開始能靜下心好好學習，3個月時間應該有小成了。或許這位朋友真的沒有時間吧。

相關焦點

  • 利用VBA代碼如何打開任意程序
    後疫情時代將會是一個全新的世界，很多理念都將被打破，大多數人不會再享受體制內的保護，對於我們每個人，要儘可能多的學習有用的知識，為自己充電。在今後更加嚴峻的存量殘殺世界中，為自己的生存進行知識的儲備，特別是新知識的儲備。為後疫情時代做的必要準備。今日繼續和大家分享VBA編程中常用的常用「積木」過程代碼。這些內容大多是我的經驗的記錄，來源於我多年的經驗。
  • excel VBA是什麼?VBA編程入門教程
    本篇將介紹excel vba是什麼？vba編程入門教程，有興趣的朋友可以了解一下！一、excel vba是什麼？VBA的英文全稱是Visual Basic for Applications，是一門標準的宏語言。VBA語言不能單獨運行，只能被office軟體（如：Word、Excel等）所調用。
  • 如果你是學習Excel的朋友,對VBA這個應該概念不陌生吧?
    我們應該都知道Excel VBA的功能比較強大，但是對於剛開始學習的我們來說，面對那一串串英文代碼，你是不是看得頭昏腦脹？想去學習，然和茫然久久不能找不到學習入口？在這裡，和大家分享自己的學習經驗，和大家一起學習，共同進步。對了，還要告訴大家，我也是初學者，不是高手，如果有什麼說得不對的，希望大家及時指出。
  • 如何替換單元格內容,vba代碼幫你一步解決
    No.2下面用一個例子來簡單說明一下。本著解決問題的目的，利用一個查找姓名並更改的功能，做了如下表格。可以看到上圖，有一個按鈕控制項，一個文本框控制項，下面是個人信息表 。單擊按鈕執行查找姓名，並更改為文本框內容。這處把所有的姓名全改為文本框內容了，為了更好地表達編程意圖，這麼做也了，當然，在實際應用中只能改一個。
  • 利用VBA代碼,對Excel表格進行字體設置
    No.1字體設置是Excel或Word辦公軟體最簡單的操作，下面把所有字體對象的屬性羅列一遍，介紹一下，如何使用vba代碼進行相應的字體設置。下圖為字體對象Font的所有屬性。一共18個。下面重點看一下代碼，如何來實現。
  • Excel VBA 新手入門學習,只要你記住這些基礎知識就可以
    相信很多人在猶豫自己要不要學習Excel函數或者VBA，有的人只在學習基礎版的粘貼複製，有的人學會用函數，甚至還有的人，學會用PQ或者VBA來提升自己的工作效率，在大多數時候，我們學習的動力可能是不太強。當面我們面臨需要改變的時候，就會被迫的去學。
  • 不會vba編程,學會這些方法,少走許多彎路,函數式編程
    No.1Excel vba 編程是一門相對入門簡單，而且針對實際應用很有效的一種代碼編程。那為什麼還要學習vba編程呢？No.2在可用到一些函數中，或許在某些情況下還需要我們自定義一下功能。那麼在靈活性方面，就更加需要自己動手。
  • 利用VBA代碼遍歷所有圖形的方案
    在今後更加嚴峻的存量殘殺世界中，對於我們每個人，要儘可能多學習有用的知識，為自己充電。知識的儲備，特別是新知識的儲備是我們為後疫情時代做的必要準備。今日繼續和大家分享VBA編程中常用的常用「積木」過程代碼。這些內容大多是我的經驗的記錄，來源於我多年的經驗。
  • EXCEL表格詳解vlookup第五彈-VBA自己寫myLookup函數
    下面我就手把手地帶大家寫一個自己的函數myLookup() ，使用這一個函數來實現前四彈的所有功能。第一步：打開Excel的vba編輯器，菜單欄找到 「開發工具」 --> 「Visual Basic」，或者按 Alt + F11，打開 VBA 編輯器，開始我們的代碼之旅。如下圖。
  • 利用VBA代碼將文本轉換為數組函數
    後疫情時代將會是一個全新的世界，很多理念都將被打破，大多數人不會再享受體制內的保護，對於我們每個人，要儘可能多的學習有用的知識，為自己充電。在今後更加嚴峻的存量殘殺世界中，為自己的生存進行知識的儲備，特別是新知識的儲備。為後疫情時代做的必要準備。今日繼續和大家分享VBA編程中常用的常用「積木」過程代碼。這些內容大多是我的經驗的記錄，來源於我多年的經驗。
  • 從認識VBA,到理解VBA(VBA學習方案系列講座之十二)
    3 初級階段的學習提高在我教程的推出順序中，我首先完成的是第一套《VBA代碼解決方案》的教程，這套教程非常重要，是初學者提高的一個關鍵過程。《VBA代碼解決方案》的特點是每一講都獨立地講解一個問題，供大家拿來利用，每一講的代碼我都親測過，測試的版本是13版OFFICE。讀者可以根據自己的興趣有選擇地利用，或者根據自己的需要利用其中的代碼。學習這套教程，大家不要急，可以結合自己感興趣的章節先弄懂代碼的含義，然後再擴展其他的章節。要循序漸進，不可貪多。每個知識點都是要理解的。
  • Excel VBA 不可一世的宏中,基本數據構成你知道多少
    在上一期我們說到VBA的基本組織結構，那麼我們今天就來說說組成這些VBA代碼的磚瓦是由哪幾部分構成的，也就是說vba的處理數據的磚瓦。常量這值在我們的以後編寫中，也需要用到，比如我們需要引用某一天的匯率或者稅率，這個時候我們可以這些寫代碼，如下圖：以上就是我們定義了三個常量，就是把數字賦值給到某一個字符串，這樣做的好處就是，我們在用的時候，可以多次引用這個字符串即可，當我們需要修改的時候，只需要修改一次即可，是不是感覺很方面？但是請千萬記住，不要少了const，這是在VBA中規定好的寫法。
  • vba編程,如何畫帶箭頭直線,教你這麼做馬上學會畫流程圖
    下面具體介紹一下，如何利用vba代碼進行設置線條的一些方法。vba代碼畫線用到一個對象：LineFormat下圖為LineFormat屬性：屬性看上去較多，但大多有一定的規則，使用起來還是比較容易理解的。
  • Excel vba 利用定義名稱實現用戶登錄功能
    文/江覓易見在vba 中實現用戶登錄，並對登錄用戶進行身份識別，然後對用戶進行分組管理，此類功能值得進一步思考。這裡介紹一種方法，利用Excel中的名稱管理來進行身份識別，起到用戶登錄次數以及增減用戶的功能。
  • VBA代碼可以實現
    大家在學習VBA的時候，可以把這些代碼塊作為一塊塊的積木對待，平時積累，用時拿來修正、組合。這就是我的「積木編程」的思想，就是我推出的「積木」方案，希望大家加以利用。最近代碼多是出自第三套教程」VBA數組與字典解決方案」。
  • 用EXCEL製作一個簡單的五子棋遊戲
    今天，我們教愛學習的小朋友用excel製作一款非常簡單的雙人五子棋遊戲。其中涉及到的知識有：excel基礎操作vba基礎知識首先看看最終效果圖：需要有反悔的功能。需要有重新再來一局的功能。美術需求：棋盤需要用類似現實的顏色即偏黃色。
  • WPS教程:excel新手入門VBA功能使用介紹
    Excel教學：今天和大家分享一下excel中vba的使用方法入門，相信很多使用該軟體的朋友們對此都很感興趣，下面就和大家來分享一下，希望可以幫助到大家。4.輸入如圖所示的代碼：5.保存文件，按下F5執行，找到我們編輯的這個宏,【計算銷售額】,然後點擊【運行】寫在末尾——總結一下WPS用起來還是十分簡單的，後面也會出更多的EXCEL系列教程和其他知識分享。
  • Excel表格如何設置漸變色,vba編程進階學習,深度講解
    如何利用VBA對表格進行漸變色設置，這就需要我們有一個十分熱情來掌握其方法。下圖為設置一個漸變色的效果，顏色不太好，但其功能可以實現。下面具體解釋一下，通過vba代碼實現的方法。No.2首先要明解如何來實現對表格內部背景設置。我們要知道表格內部用Interior對象來表示，這就是說要用到這個對象的一些屬性。
  • VBA編程,如何插入刪除字符,一定要收藏
    No.1字符對象應用中，比較少，也是一個很有用的對象。是一個基礎對象，其功能可以對返回的字符進行一些添加和刪除操作。還有一些屬性可以調用和設置。下面具體看一下字符對象的一個屬性：其中，用到比較多的有Caption、Count、Font和text屬性。Font屬性可以返回一個Font對象，可以對字符進行更多的屬性設置。具體內容可查看下圖：No.2下圖為例，對字符對象和屬性進行了一個編程學習。Characters既是一個屬性又是一個對象。
  • Excel vba 動態添加按鈕控制項 CommandButton
    文/江覓易見動態添加按鈕有時在vba編程中運用很多，也是一個比較容易實現的過程。這裡寫了一個很小的例子，做個示範，動態添加按鈕，而且按鈕數量不限，可批量添加，位置、大小、按鈕Caption自定義。如果對代碼不很熟悉，套用也較方便。下面是動態效果圖，文章結尾有代碼，可以參考使用。