Excel VBA質問箱 IV

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

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


53990 / 76732 ←次へ | 前へ→

【27546】テキスト形式変換の際のトラブル
質問  goro  - 05/8/11(木) 14:43 -

引用なし
パスワード
     以下のようなプログラムを組み、エクセルシートをテキスト形式に変換する
  プログラムを組みました。Sheet1のBX14のセルはセルが連結しているために
  xlValuesにて値のみコピーして、別シートに貼り付けています。
  BX14には日付のデータが入っており、2005/08/01と日付形式のデータが入っています。テキスト形式にする際にテキスト側では08/01/2005と表示されましたのでこれをFormat関数で以下のように日付の形式を文字の形式に変えました。が、まだ反転します。どなかかご教示ください。
  Sheets("Sheet1").Select
  Range("BX14").Select
  Selection.Copy
  Sheets("Sheet2").Select 
  Cells(e, 13).Select
  Selection.PasteSpecial Paste:=xlValues
  Cells(e, 13).Value = Format(Cells(e, 13).Value, "yyyy/mm/dd")
  With Application
   svnm = Workbooks("TEST.xls").Sheets("Sheet1").Range("H9").Value
   svnm = .GetSaveAsFilename(svnm, "テキストファイル,*.txt")
  End With
    ActiveWorkbook.SaveAs Filename:=svnm, FileFormat:=xlText
    ActiveWorkbook.Close SaveChanges:=False

0 hits

【27546】テキスト形式変換の際のトラブル goro 05/8/11(木) 14:43 質問
【27553】Re:テキスト形式変換の際のトラブル Jaka 05/8/11(木) 15:59 発言
【27554】ありがとうございます。解決しました。 goro 05/8/11(木) 16:13 お礼

53990 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free