請問如何改寫 ASC("A") 只能讀A-Z共26個字母..

　暱稱: 俊男

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-12-7 20:09 | 只看該作者

For j = 0 To 100
j2 = Asc("A") + j
If Range(Chr(j2) & "8").Value = "" Then Exit For
Next
j2 = j2 - 1

請問如何改寫 ASC("A") 只能讀A-Z共26個字母?改用別的函數?

2^#

發表於 2020-3-12 15:31 | 只看該作者

回復 1# srd0k9

把range换成cells(行,列).value=""试试看?

靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。