Excel VBA質問箱 IV

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

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


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

58127 / 76738

←次へ　｜　前へ→


	【23343】Re:回答ありがとうございまいた！！

初初心者

- 05/3/18(金) 22:39 -


	引用なし

	パスワード

ありがとうございます！！
csvの伝票一覧をExelでとりこんでいます。
Ｂ列が日付なのです。20050318のように入ってます。03/18のように表現したいのです。
それで下記のように入れてみたのですが（わからないなりに）
Const 列 = "B"
Dim Cell As Range
For Each Cell In Columns (列).SpaciaCells(xlCell Type Constants)
With Cell
If.Value<>""Then.Value=Format("mm/dd","0000/00/00")
End With
Next Cell
Columns(列）.Auto fit
End sub
オブジェクトはこのプロパティまたはメソッドをサポートしていません。とでます。
判りません！！またお願いします。

0 hits

▼

【23269】回答ありがとうございまいた！！ 初初心者 05/3/17(木) 22:33