スポンサードリンク
無料ブログ作成サービス JUGEM
人気ブログランキング くつろぐ ブログ王
■ Mobile
qrcode
←prev entry Top next entry→
Excel VBA ファイル操作
◎読み出しRead
Dim noRd As Integer
Dim bufr As String
Dim tmpAr As Variant

noRd = FreeFile
Open inFile For Input As noRd
Do Until EOF(noRd)
Line Input #noRd, bufr
tmpAr = Split(buf, ",")

loop
Close noRd


◎書き込みWrite
Dim noWt As Integer
Dim bufw As String

noWt = FreeFile
Open "abc.txt" For Output As noWt
Print #noWt, bufw
Close noWt
| 愛アース | 備忘録・EXCEL | comments(0) | trackbacks(0) | pookmark |
スポンサーサイト
| スポンサードリンク | - | - | - | pookmark |
Comment
name:
email:
url:
comments:
Trackback
トラックバック機能は終了しました。
4 7 10 13 16 19 22 25 28 31 34 37 40 43 46 49 52 55 58 61 64 67 70 73 76 79 82 85 88 91 94 97 100 103 106 109 112 115 118 121 124 127 130 133 136 139 142 145 148 151 154 157 160 163 166 169 172 175 178 181 184 187 190 193 196 199 202 205 208 211 214 217 220 223 226 229 232 235 238 241 244 247 250 253 256 259 262 265 268 271 274