返回列表下一主題上一主題發帖

[發問] 關於此狀況有比VLOOKUP更好的方法嗎?

starry1314

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2015-7-30 15:37 | 只看該作者

[發問] 關於此狀況有比VLOOKUP更好的方法嗎?

1天的菜單因為早上吃素,所以一張表需要葷素替換
目前以工作表"a1"的狀況做判別,如選擇非素的在菜單會替換成葷菜,工作表"a2"下拉即可出現葷菜
如選擇素的相關狀況即下拉出現素菜

但因狀況過多,能否做到有"素"這個字一律歸到素,其他則歸到葷

因菜單有近千種~如果要使用目前vlookup方式則菜單擴大至近萬列
[attach]21581[/attach]
[attach]21582[/attach]

樓主熱帖

koo

中學生 Rank: 2

帖子: 60
主題: 4
精華: 0
積分: 64
點名: 0
作業系統: w7-32
軟體版本: 2013.2003
閱讀權限: 20
註冊時間: 2014-11-23
最後登錄: 2016-6-6

2^#

發表於 2015-7-30 20:41 | 只看該作者

本帖最後由 koo 於 2015-7-30 20:43 編輯

要不要考慮用VBA先把素葷分離到其他工作表

Sub test()
k = 1
j = 1
For Each c In Range("A1:B300") ''範圍自行修改
i = InStr(1, c.Value, "素")
If i > 0 Then
Sheets(2).Cells(k, 1) = c.Value
k = k + 1
Else
Sheets(3).Cells(j, 1) = c.Value
j = j + 1
End If
Next c
End Sub

複製代碼

另>>幾千筆用下拉式清單似乎有點太長吧!!!

TOP

starry1314

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

3^#

發表於 2015-7-31 08:12 | 只看該作者

本帖最後由 starry1314 於 2015-7-31 08:13 編輯

回復 2# koo

不是都在一個下拉清單.一個早,午,晚都各五道菜左右每道菜的下拉清單約10樣一個月每天都不同所以才會到數千筆
目前已設定好近千個儲存格內都設定各自的下拉清單,昨天看到文章可用left或right取出狀況判斷的儲存格取素或葷出來判斷
再讓菜單以vlookup讀取判斷後自動替換原始菜單的內容葷/素替換後,下拉清單打開即是素食
因有時候只有早上是素, 其他兩餐都是葷或是只有某幾天是素,不是固定的所以沒辦法用VBA

另外謝謝幫忙囉,收藏起來之後也許會用到

TOP

p212