請問sheet 欄位轉換問題

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

2^#

發表於 2011-12-20 23:13 | 顯示全部帖子

請問輸入『ok』,自動反紅是怎麼設定的
謝謝

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

3^#

發表於 2011-12-21 08:22 | 顯示全部帖子

請問欄位轉換的VBA程式可以解釋一下嗎？太複雜看不大懂
另外a sheet 欄位都是固定的（4欄），如果是不規則的可以用嗎（例如：3～15欄）
另外，如果在新增資料的話（目前工單3筆，後續再增加的話）是否也可以用呢
謝謝

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

4^#

發表於 2011-12-21 13:57 | 顯示全部帖子

回復 5# register313

利用格式化來處理儲存格的顏色,每個儲存格都設定的話,如果有一百多列，跑起來好像會變慢,有辦法只單純使用VBA嗎

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

5^#

發表於 2011-12-21 17:18 | 顯示全部帖子

回復 3# Hsieh

你好
請問使用格式化條件的部份，執行下來變得很慢
連捲動捲軸都要等很久
有辦法改成全部都是vba嗎
謝謝

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

6^#

發表於 2011-12-21 22:26 | 顯示全部帖子

回復 10# Hsieh

可以解釋一下這一段嗎
真的看不大懂
For i = 1 To UBound(Ay, 2)
ReDim Preserve Ary(7, s)
Ary(0, s) = Ar(1, 1): Ary(1, s) = Ar(1, 2): Ary(6, s) = Ar(1, 4)
For j = 1 To UBound(Ay, 1)
Ary(j + 1, s) = Ay(j, i)
Next
s = s + 1

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

7^#

發表於 2011-12-21 22:53 | 顯示全部帖子

回復 10# Hsieh

欄位增加時
反紅對應的儲存格好像會對不到
請問要如何解決呢
謝謝

sheet 欄位轉換 - 複製.rar (16.52 KB)

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

8^#

發表於 2011-12-21 23:08 | 顯示全部帖子

回復 14# Hsieh

你好
比對規則是工單加工程來判斷對應的j欄如果是ok
就反紅

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

9^#

發表於 2011-12-21 23:34 | 顯示全部帖子

回復 14# Hsieh

sheet 欄位轉換.rar (27.92 KB)
你好幾個問題請教一下
1.目前的欄位如果擴充之後
b sheet會打亂

2.key ok後
之前對應反紅可以3個連續儲存格一起
現在好像就只有一個

請協助解決最新附件檔的內容
謝謝

Tony

帖子: 102
主題: 30
精華: 0
積分: 137
點名: 0
作業系統: winxp
軟體版本: 12
閱讀權限: 20
性別: 男
註冊時間: 2011-11-24
最後登錄: 2018-12-6

10^#

發表於 2012-1-3 11:31 | 顯示全部帖子

回復 19# Hsieh

請問之前先由a sheet轉成b sheet欄位格式
在b sheet中指定欄位j欄輸入『ok』
則對應的a sheet能夠反紅

可以轉換成如果H2~H4反紅改成『刪除』，然後後續I2~I4遞補向左位移一格
I2~I4 → H2~H4
J2~J4 → I2~I4
以此類推
謝謝

sheet 欄位轉換.rar (24.59 KB)

Tony