• 締切済み

エクセル2003マクロvba名前の定義

excelエクセル2003のvbaの質問です yy列の最下行をxxとします yy列の名前の定義を馬とします zz列の名前の定義を肉とします 列番号・行番号を用いず、肉2行目から肉xx行目までオートフィル するマクロの構文を教えてください xxの値は変動するのでxxの値を取得する形にしてください dimとか使わず１行で収まる構文でお願いします

  • 4rd
  • お礼率40% (15/37)

みんなの回答

  • ubku
  • ベストアンサー率37% (227/608)
回答No.1

Range(Cells(Range("肉").Row + 1, Range("肉").Column), Cells(Range("肉").Row + 1, Range("肉").Column)).AutoFill Destination:=Range(Cells(Range("肉").Row + 1, Range("肉").Column), Cells(Cells(Range("馬").EntireRow.Count, Range("馬").Column).End(xlUp).Row, Range("肉").Column)), Type:=xlFillSeries いかがでしょうか？

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. Excel（エクセル）

関連するQ&A

  • エクセルでVBAのマクロを組みたい

    VBA初心者です。エクセルで大量の情報があるとき、A列の文字列が”****”であって、さらにB列の文字列が”++++”であるときの、C列の値を検索したい。それを1行目から最下行まで行いたい場合、どのようなプログラムになりますか、教えてください。よろしくお願いします。

  • エクセル excel 複数範囲選択マクロ

    a列2行目からa列の値がある最下行 と c列2行目からc列の値がある最下行 という範囲を同時に選択するマクロの構文を教えてください。

  • ACCESS もしくはEXCEL条件によってコピー

    ACCESSもしくはEXCELで　口数の数量と同じようにそのデータ(行)をコピーしたいですが、お願い致します。 例： 住所　　　名前　　　口数 東京　　　XX　XX　　２ 千葉　　　YY　YY　　1 神奈川　　ZZ　ZZ　　3 を下の表ようにしたいです。 住所　　　名前　　　口数 東京　　　XX　XX　　１ 東京　　　XX　XX　　１ 千葉　　　YY　YY　　１ 神奈川　　ZZ　ZZ　　1 神奈川　　ZZ　ZZ　　１ 神奈川　　ZZ　ZZ　　１ 口数と同じようにその行を全部コピーしたですが、 宜しくお願い致します。

  • Excelのマクロで・・・

    こんな表があります。 　　　Ａ　　Ｂ　　Ｃ　　Ｄ　　Ｅ　　Ｆ　　Ｇ １　ＸＸ　ＸＸ　ＸＸ ２　ＹＹ　ＹＹ　ＹＹ ３　ＺＺ　ＺＺ　ＺＺ ここでＡ１、Ｂ１、Ｃ１の変数を読み込み「ある計算」をさせてＤ１～Ｇ１にその答えを書き出させる、Ａ２～Ｃ２の変数を読み込み「ある計算」をさせてＤ２～Ｇ２にその答えを書き出させる・・・というのを作りたいのですがデータの読み込みと書き出し方法がわかりません。 どうすればいいのでしょうか？簡単なことなのでしょうがエクセルのヘルプが入っていないので・・・（大学のＰＣなので自分で入れることも不可能です） （縦は同一の変数で対応しています） 必要ならば補足いたします。

  • エクセル2003の繰り返しマクロ

    EXCEL2003のVBAマクロの構文を教えてください。 下記のようにA列に文字が昇順で並んでいるワークブックXXがあります。 Ａ 1あ 2あ 3あ 4い 5い 6う 7え 8お 9お 以下がマクロでやりたいことです。 (1)I行目から、1行目と同じ文字の最下行(この場合は3行目まで)を切り取る (2)新しいワークブックを作り、開く (3)それに貼り付ける (4)それを保存し閉じる (5)ワークブックXXに戻り、切り取られて空になった行を削除(そしてこの場合4行目が一番上に繰り上がる) この(1)～(5)までを繰り返し、ワークブックXXが空になったら終了する

  • エクセル：マクロの起動条件

    お世話になります。 以下の条件でのマクロを起動する方法、及びそのマクロを教えてください。 《条件》 ブックを開いた時、あるシートのＣ列でデータが入っている最下行の行番号とＡ列のデータが入って最下行の行番号の差が１００以下だった場合、マクロを実行する。 （なおＣ列の行番号の方が必ず大きいです） ちなみに実行したいマクロは１～６の手順です。 １．ブックを開いたとき ２．「入力用」という名前のシートのＣ列でデータが入っている最下行の行番号とＡ列のデータが入っている最下行の行番号の差が１００以下だった場合 ３．「入力用」というシートにかかっているシートの保護をはずし ４．データが入っているＣ列の最下行のＡ～Ｚ列を選択して、５０行分　下にコピーする。 　（例えば、Ｃ列の最下行が３５０行の場合、Ａ３５０～Ｚ３５０まで　を選択したあと４００行まで下にコピーする。） ５．再度シートの保護をかけ ６．Ａ列でデータが入っている最下行の１つ下のセルを選択する ちなみに、２の条件に当てはまらないときはマクロを実行しません。 またＣ列の最下行よりＡ列の最下行が大きい数字になることはないはずですが、もし同じかＡ列の方が大きい場合、「エラー：Ｃ列よりＡ列が大きくなっています」と画面に表示させたい。 なお、行番号の差：１００、選択するＡ～Ｚ行、５０行分下にコピー　は変わる可能性があるので、修正する場合どの部分を修正すればよいかも教えてください。 よろしくお願いします。

  • エクセル　名前定義の範囲について

    エクセル　名前定義の範囲について質問です。 始まり・終わりの行を示す特定の文字列を設定し、 それを元に自動で範囲の行数を変化させるようなことはできませんでしょうか。 例）A列に、行範囲を示す文字列を記述。 　B列以降が実際の範囲となる。 　A 1　この行から 2　 3　 4　 5　 6　この行まで 7 というように記述されていた場合、 「この行から」「この行まで」という文字列の位置を元に、 名前定義の範囲が自動で「B1:C6」となるような方法を探しています。 「この行から」の位置をA3に変更した場合、 名前定義された範囲も、自動で「B3:C6」に変化して欲しいのです。 ただし、文字列を元に変化するのは行だけで、列の範囲は固定で構いません。 極力マクロを使用しない方法で、有効なものがございましたら ご指導のほどよろしくお願いします。

  • 特定の条件での個数算出

    excelで質問です。たとえば、10行目のA列にXXと入力し、B列に日付（H16.3.14のような書式）を入力すると、1行目のA列に、その個数が加算されるようにしたいのですが、どういう方法がありますか？ちなみに、10行目以降はこの書式が続きます。また、XXはYY、ZZなど何種類かがあるとします。わかりにくい文章ですみませんがよろしくお願いします。

  • エクセルVBAでセルの値を名前定義連続

    いつもお世話になってます。 エクセルVBA2013で質問です。 データ シートのC3から順次行方向にD3,E3と名前が入っています。 行方向に入る数は、下記のコードで取得できる数が上限になります。 i = Range("B4:B" & Cells(Rows.Count, "B").End(xlUp).Row).Count + 2 そのC3から順次行方向のセルの値を名VBAで名前を定義したいと思っています。 参照範囲は、C3ならC列全体、D3ならD列全体・・・としていきたいです。 各セルに入る値は変化することがあります。C3に「あいう」と入力したり「AAA」と入力したりと変化します。その度に名前の定義を変更したいです。（イベントでなく普通にボタンを押して変更する） 名前が変わるので、同じ範囲で名前が違うものがいくつもできないようにしたいです。 すいません、色々条件ありますがどうぞよろしくお願いいたします。

  • A列にある文字データで△△を含むセルの値をB列に□□にして置き換えしたい

    A列に文字データが100行まであります。 　　 A　　　　　　　　　　　B 　　 １　ミカンを食べた　　　　　ZZ ２　イチゴを食べた　　　　　XX ３　西瓜を食べた　　　　　　YY ４　ミカンを捨てた　　　　　ZZ ５　西瓜を拾った　　　　　　YY ６　ミカンを無くした　　　　ZZ ７　西瓜を貰った　　　　　　YY ８　イチゴをあげた　　　　　XX それを表のようにB列（任意の列）に置き換えたいです。 イチゴを含むセルはB列にXXをミカンはZZみたいな感じです。 A列のセルには同じ文字列は（今のところ）含みません。 文字の一部を置き換えて変換し、それを繰り返すところまではできましたが、上記のことがができません。 VBAを使って一発で変換したいのですが教えていただけますでしょうか？

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する