返回列表 上一主題 發帖

請問如何將FORMULAR 轉寫成VBA??

cdcc

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
WINDOWS XP 
軟體版本
SERVICE PACK 1 
閱讀權限
10 
性別
男 
來自
HK 
註冊時間
2011-4-22 
最後登錄
2011-5-15 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-5-11 22:51 | 顯示全部帖子

請問如何將FORMULAR 轉寫成VBA??

本帖最後由 cdcc 於 2011-5-11 23:21 編輯

Date        Description         Amount        New Category                       
1/5/2010         PRC Salaries         71,904         Payroll in PRC                Criteria                        Type
1/5/2010        HK Salaries         92,129         Payroll in HK                PRC Salaries        Payroll in PRC
7/6/2010        EE Transfer 2010/01 73,038         Fund Transfer                HK Salaries        Payroll in HK


CELL D4  = {INDEX(G:G,LARGE(IF(ISERROR(FIND($F$5:$F$8,$B4)),0,ROW($F$5:$F$8)),1))}

因為大量DATA, 所以FORMULAR 運算速度比較慢.

請問如何判斷範圍, 作出計算?

謝謝

Recategory of Data.rar (4.22 KB)

收藏 分享

cdcc

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
WINDOWS XP 
軟體版本
SERVICE PACK 1 
閱讀權限
10 
性別
男 
來自
HK 
註冊時間
2011-4-22 
最後登錄
2011-5-15 
2#
發表於 2011-5-11 23:24 | 顯示全部帖子
最好上傳實際文件
這樣排版看不出資料位置
chin15 發表於 2011-5-11 23:03


   已經上傳文件

   希望大家幫忙解答

TOP

cdcc

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
WINDOWS XP 
軟體版本
SERVICE PACK 1 
閱讀權限
10 
性別
男 
來自
HK 
註冊時間
2011-4-22 
最後登錄
2011-5-15 
3#
發表於 2011-5-12 22:52 | 顯示全部帖子
回復 4# Hsieh


首先謝謝幫忙
   
但可否解釋"CreateObject("Scripting.Dictionary"這句的功能是什麼用途?

keys的功能是什麼用途?

而且那一句語法是寫 陣列{}??



謝謝.

TOP

cdcc

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
WINDOWS XP 
軟體版本
SERVICE PACK 1 
閱讀權限
10 
性別
男 
來自
HK 
註冊時間
2011-4-22 
最後登錄
2011-5-15 
4#
發表於 2011-5-13 23:58 | 顯示全部帖子
Sub ex()
Set d = CreateObject("Scripting.Dictionary")  '建立一個字典變數
For Each a In Range([F5], ...
Hsieh 發表於 2011-5-12 23:13



    謝謝耐心教導.

TOP

        靜思自在 : 時時好心就是時時好日。
返回列表 上一主題