返回列表 上一主題 發帖

請問USERFORM如何參照儲存格資料

john711101

帖子
15 
主題
9 
精華
0 
積分
54 
點名
0  
作業系統
windows 7 
軟體版本
2010 
閱讀權限
20 
註冊時間
2015-2-13 
最後登錄
2024-3-1 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2015-4-16 17:06 | 只看該作者

請問USERFORM如何參照儲存格資料

請問USERFORM如何參照儲存格資料
我想要把儲存格資料參照到USERFORM裡顯示出來
收藏 分享

minture3

帖子
50 
主題
8 
精華
0 
積分
54 
點名
0  
作業系統
windows7 
軟體版本
EXCEL 2007 
閱讀權限
20 
性別
男 
註冊時間
2015-3-24 
最後登錄
2015-7-13 
4#
發表於 2015-4-17 14:59 | 只看該作者
回復 3# john711101

不是很懂?
是說旁邊再設個按鍵 按了就列印出目前的listbox值嗎?

TOP

john711101

帖子
15 
主題
9 
精華
0 
積分
54 
點名
0  
作業系統
windows 7 
軟體版本
2010 
閱讀權限
20 
註冊時間
2015-2-13 
最後登錄
2024-3-1 
3#
發表於 2015-4-17 10:29 | 只看該作者
本帖最後由 john711101 於 2015-4-17 10:31 編輯

類似這樣!
感謝指導!

還有個問題是能設定列印ListBox1所顯示的嗎?

TOP

minture3

帖子
50 
主題
8 
精華
0 
積分
54 
點名
0  
作業系統
windows7 
軟體版本
EXCEL 2007 
閱讀權限
20 
性別
男 
註冊時間
2015-3-24 
最後登錄
2015-7-13 
2#
發表於 2015-4-16 18:26 | 只看該作者
回復 1# john711101

類似這樣嘛?
  1. Private Sub UserForm_Activate()
  2. Dim 說明 As Variant
  3. 說明 = Sheets("sheet1").Range("F6:G10").Value
  4. UserForm1.ListBox1.ColumnCount = 2
  5. UserForm1.ListBox1.ColumnWidths = "50,50"
  6. UserForm1.ListBox1.List = 說明
  7. End Sub   
複製代碼

TOP

        靜思自在 : 世上有兩件事不能等：一、孝順 二、行善。
返回列表 上一主題