12
返回列表 上一主題 發帖

[發問] [發問] VBA填入公式

Scott090

帖子
529 
主題
56 
精華
0 
積分
607 
點名
138  
作業系統
win 10 
軟體版本
[] 
閱讀權限
50 
性別
男 
註冊時間
2013-3-19 
最後登錄
2025-6-11 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章2015羊年全勤獎章
11# 跳轉到 »
發表於 2018-12-7 07:12 | 只看該作者
回復 10# n7822123


    謝謝，我學習了這一招：
         "用VBA寫函數就更簡單了，不用迴圈，一行解決
           函數裡的A2會自動變更為A3,A4,A5"

      我曾經在其他地方寫的模式是把列 用 i 當變數：
         .Cells(i, "B").Formula = "=LEFT(A" & i & ",3)"

TOP

ABK

帖子
115 
主題
24 
精華
0 
積分
178 
點名
0  
作業系統
WIN10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2011-1-12 
最後登錄
2024-11-15 
12#
發表於 2018-12-11 11:47 | 只看該作者
回復 10# n7822123


謝謝阿龍大!
我是每周會有一個Excel 資料檔產生， 要做統計分析一年的資料，
我目前的做法是用一個工作簿用VBA匯入52週的資料建成52工作頁，在每頁匯入完成時順便填入公式做出各列的所屬類別以便統計。
我先置入阿龍大的程式跑跑看，再把檔案PO上來!

TOP

ABK

帖子
115 
主題
24 
精華
0 
積分
178 
點名
0  
作業系統
WIN10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2011-1-12 
最後登錄
2024-11-15 
13#
發表於 2018-12-11 11:52 | 只看該作者
回復 11# Scott090


    感謝Scott大!

   每一個工作頁的格式都一樣， 我來試一下程式，再把檔案補貼上來!

TOP

        靜思自在 : 小事不做、大事難成。
12
返回列表 上一主題