Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

20476 / 76807

←次へ　｜　前へ→


	【61751】Re:Opentextについて

kanabun - 09/5/31(日) 23:28 -


	引用なし

	パスワード

▼dtaro さん：

>　　　　Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 2), Array(3, 2), Array(4, 1), _
>　　　　Array(5, 1), Array(6, 1), Array(7, 2), Array(8, 2)),

>FieldInfo=の部分について動的に対応しようと思い、

Dim fInfo(1 to 256) as variant
Dim i as long
'----------------- デフォルト（文字列）の設定
For i = 1 To 256
　　fInfo(i) = Array(i, 2)
Next
'----- Special Columns に文字列以外のデータ型を指定
fInfo(4) = Array(4, 1)
fInfo(5) = Array(5, 1)

こんな風に、OpenTextする前に書いておいて、

　　 , FieldInfo:=fInfo

のようにこの配列を渡してください。

0 hits

▼

【61750】Opentextについて dtaro 09/5/31(日) 23:01