返回列表 上一主題 發帖

[發問] 去除流水號

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2021-9-3 22:47 | 顯示全部帖子

[發問] 去除流水號

大大好,

附件是從網路下載的資料
C欄是Barcode,
C開頭的是訂單號碼,這次抓下來有3張訂單
資料會自動從每張訂單的第一筆Barcode開始
自動在最前面加上流水號,如1,2,3...
我想將流水號去除,結果如F欄所顯示
請問如何用VBA達成？

工作表為簡化過的,在VBA執行的時候,
要能不干擾到其他儲存格資料(某些有公式)
只要能把C欄變成如F欄的值即可

去除流水號.rar (9.07 KB)
收藏 分享

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2021-9-4 19:50 | 顯示全部帖子
回復 2# samwang
samwang大大,
請問     If UCase(Left(Arr(i, 1), 1)) = "C" Then n = 1: GoTo 99
1) 要如何改為偵測第一個字是"文字",
     因為訂單號碼,有時不是C開頭

感謝您

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2021-9-4 20:46 | 顯示全部帖子
回復 4# samwang

謝謝您,
執行沒問題！

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。
返回列表 上一主題