- 運営しているクリエイター
#Excel_VBA
マクロルーティン#25（マクロの汎用性を高める！）
皆さんこんにちは。
今回はマクロの汎用性について一歩高めていきたいと思います。
データの行数はいつも同じとは限りません。ちょっと書き足すだけで変化に対応できるマクロを作れるのです。
前回の解答からです。
このように書けましたでしょうか？
前回の「美容」シートまとめのマクロから黄色い部分を変更しただけです。
今回は金額の列を確認しますので「C列」が「>=10000」という書き方になり貼り付け先の
マクロルーティン#24（全行確認して指定のシートにまとめる！）
データ一覧の中から必要な行を指定のシートに一行ずつまとめていく。皆さんこんにちは。
今回は前回の続きで、指定のシートに２行目から順に必要な行をコピペでまとめていく書き方をご紹介します。
動画でもご確認いただけます。
前回はデータ一覧から必要な行を見つけてコピーするというところまで書けました。
★コードを書き始めるときの考え方やどこから書き始めるのかはマクロルーティン#23でわかりやすくご説明
マクロルーティン#15（Iｆ文の使い方）
If文を利用してデータをわかりやすくする皆さんこんにちは。
今回は If 文 をご紹介します。
その前にマクロルーティン#14の問題の解答例は以下のとおりです。
値貼り付けは２行目の「.Pastespecial Paste:=xlPasteValues」を覚えておけば大丈夫です！最後の「ｓ」は忘れずに。Valuesです。
それでは、今回のレッスン If文 の使い方をご紹介します。
上の図の
マクロルーティン#14（値貼り付け）
値貼り付けする皆さんこんにちは。
値貼り付けをするマクロの書き方をご紹介します。
その前にマクロルーティン#13の問題の解答例は以下のとおりです。
★１行で書く場合
★２行にした場合
以上です。
ファイルが２ファイルとも開いている状態で実行できます。
それでは今回のレッスン、値貼り付けをご紹介していきます。
◆目標
D列には行ごとにB列とC列の加算の数式がはいっています。このD列の値の
マクロルーティン#13（指定のExcelファイルへのコピペ）
エクセルファイルから別のエクセルファイルにコピペする
皆さんこんにちは。
今回はエクセルファイル間でデータのコピー＆ペーストするマクロの書き方をご紹介します。
動画はこちらです↓
◆目標
［マスタファイル］のデータを［作業ファイル］にコピー＆ペーストする
（［マスタファイル］のシート名は「１週目」、［作業ファイル］のシート名は「今週」とする。）
◆書くコード
長いので、これを２行で書いた
マクロルーティン#9（複数列のコピー）
複数の列をコピーして別の列にそのまま貼り付ける
皆さんこんにちは。
今回は複数の列をコピーして別の列にそのまま貼り付けるというコードの書き方をご紹介します。
◆目標
A列B列をD列E列にそのままコピー＆ペーストする。
◆マクロルーティン#8を読んでいただいた方ありがとうございます。
以下のようにかけたら正解です。
列番号での書き方は次のとおりです。
★自分が書きやすいほうで書きましょう。
マクロルーティン#8（列のコピー）
１列コピーして別の列にそのまま貼り付ける
皆さんこんにちは。
今回は１列コピーして別の列にそのまま貼り付けるというコードの書き方をご紹介します。
--------------------------------------------------------------------------
その前に、、前回（マクロルーティン#7）の問題の解答３パターンは以下のとおりです。
・Rows("5
マクロルーティン#7（複数行のコピー）
複数の行をコピーして別の行にそのまま貼り付ける
皆さんこんにちは。
今回は複数の行をコピーして別の行にそのまま貼り付けるというコードの書き方をご紹介します。
◆目標
１から２の行をコピーして５から６の行に貼り付ける
◆マクロルーティン#6を読んでいただいた方ありがとうございます。
以下のようにかけたら大正解です。
ここで、この２行のコードを１行で書く書き方をご紹介します。
◆書くコード
マクロルーティン#6（行のコピー）
行ごとコピーして別の行にそのまま貼り付ける
皆さんこんにちは。
今回は行ごとコピーして別の行にそのまま貼り付けるというコードの書き方をご紹介します。
◆目標
１の行をコピーして４の行に貼り付ける
◆書くコード
Rows(1).Copy Rows(4)
◆解説
「Rows」というのが始めて出てきましたが、これは行を指定するときに使います。Rowsの次にカッコ書きで行番号をいれます。
これは
マクロルーティン#5（範囲のコピー）
範囲をコピー＆ペーストする
皆さんこんにちは。
今回は複数セルの範囲選択でコピー＆ペーストする方法をご紹介します。
◆目標
A1からA5の値をD1からD5セルにコピー＆ペーストする
◆マクロルーティン#4の方法での書き方
◆まとめてコピー＆ペーストする書き方
◆解説
A1からA5までの範囲を取得する書き方は
Range(”A1:A5”)
カッコ内で最初のセルと最後のセルをコロン「：」で区