返回列表 上一主題 發帖

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

lifedidi

帖子
104 
主題
32 
精華
0 
積分
144 
點名
0  
作業系統
windowsXP 
軟體版本
2007 
閱讀權限
20 
性別
男 
註冊時間
2013-2-25 
最後登錄
2022-9-2 

論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-5-30 10:54 | 顯示全部帖子

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

大大好：

我希望用textbox對應出儲存格的數值

Private Sub CommandButton1_Click()
Textbox1.Value = Range("H26").Value
Textbox2.Value = Range("I26").Value
Textbox3.Value = Range("J26").Value
END Sub

但是在Textbox裡顯示3.141596

如才能顯示3.14就好呢？
收藏 分享

lifedidi

帖子
104 
主題
32 
精華
0 
積分
144 
點名
0  
作業系統
windowsXP 
軟體版本
2007 
閱讀權限
20 
性別
男 
註冊時間
2013-2-25 
最後登錄
2022-9-2 

論壇贊助勳章
2#
發表於 2013-5-30 11:30 | 顯示全部帖子
謝謝GBKEE 大大！

TOP

lifedidi

帖子
104 
主題
32 
精華
0 
積分
144 
點名
0  
作業系統
windowsXP 
軟體版本
2007 
閱讀權限
20 
性別
男 
註冊時間
2013-2-25 
最後登錄
2022-9-2 

論壇贊助勳章
3#
發表於 2013-5-30 11:41 | 顯示全部帖子
回復 2# GBKEE

另外一個問題

If TextBox9.Value = "" Then MsgBox "請帶入資料"
Else
Textbox1.Value = Format(Sheets("sheet1").[H26].Value, "#.00")
End if
End sub

但是系統會說【有Else，卻沒有If】
   
我東改西改還是不行 請問是哪裡有錯誤？

TOP

lifedidi

帖子
104 
主題
32 
精華
0 
積分
144 
點名
0  
作業系統
windowsXP 
軟體版本
2007 
閱讀權限
20 
性別
男 
註冊時間
2013-2-25 
最後登錄
2022-9-2 

論壇贊助勳章
4#
發表於 2013-5-30 14:25 | 顯示全部帖子
回復 5# GBKEE


    謝謝GBKEE 大大！

TOP

        靜思自在 : 謊言像一朵盛開的鮮花，外表美麗，生命短暫。
返回列表 上一主題