圓本就享說

魔法交換術

分享
在魔法學院的競技場中，數據魔法團受到迷霧競技者葛雷登和莉亞的邀請，挑戰「用 VBA 交換兩個儲存格的值」謎題。這次的競賽，是友善、智力與程式魔法的較量，正是團隊默契成長的好機會！

數據魔法團成員介紹：

  • 艾米斯（Amis）：擅長自動化與魔法設計，團隊隊長。
  • 瑟倫娜（Serena）：精通圖表幻術與可視化魔法，最有藝術天份的成員。
  • 路卡斯（Lucas）：機械系法師，熟悉所有表單與按鈕咒語，腦筋動得最快。
  • 貝亞特烈絲（Beatrice）：資料守護者，專攻資料精煉與錯誤修正魔法，細心又可靠。

迷霧競技者：

  • 葛雷登 (Grayden)：冷靜策略型競技者，熱衷邏輯挑戰
  • 莉亞 (Leah)：謎語奇才，遊戲設計高手，善於公平設定難題

他們以良善、規範的 Excel 魔法競賽考驗團隊協作、創意，讓數據魔法團不斷精進。
準備魔法交換場域

  1. 在魔法書（Excel 工作表）上，於 A1 與 B1 輸入二個不同數值。
  2. 插入命令按鈕（參考上一回教學）。

瑟倫娜輕聲提醒：「團結合作才是魔法的真諦！」
書寫魔法交換咒語

路卡斯建議：「先用暫存箱記錄 A1 原本的值！」
艾米斯動手書寫魔法，貝亞特烈絲則細心把關資料安全，確保交換程序正確：
  1. 右鍵命令按鈕，選「檢視程式碼」。
  2. 填入以下程式碼：
Private Sub CommandButton1_Click()
    Dim x_box As Double
    x_box = Range("A1").Value
    Range("A1").Value = Range("B1").Value
    Range("B1").Value = x_box
End Sub
施展魔法交換咒語

  1. 回到魔法書解除設計模式，按下命令按鈕。
  2. A1 與 B1 的值神奇地交換，葛雷登微笑肯定：「資料魔法團真是不凡。」
  3. 莉亞則預告：「下一場比拼，將是模組魔力大考驗，準備迎接新挑戰吧！」
魔法小精靈提醒

下列是名為 x_box 暫存箱的宣告咒語，並指定為 Double 雙精確度浮點數(資料型態)！
 Dim x_box As Double
可參考古老魔法書的說明
分享
歡迎加入 Excel VBA 魔法學院的冒險旅程！
限時優惠：2025.10.31 前報名者可獲得「Excel VBA Basic Study 線上錄影課程」，共70個單元，價值新台幣$5,600元！立即學習，如虎添翼！
2025-10-12 21:40 VBA