Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4218 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【57837】文字列操作で中にハイフン入れて日付に （。。ｊ） 08/9/16(火) 14:29 質問[未読]
【57838】Re:文字列操作で中にハイフン入れて日付に Jaka 08/9/16(火) 14:46 発言[未読]
【57839】Re:文字列操作で中にハイフン入れて日付に （。。ｊ） 08/9/16(火) 14:50 お礼[未読]
【57841】Re:文字列操作で中にハイフン入れて日付に kanabun 08/9/16(火) 16:07 発言[未読]
【57842】Re:文字列操作で中にハイフン入れて日付に （。。ｊ） 08/9/16(火) 17:43 お礼[未読]
【57837】文字列操作で中にハイフン入れて日付に
質問  （。。ｊ）  - 08/9/16(火) 14:29 -
引用なし
パスワード
   VBじゃなくて関数かも知れないんですが、教えてください。
今EXCELで下のような数字が並んでいるんですが、

20000131
20010219
20020730
20030612
20031219
20040123
20040803
20050209
20050330
20050701

これに全てハイフン　”-　”　を入れて日付にしたいのです。
20000131→2000/01/31

一個一個やってくと日が暮れるのでまとめてやりたいのですが・・・
どうしたらいいですか？
お願いしますm(_ _)m
【57838】Re:文字列操作で中にハイフン入れて日付に
発言  Jaka  - 08/9/16(火) 14:46 -
引用なし
パスワード
   データ　→　区切り位置　→　次へ　→　次へ　→　列のデータ形式で
日付「YMD」を選択
完了

これで
数値が日付になるから好みの表示形式に変更。
【57839】Re:文字列操作で中にハイフン入れて日付に
お礼  （。。ｊ）  - 08/9/16(火) 14:50 -
引用なし
パスワード
   目からウロコです。
ありがとうございました。m(_ _)m
【57841】Re:文字列操作で中にハイフン入れて日付に
発言  kanabun  - 08/9/16(火) 16:07 -
引用なし
パスワード
   ▼（。。ｊ） さん：

解決されたようですが、あと
半分お遊びで、、こんな風にもできます。(^^

ワークシート関数をApplicationオブジェクトから利用すると
複数範囲に一括処理が可能です（ワークシート関数全部じゃないですけど）

（１）
　With Selection
　　　.Value = Application.Text(.Cells, "0000-00-00")
　End With

（２）
　With Application
　　　Selection.Value = _
　　　　.Replace(.Replace(Selection, 7, 0, "-"), 5, 0, "-")
　End With
【57842】Re:文字列操作で中にハイフン入れて日付に
お礼  （。。ｊ）  - 08/9/16(火) 17:43 -
引用なし
パスワード
   ▼kanabun さん：

ありがとうございます!!
コピペしてみたらできました♪
今後もお願いします。m(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4218 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free