返回列表 上一主題 發帖

小弟每次開啟下列檔案時, 總是會彈出圖片中框架,

hong912

帖子
97 
主題
31 
精華
0 
積分
133 
點名
0  
作業系統
xp2007 
軟體版本
xp2007 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2012-8-12 
最後登錄
2020-12-25 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2015-6-15 18:38 | 只看該作者

小弟每次開啟下列檔案時, 總是會彈出圖片中框架,

請教各前輩, 好
小弟每次開啟下列檔案時, 總是會彈出圖片中框架,
資料已被修改, 你是否儲存檔案, 而我必須按儲存或取消, 框架才取消, 工作表才可使用,  原因到底是什麼, 真令我百思不解, 希望前輩們能解我疑問,謝謝, ,
收藏 分享
hong912

hong912

帖子
97 
主題
31 
精華
0 
積分
133 
點名
0  
作業系統
xp2007 
軟體版本
xp2007 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2012-8-12 
最後登錄
2020-12-25 
4#
發表於 2015-6-16 21:47 | 只看該作者
回復 3# lpk187
感謝前輩,
受教了, 終解我疑問,
謝謝!!
hong912

TOP

lpk187

帖子
552 
主題
3 
精華
0 
積分
578 
點名
0  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
50 
性別
男 
註冊時間
2015-2-8 
最後登錄
2024-7-9 

2016猴年全勤獎章2015羊年全勤獎章熱烈參與勳章
3#
發表於 2015-6-16 21:14 | 只看該作者
本帖最後由 lpk187 於 2015-6-16 21:18 編輯

回復 2# hong912
  1. Private Sub Workbook_Open()
  2.     Dim Ar(), S%
  3.     With GetObject(ThisWorkbook.Path & "\sal倉庫資料.xlsm")  '路徑
  4.     With .Sheets(1)
  5.         Ar = .Range(.[B3], .[B4].End(xlDown).Offset(, 2)).Value
  6.     End With
  7.         .Close True '這裡True是儲存False是不儲存，給你參考
  8.     End With
  9.     With Sheet1.ComboBox1
  10.     .ColumnWidths = "70,160"
  11.     .TextColumn = 2
  12.     .ColumnCount = 3
  13.     .List = Ar
  14.     End With
  15. End Sub
複製代碼
資料.rar (94.88 KB)

TOP

hong912

帖子
97 
主題
31 
精華
0 
積分
133 
點名
0  
作業系統
xp2007 
軟體版本
xp2007 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2012-8-12 
最後登錄
2020-12-25 
2#
發表於 2015-6-16 20:15 | 只看該作者
前輩們, 安好
上述發問之問題並沒有回應, 相信是本人資料不足所致, 現整理好檔案上傳, 望能得到回應,
請先行開啟入貨單檔, 此時介面便彈出上述小弟提問之框架, 原因為何..
謝謝謝!
aa.rar (99.55 KB)
hong912

TOP

        靜思自在 : 脾氣嘴巴不好，心地再好也不能算是好人。
返回列表 上一主題