[發問] {請益} 有兩個下拉式選單內容資料，如何用VBA或其他方式呈現?

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2022-7-26 19:33 | 只看該作者

[發問] {請益} 有兩個下拉式選單內容資料，如何用VBA或其他方式呈現?

有兩個下拉式選單內容資料，如何用VBA或其他方式呈現?

Q表單內容有 A&B 下方有下拉式選單，裡面有選項，假設我A選橘子& B選擇1，下方的C&D就會幫我自動抓取S表單相對應的資料。

如圖↓

附檔案↓

0010.rar (11.32 KB)

請各位大大協助，謝謝~!

樓主熱帖

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

2^#

發表於 2022-7-27 13:36 | 只看該作者

有兩個下拉式選單內容資料，如何用VBA或其他方式呈現?

Q表單內容有 A&B 下方有下拉式選單，裡面有選項， ...
zz0660 發表於 2022-7-26 19:33

請測試看看，謝謝

0010_0727.zip (19.66 KB)

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

3^#

發表於 2022-7-27 22:02 | 只看該作者

回復 2# samwang

samwang 大大，謝謝，可以使用，請教大大一個問題，假設我要在D後面新增一個E的數據，
需要改
xD(T) = Array(Arr(i + 1, j - 1), Arr(i + 1, j), Arr(i + 2, j - 1), Arr(i + 2, j))
還有
.[a3] = xD(T)(0): .[b3] = xD(T)(1)
.[a4] = xD(T)(2): .[b4] = xD(T)(3)
多一個a5，這樣嗎?

還是有別的地方也要修改?

謝謝大大協助處理問題

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

4^#

發表於 2022-7-28 08:28 | 只看該作者

回復 samwang

samwang 大大，謝謝，可以使用，請教大大一個問題，假設我要在D後面新增一個E的數 ...
zz0660 發表於 2022-7-27 22:02

修改如下，謝謝
xD(T) = Array(Arr(i + 1, j - 1), Arr(i + 1, j), Arr(i + 2, j - 1), Arr(i + 2, j), Arr(i + 3, j - 1), Arr(i + 3, j))

.[a3] = xD(T)(0): .[b3] = xD(T)(1)
.[a4] = xD(T)(2): .[b4] = xD(T)(3)
.[a5] = xD(T)(4): .[b5] = xD(T)(5)

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

5^#

發表於 2022-7-28 23:30 | 只看該作者

本帖最後由 zz0660 於 2022-7-28 23:40 編輯

回復 4# samwang

samwang

謝謝大大，我有一個問題
.[a3] = xD(T)(0): .[b3] = xD(T)(1)
紅色的地方代表順序 0=A3，1=B3 嗎?

假設，我將Q表單裡面的 A2 & B2 刪除內容，然後又用下拉式選單，選橘子，就會跳出以下圖片。

點偵錯會出現下面圖片

請大大協助

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

6^#

發表於 2022-7-29 12:10 | 只看該作者

回復 5# zz0660

請附上檔案，謝謝

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

7^#

發表於 2022-7-29 19:42 | 只看該作者

回復 6# samwang

samwang 大大,謝謝你協助處理問題
檔案如下

0010_0727.zip (19.66 KB)

把 Q表單A2 或 B2刪除後，或是A2 或 B2都在空白內容，且選擇項目的時候，就會出現錯誤。

再次感謝大大。

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

8^#

發表於 2022-7-29 20:04 | 只看該作者

回復 7# zz0660
請再試看看，謝謝

0010_0729.zip (19.92 KB)

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

9^#

發表於 2022-7-29 22:06 | 只看該作者

回復 8# samwang

samwang 大大，可以了，非常感謝您。:D

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

10^#

發表於 2022-9-3 02:03 | 只看該作者

回復 8# samwang

大大您好，我想在此請益一個問題，我有新增一個AQA工作表跟Q工作表，已經有製作同步，AQA工作表A1與Q工作表A2同步，AQA工作表B1與Q工作表B2同步。

但是假設我在AQA工作表選取資料，在Q工作表的A3&A4，B3&B4的資料不會更新，想請大大解惑，在此附加檔案↓

0010.rar (20.64 KB)

謝謝大大