12
返回列表 上一主題 發帖

[發問] 依訂單_標示客戶

PJChen
　暱稱: PJ

大學生Rank: 4

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

論壇榮譽勳章論壇贊助勳章
4# 跳轉到 »
發表於 2021-2-12 18:59 | 只看該作者
回復 3# 軒云熊

您好,

我希望客戶名稱可以填在B欄,如同這樣的結果,再麻煩您...


但目前程式執行結果是這樣:

TOP

軒云熊

帖子
254 
主題
6 
精華
0 
積分
310 
點名
0  
作業系統
W10 
軟體版本
Excel 2016 
閱讀權限
20 
性別
男 
來自
台灣 
註冊時間
2019-6-16 
最後登錄
2025-6-21 
3#
發表於 2021-2-12 15:23 | 只看該作者
回復 2# PJChen

有空幫我看一下 是不是這樣 感謝
  1. Public Sub 比對數值練習()
  2. Application.ScreenUpdating = False

  4.     Arr = [A1].CurrentRegion

  6.     For X = 2 To UBound(Arr, 1)
  7.         For Y = 1 To UBound(Arr, 2)
  8.             If Not IsNumeric(Arr(X, 5)) Then
  9.                  Cells(X, 2) = Arr(1, 1)
  10.             End If
  11.         Next Y
  12.     Next X

  14. Application.ScreenUpdating = True
  15. End Sub
複製代碼

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

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

論壇榮譽勳章論壇贊助勳章
2#
發表於 2021-2-12 10:44 | 只看該作者
回復 1# PJChen

1..        客戶名稱是標示在A1(有可能改變,以A1為依據)
2..        E欄帶有文字的是訂單號碼
3..        訂單內容會隨客戶下單而變動(增加or減少,條碼也會重複出現)
       
        B欄的需求：
a)        當E欄出現第一筆訂單號碼,則B欄帶出A1的客戶名稱(Ex:b2:b39)
        一直到出現第2筆訂單號碼為止
b)        當E欄出現第2筆訂單號碼,則B欄帶出A1的客戶名稱+2(Ex:b40:b52)
        一直到出現第3筆訂單號碼為止
        依此類推…
已將表格改為有表頭,請以此檔為準...謝謝   依訂單_標示客戶.rar (56.8 KB)

TOP

        靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。
12
返回列表 上一主題