Excel VBA質問箱 IV

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

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


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

8259 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

▼

【34352】ｃｓｖをマクロで開くと年月日が変わっている。 sakurako 06/2/1(水) 9:08

【34354】Re:ｃｓｖをマクロで開くと年月日が変わっ... inoue 06/2/1(水) 9:35

【34367】ありがとうございました。 sakurako 06/2/1(水) 11:57


	【34352】ｃｓｖをマクロで開くと年月日が変わって...

sakurako - 06/2/1(水) 9:08 -


	引用なし

	パスワード

マクロでｃｓｖファイルを開くと、ｃｓｖファイルにあるデータが
変わっているんです。
2006年が1930年になっているんです。
ｃｓｖファイルの開き方は、
myDataName = Application.GetOpenFilename("csvファイル,*.csv")
　If myDataName = False Then Exit Sub
　　　
　 Workbooks.OpenText Filename:=myDataName, _
　　　　　　　　　　　 StartRow:=1, DataType:=xlDelimited, _
　　　　　　　　　　　 Comma:=True, _
　　　　　　　　　　　 FieldInfo:=Array(Array(1, 2), Array(2, 2), _
　　　　　　　　　　　　　　　　　　　　Array(3, 2), Array(4, 2), _
　　　　　　　　　　　　　　　　　　　　Array(5, 2), Array(6, 2), _
　　　　　　　　　　　　　　　　　　　　Array(7, 2), Array(8, 2))
です。
どのようにしたら年月日がかわらないんでしょうか？
ご教授ください。
よろしくお願いいたします。


	【34354】Re:ｃｓｖをマクロで開くと年月日が変わ...

inoue

- 06/2/1(水) 9:35 -


	引用なし

	パスワード

>2006年が1930年になっているんです。
私はこの方法は採らないので詳しくはないですが、
この方法だと書式を整えていない新規ブックで開くので
Excelが「いらぬおせっかい」をします。
年が西暦4桁なら問題ないと思いますが。

既存の書式を整えたシートにCSVを読み込む方法もあるので、
一旦「文字列」にした列にそのような日付部分を読み込めば、
そのまま表示されると思います。
列ごとに転記時に編集を加えることもできるので、
年の前に強制的に「20」を付加させても良いかも知れません。
[CSV形式テキストデータの読み込み]
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_020.html
[〃(カンマ数不定用)]
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_030.html


	【34367】ありがとうございました。

sakurako - 06/2/1(水) 11:57 -


	引用なし

	パスワード

なんとか開けるようになりました。
エクセルのレジストリの影響みたいですね。
会社の方がHPで確認してきました。

ありがとうございました。


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

8259 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free