Excel VBA質問箱 IV

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

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


59026 / 76732 ←次へ | 前へ→

【22420】Re:コマンドボタンを利用してのマクロ作業
回答  ponpon  - 05/2/18(金) 21:40 -

引用なし
パスワード
   ponponです。こんばんは。

>3.コマンドボタンをクリックする
>4.基本sheetの次に新しいsheetを1枚自動作成する
>5.基本sheet上のデ−タをすべてコピ−する
>6.4で作成したsheetにコピ−されたデ−タを関数抜きで(値と罫線等のみ)貼り付ける

マクロの記録からです。
形式を選択して貼り付けには、値と罫線というのはないので、
値だけ貼り付けるなら
こうなると思います。
「基本シート」にコピペしてください。

Private Sub CommandButton1_Click()
  Sheets("基本シート").Cells.Copy
  Sheets.Add after:=Sheets("基本シート")
  Selection.PasteSpecial Paste:=xlPasteValues

End Sub

罫線も含めてすべてなら
Private Sub CommandButton1_Click()
  Sheets("基本シート").Cells.Copy
  Sheets.Add after:=Sheets("基本シート")
  Selection.PasteSpecial Paste:=xlPasteAll

End Sub
0 hits

【22391】コマンドボタンを利用してのマクロ作業 misaki 05/2/17(木) 19:47 質問
【22392】Re:コマンドボタンを利用してのマクロ作業 かみちゃん 05/2/17(木) 20:09 発言
【22393】Re:コマンドボタンを利用してのマクロ作業 misaki 05/2/17(木) 20:19 お礼
【22394】Re:コマンドボタンを利用してのマクロ作業 かみちゃん 05/2/17(木) 20:37 発言
【22408】Re:コマンドボタンを利用してのマクロ作業 misaki 05/2/18(金) 13:40 発言
【22416】Re:コマンドボタンを利用してのマクロ作業 Jaka 05/2/18(金) 17:32 発言
【22420】Re:コマンドボタンを利用してのマクロ作業 ponpon 05/2/18(金) 21:40 回答
【22421】Re:コマンドボタンを利用してのマクロ作業 bykin 05/2/18(金) 23:41 回答
【22422】Re:コマンドボタンを利用してのマクロ作業 ponpon 05/2/18(金) 23:58 発言
【22424】Re:コマンドボタンを利用してのマクロ作業 bykin 05/2/19(土) 0:24 発言
【22426】Re:コマンドボタンを利用してのマクロ作業 misaki 05/2/19(土) 10:44 お礼

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