Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7652 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【37693】Pastespecialについて。 無頼斎 06/5/15(月) 20:08 質問[未読]
【37704】Re:Pastespecialについて。 Hirok 06/5/16(火) 7:27 発言[未読]
【37757】Re:Pastespecialについて。 無頼斎 06/5/18(木) 0:25 発言[未読]
【37693】Pastespecialについて。
質問  無頼斎  - 06/5/15(月) 20:08 -
引用なし
パスワード
   こんばんは。今回もよろしくお願いします。

Pastespecialで様々な行幅をそのままコピーすることができますか？

もしできるのであれば、定数と番号をご教示下さい。

（列幅はちなみに８ですよね。）
【37704】Re:Pastespecialについて。
発言  Hirok  - 06/5/16(火) 7:27 -
引用なし
パスワード
   ▼無頼斎 さん：

おはよう御座います。
ご指摘の通りの
>（列幅はちなみに８ですよね。）
で良いと思いますが。

Sub Copy_PasteSpcl()
　 With Sheets("Sheet2")
　　　 .Activate
　　 Sheets("Sheet1").Range("A6:D12").Copy
　　　With .Range("A1")
　　　　 .PasteSpecial 1
　　　　 .PasteSpecial 8
　　　　 .Select
　　　End With
　 End With
　 Application.CutCopyMode = False
End Sub
【37757】Re:Pastespecialについて。
発言  無頼斎  - 06/5/18(木) 0:25 -
引用なし
パスワード
   こんばんは。

ご返信ありがとうございます。

しかしながら、知りたいのは列幅のコピーではなく、

行幅のコピーなのです。

よろしくお願いします。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7652 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free