返回列表 上一主題 發帖

如何寫個 VBA 做 多檔案 多字串的取代功能????

cr123a

帖子
19 
主題
6 
精華
0 
積分
25 
點名
0  
作業系統
win 7 
軟體版本
office 2010 
閱讀權限
10 
性別
男 
註冊時間
2011-9-9 
最後登錄
2012-8-31 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-2-1 00:02 | 只看該作者

如何寫個 VBA 做 多檔案 多字串的取代功能????

比如
  目標目錄與類型是  c:\MYDOC\*.BAS
  
  完整單字字串 的取代
     A                                B
        原始      ===>      取代為        
  1    AAA                        pAAA
  2    BBB                         PBBB
  3     cc10cc                    xxcc10cc
  4        ....
. 5       ...
  6       ...
  可以自己增加單詞   無限制

謝謝大家感激不盡
收藏 分享

register313
　頭銜: 麻辣 路人甲

大學生Rank: 4

帖子
967 
主題
0 
精華
0 
積分
1001 
點名
0  
作業系統
WIN XP 
軟體版本
OFFICE 2003 
閱讀權限
50 
性別
男 
來自
台北 
註冊時間
2010-11-29 
最後登錄
2022-5-17 

2012龍年全勤獎章熱烈參與勳章
2#
發表於 2012-2-1 00:10 | 只看該作者
回復 1# cr123a


1.副檔名BAS   VB檔案    ???

2.   原始     ===>      取代為        
     AAA                     pAAA
      BBB                     PBBB
      cc10cc                xxcc10cc
     取代之規則 ???

3.附上檔案

TOP

cr123a

帖子
19 
主題
6 
精華
0 
積分
25 
點名
0  
作業系統
win 7 
軟體版本
office 2010 
閱讀權限
10 
性別
男 
註冊時間
2011-9-9 
最後登錄
2012-8-31 
3#
發表於 2012-2-1 02:52 | 只看該作者
回復 2# register313


    回復 1# cr123a


1.副檔名BAS   VB檔案    ???
回  就是很多從excel匯出的 bas 有很多自定函數  
2.   原始     ===>      取代為        
     AAA                     pAAA
      BBB                     PBBB
      cc10cc                xxcc10cc
     取代之規則 ???
回   取代 沒有規則   是自己輸入的
       比如在  101.bas
                      103.bas
                       108.bas
                      都有AAA這個自定函數
                       想把它都 更個名 為 pAAA
     類推

3.附上檔案
回     好多檔該如何上  
            只想寫個 vba  在excel內控製
            把要改的 函數名稱 先打好  最後再一並執行

TOP

        靜思自在 : 盡多少本份，就得多少本事。
返回列表 上一主題