| 投稿日 | ： 2005/08/08(Mon) 15:29 |
| 投稿者 | ： いな |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: ファイル名に変数を使いたいのですが |
> いなさん、ありがとうございます！
>
> やってみたら、変数名ファイルになりました！！
> ただ、作ったファイルをそのまま保存したいのですが
>
> Open "C:\calender\Schedule" \ today & ".txt" For Append As #1
> Write #1, Memo
> Close #1
>
> このように書くと、型が一致しませんになります。
× Open "C:\calender\Schedule" \ today & ".txt" For Append As #1
○ Open "C:\calender\Schedule\" & today & ".txt" For Append As #1
では？
"\"は"+"や"-"、"*"、"/"と同様に、意味のある
記号なので、
文字列にするために、ダブルクオートでくくりましょう、
あと気になったのですが、
>For Append As #1
の部分の、#1は固定で書くと、
既にファイルが開かれているなどのエラーの原因となるので、
--
dim intFileNo As Integer
'使用可能なファイル番号を取得
intFileNo = FreeFile
Open "C:\calender\Schedule\" & today & ".txt" For Append As #intFileNo
Write #intFileNo, Memo
Close #intFileNo
というように使ったほうが、ヨサゲです
#この辺は、左のサンプル"ファイル操作関係"に詳しく書かれています。