TEXT問題請教 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » TEXT問題請教

返回列表下一主題上一主題發帖

[發問] TEXT問題請教

中學生 Rank: 2

帖子: 262
主題: 8
精華: 0
積分: 280
點名: 0
作業系統: xp
軟體版本: Office 2007
閱讀權限: 20
性別: 男
來自: HK
註冊時間: 2015-8-11
最後登錄: 2025-3-24

2016猴年全勤獎章

1^# 跳轉到 »

發表於 2019-1-29 09:59 | 顯示全部帖子

Sub BB()
Sheet4.Range("U2") = Format(Sheet4.Range("Y2"), "000-00-00")
End Sub

複製代碼

如數量多, 建議用 With 配合 For Next

Sub zz()
With Sheet4
.[U2] = Format(.[Y2], "000-00-00")
End With
End Sub

複製代碼

靜思自在 : 不怕事多，只怕多事。

返回列表下一主題上一主題