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

請問我在迴圈是使用小數點計數，可是遇到1.0會出現問題

xyzw7

中學生 Rank: 2

帖子: 16
主題: 4
精華: 0
積分: 52
點名: 0
作業系統: Win 7
軟體版本: 2010
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2011-7-6
最後登錄: 2011-12-1

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2011-7-29 10:30 | 只看該作者

請問我在迴圈是使用小數點計數，可是遇到1.0會出現問題

請問各位大大：
1.
                  for i = 0.6 to 12.4  step 0.1
                        Workbooks.Open "D:\不同材料的pattern比較 20110704\OF_Form_pol_v01\OF_Form_pol_v01@" & i & "GHz.csv"
                  next
只是遇到 1.0 、 2.0 、…12.0都會出現問題，請問各位大大如何決解呢？
2. 那變數 i 在上面用的迴圈要如何宣告呢？
感恩~~

樓主熱帖

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

2^#

發表於 2011-7-29 10:37 | 只看該作者

回復 1# xyzw7
Workbooks.Open "D:\不同材料的pattern比較 20110704\OF_Form_pol_v01\OF_Form_pol_v01@" & Format(i, "0.0") & "GHz.csv"

TOP

xyzw7

中學生 Rank: 2

帖子: 16
主題: 4
精華: 0
積分: 52
點名: 0
作業系統: Win 7
軟體版本: 2010
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2011-7-6
最後登錄: 2011-12-1

3^#

發表於 2011-7-29 13:28 | 只看該作者

回復 2# GBKEE

Dear 大大：
                  我用您的方法試了…還是無法開啟 1.0 的檔案，並我的程式如下：

         Sub test()
For i = 0.6 To 2# Step 0.1
   Workbooks.Open "D:\不同材料的pattern比較 20110704\OF_Form_pol_v01\OF_Form_pol_v01@" & Format(i, "0.0") & "GHz.csv"
Next

End Sub
在迴圈終點一直出現如上面顯示(不論是 1.0 顯示 1# 或是 2.0 顯示 2#)！

TOP

GBKEE