Excel VBA質問箱 IV

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

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


70173 / 76738 ←次へ | 前へ→

【11076】sheetごとに保存したい
質問  みかん  - 04/2/27(金) 12:02 -

引用なし
パスワード
   OS XP
EXCEL 2002です。
よろしくお願いします。

1つのファイルにたくさんのシートがあるのですが
そのシートごとに新たに保存したく思います。
コマンドボタンをつくり、
そのシート名をファイル名につけたいのですが
どうしたらいいでしょう。

一応考えたのはこんな感じです。
よろしくお願いします。

Private Sub CommandButton1_Click()
Dim name As String

  'Sheet名を取得する
  name = ここがわかりません。

  '取得したファイル名で保存
  ActiveWorkbook.SaveAs Filename:="C:\" & name & ".xls"

End Sub
0 hits

【11076】sheetごとに保存したい みかん 04/2/27(金) 12:02 質問
【11077】Re:sheetごとに保存したい IROC 04/2/27(金) 12:33 回答
【11078】Re:sheetごとに保存したい Asaki 04/2/27(金) 12:36 回答
【11088】Re:sheetごとに保存したい みかん 04/2/27(金) 16:08 質問
【11089】Re:sheetごとに保存したい Asaki 04/2/27(金) 16:14 回答
【11097】Re:sheetごとに保存したい アイエネス 04/2/27(金) 23:38 発言
【11114】Re:sheetごとに保存したい Asaki 04/2/28(土) 13:26 回答
【11151】Re:sheetごとに保存したい みかん 04/3/1(月) 14:04 質問
【11152】Re:sheetごとに保存したい Asaki 04/3/1(月) 14:15 回答
【11155】Re:sheetごとに保存したい みかん 04/3/1(月) 15:32 質問
【11156】Re:sheetごとに保存したい Asaki 04/3/1(月) 16:17 回答
【11159】Re:sheetごとに保存したい みかん 04/3/1(月) 16:33 お礼

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