Q&A
前提・実現したいこと
マクロを利用して、CSVファイルからエクセルファイルへ、データをコピーさせようとしています。
発生している問題
日付が入っているセルをコピーした際に、
コピー前は 2018/10/30
となっていたものが、
コピー後は 18-10-30
と表示されてしまいます。
表示を変えないようコピーする方法か、コピー前の表示形式に戻す操作をお教えいただきたいです。
該当のソースコード（抜粋しています）
Workbooks.Open Filename:="「元データ」.csv"
Windows("「元データ」").Activate
Range("A2:Q2500").Select
Selection.Copy
Windows("「コピー先」.xlsx").Activate
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
回答2件
0
質問を整理すると、
表示形式は、
コピー元：18-10-30
コピー先：2018/10/30
コピーするとコピー先の表示形式が18-10-30になる。
ということでよいでしょうか？
という前提で考えるとコピー元の表示形式も含めてコピーしてしまっているので、値のみコピーすればよいのではないでしょうか。
VBA
1Range("A2").Select 2ActiveSheet.Paste 3↓ 4Range("A2").PasteSpecial Paste:=xlPasteValues
投稿2018/11/01 23:47
総合スコア16998
0
該当の列のRangeオブジェクトのNumberFormatLocalプロパティを設定するのが良いと思います。
どちらかというと「コピー前の表示形式に戻す」の方に近い操作です。
投稿2018/11/01 10:47
総合スコア395
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。