Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


43260 / 76732 ←次へ | 前へ→

【38522】Re:配列を使用し変数をセルに代入
回答  Kein  - 06/6/5(月) 18:02 -

引用なし
パスワード
   >a〜gまでの7種類の変数に格納
それは配列変数ではありませんね。
>あるテキストデータを1行ごとに分割
例えば

Dim FSO As Object
Dim Ary As Variant
Dim AllSt As String
Const MyF As String = "C:\temp\Test.txt"

Set FSO = CreateObject("Scripting.FileSystemObject")
With FSO.OpenTextFile(MyF, 1)
  AllSt = .ReadAll
  .Close
End With
Ary = Split(AllSt, vbCrLf)
If Ubound(Ary) < 257 Then
  Cells(1, 1).Resize(, UBound(Ary) + 1).Value = Ary
Else
  MsgBox "シートの列数に収まりません", 48
End If
Set FSO = Nothing: Erase Ary

などとすれば、1行分の文字列を一つのセルに入力する作業を、
全文一括して行えますが。

0 hits

【38519】配列を使用し変数をセルに代入 roxy 06/6/5(月) 17:36 質問
【38522】Re:配列を使用し変数をセルに代入 Kein 06/6/5(月) 18:02 回答
【38523】Re:配列を使用し変数をセルに代入 roxy 06/6/5(月) 18:06 発言
【38525】Re:配列を使用し変数をセルに代入 Kein 06/6/5(月) 18:24 発言
【38536】Re:配列を使用し変数をセルに代入 roxy 06/6/6(火) 9:50 発言
【38539】Re:配列を使用し変数をセルに代入 Jaka 06/6/6(火) 10:40 発言

43260 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free