Re: [算表] 如何找尋預抓資料的數據並拋轉秀出
※ 引述《arrow (DUCATI....)》之銘言:
: 軟體:Excel
: 版本:2003
: 先看圖片-http://tinyurl.com/43zefvs
: 我想要用個按鈕,按下去之後尋找E欄為CBD-028的字串
: 然後把是CBD-028跟F欄對應的數字,各別在I欄與J欄秀出來
: 以前淺淺學過VB,現在都忘了,看了一大串的語言程式
: 也看不出來該如何去修改,煩請EXCEL達人幫忙,感謝
假設如下:
A B C D
1 代號 數值
2 CDB-028 60
3 CDB-010 47
4 CDB-028 23
5 CDB-055 46
6 CDB-028 10
7 CDB-028 99
將篩選過後的資料貼到CD兩欄。
巨集如下:
Sub 篩選()
Dim Str
Range("C:D").ClearContents
Str = InputBox("請輸入編號")
Range("A1").AutoFilter
ActiveSheet.Range("A:B").AutoFilter Field:=1, Criteria1:=Str
Range("A:B").Copy Range("C1")
Selection.AutoFilter
End Sub
PS.每次執行前都會先把CD兩欄清空,
並且在inputbox輸入你想要篩選出來的代號,例如CDB-028。
如有誤還請指教。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.209.137.141
※ 編輯: menth 來自: 210.209.137.141 (07/09 01:56)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 3 篇):