Excel VBA質問箱 IV

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

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


53838 / 76732 ←次へ | 前へ→

【27701】ファイルを別名保存した後、ファイルが開かない
質問  にんは  - 05/8/16(火) 19:10 -

引用なし
パスワード
   お世話になっています。

  Set NewBook = Workbooks.Add
  'コピー元xls
  varxls = "C:A.xls"
  Workbooks.Open Filename:=varxls
  aa = ActiveSheet.Name
  Set a = ActiveSheet.UsedRange
  Set b = NewBook.Worksheets(1).Range("A1")

  a.Copy (b)
  NewBook.Application.DisplayAlerts = False
  'コピー先xls
  NewBook.SaveAs Filename:= _
    "C:B.xls", _
    FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
    ReadOnlyRecommended:=False, CreateBackup:=False
  NewBook.Application.DisplayAlerts = true

長くてすみません。
こんな感じで保存まではできるのですが
その後、xlsファイルが開かなくなってしまいました。
(すべてのxlsファイル)
保存したファイルを消すと開けるようになります。
どうすればよいかご教授ください

0 hits

【27701】ファイルを別名保存した後、ファイルが開かない にんは 05/8/16(火) 19:10 質問
【27703】Re:ファイルを別名保存した後、ファイル... End 05/8/16(火) 20:02 発言
【27705】Re:ファイルを別名保存した後、ファイル... にんは 05/8/16(火) 20:34 回答
【27707】Re:ファイルを別名保存した後、ファイル... End 05/8/16(火) 21:06 発言
【27709】Re:ファイルを別名保存した後、ファイル... にんは 05/8/16(火) 21:28 質問
【27712】Re:ファイルを別名保存した後、ファイル... りん 05/8/16(火) 22:02 質問
【27714】Re:ファイルを別名保存した後、ファイル... End 05/8/16(火) 22:25 発言
【27716】Re:ファイルを別名保存した後、ファイル... りん 05/8/16(火) 22:46 発言
【27717】Re:ファイルを別名保存した後、ファイル... End 05/8/16(火) 22:57 発言
【27718】Re:ファイルを別名保存した後、ファイル... りん 05/8/16(火) 23:03 発言
【27719】Re:ファイルを別名保存した後、ファイル... End 05/8/16(火) 23:13 発言
【27722】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 9:43 回答
【27728】Re:ファイルを別名保存した後、ファイル... りん 05/8/17(水) 11:40 発言
【27721】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 9:39 回答
【27724】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 9:46 回答
【27720】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 9:36 質問
【27725】Re:ファイルを別名保存した後、ファイル... Jaka 05/8/17(水) 10:00 発言
【27727】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 10:54 回答
【27737】Re:ファイルを別名保存した後、ファイル... End 05/8/17(水) 15:01 発言
【27738】Re:ファイルを別名保存した後、ファイル... End 05/8/17(水) 15:04 発言
【27739】Re:ファイルを別名保存した後、ファイル... にんは 05/8/17(水) 15:19 発言
【27921】Re:ファイルを別名保存した後、ファイル... りん 05/8/24(水) 12:31 発言

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