返回列表 上一主題 發帖

[發問] textbox對應到儲存格數值(小數點後面位數)

7777

帖子
125 
主題
33 
精華
0 
積分
223 
點名
0  
作業系統
XP 
軟體版本
Excel 2003 
閱讀權限
20 
性別
男 
來自
台北市 
註冊時間
2010-9-6 
最後登錄
2024-12-26 
1# 跳轉到 »
發表於 2015-1-9 14:18 | 顯示全部帖子
[版主管理留言]
  • GBKEE(2015/1/11 16:28): 附檔看看

回復 5# GBKEE

請教 GBKEE 大大！
如何TextBox 密碼 可以複製貼上
如何可以將
Sheet1 的 [A47]
儲存格的資料
複製到
Sheet2
caFPassword TexBox 內

Sub 複製Box()
     Sheets("Sheet2").Select
     caFPassword TextBox.Value = Format(Sheets("Sheet1").Cells(47, 1).Value)
     Sheets("Sheet1").Select '回到 Sheet1
     Range("A1").Select
End Sub    '不行ㄝ



感謝
50 字節以內
不支持自定義 Discuz! 代碼

TOP

7777

帖子
125 
主題
33 
精華
0 
積分
223 
點名
0  
作業系統
XP 
軟體版本
Excel 2003 
閱讀權限
20 
性別
男 
來自
台北市 
註冊時間
2010-9-6 
最後登錄
2024-12-26 
2#
發表於 2015-1-11 20:24 | 顯示全部帖子
回復 5# GBKEE

請教 GBKEE 大大！
並 附上 檔案
Test.rar (213.37 KB)
50 字節以內
不支持自定義 Discuz! 代碼

TOP

7777

帖子
125 
主題
33 
精華
0 
積分
223 
點名
0  
作業系統
XP 
軟體版本
Excel 2003 
閱讀權限
20 
性別
男 
來自
台北市 
註冊時間
2010-9-6 
最後登錄
2024-12-26 
3#
發表於 2015-1-12 18:31 | 顯示全部帖子
回復 10# GBKEE

感謝 GBKEE 大大

以 簡單的
1.   caFPassword.Text = Sheet12.[A47]
2.        caFPassword = Sheet12.[A47]

1或2 的方式都可以了

反而 之前的
3.  caFPassword TextBox.Value = Format(Sheets("Sheet12").Cells(47, 1).Value)
4.  caFPassword.Value = Format(Sheets("Sheet12").Cells(47, 1).Value)

3或4 似乎都不行

同樣感謝 stillfish00
50 字節以內
不支持自定義 Discuz! 代碼

TOP

        靜思自在 : 地上種了菜，就不易長草；心中有善，就不易生惡。
返回列表 上一主題