• ベストアンサー

エクセル処理に関する質問

Chiquilinの回答

  • Chiquilin
  • ベストアンサー率30% (94/306)
回答No.4

バージョンを書かずに質問しても適切な回答は付きません。 というのも Microsoft365なら =TEXTSPLIT(TEXTJOIN(" ",,TRIM(REPT(A2:A4&" ",B2:B4))),," ") で済む話です。 > マクロを使わずにできるいい方法はないでしょうか。 だったらクエリでやればいいでしょう。 カスタム列の追加で「=List.Repeat({[名称]}, [個数])」 作った列を List.Unionで結合 それをテーブルに変換して読み込み おしまい。

関連するQ&A

  • Excel2003に関しての質問です。

    Excel2003に関しての質問です。 A列の各セルごとに数字や文字など、さまざまな文字列が存在したBookにて、 『数字が8個連なった行のみを抽出し、ほかの行は削除する』ことはできるでしょうか? たとえば添付のようなものです。 添付画像は2007ですが、会社のは2003なので… この場合は、2.3行目や5.6行目などを抽出し、ほかのデータは削除したいのです。 また、この抽出作業をマクロ記憶しておき、手間を省きたいと思っています。 面倒なのが、データの個数が日々増減しているので、 Aの○○行を毎回消せば大丈夫!というものでもないので、困っています。 どなたかご教示ください…

  • エクセルでの連番の処理

    お世話になります。 1行目に入力されたデータをルールに沿って2行目以下にどんどん追加していきたいと思っています。 まずD1、E1のセルに数字を入れます。 例:D1に3、E1に25 を入れてマクロを実行するとD列の2行目以下に3,4,5,6…25と連番で入力出来るようにしたいのです。 この例ではD列は24行目まで入力されています。そこで2行目から24行目までのA,B,C列にはそれぞれ1行目のA,B,C列と同じデータを入力します。なおA,B,C列は数字、文字列どちらもあります。空白の場合もあります。 この状態でA~E列の1行目のデータを変更し、仮にD1を2、E1を15としたとします。ここで再度マクロを実行すればD25に2、そして順に連番が入りD38に15が入るようにします。 同時に25行目から38行目までのA,B,C列にはそれぞれ1行目のA,B,C列と同じデータを入力します。 これの繰り返しです。 つまり2行目以下のD列で空白の行以下にどんどん連番を入れていく具合です。 前提としてD1、E1は整数しか入りません。またE1の数字はD1より大きいです。ただD1,E1に同じ数字が入った場合、その数字の1行分だけが入力されるようにします。 以上の処理が自動化できるマクロはできますか? アドバイス願います。

  • エクセルについて質問

    添付したエクセルの画像で、Bの「個数」はあらかじめ与えられていて、ランダムに1か2か空白が入ります。 この「個数」が2の場合のみAの番号をDのように2つ表示するようにしたいのですが、 関数でやる方法を教えていただきたいです。 よろしくお願いします。

  • 【エクセル・マクロ】 繰り返し貼り付けがしたいです

    仕事で、大量のコピペをしなきゃいけなくなり、 マクロを組みたいのですが、素人でよく分からず投稿させて頂きました。 宜しくお願い致します。 参考画像のように、 A列にあるデータを、B列の数に合わせて C列(色付けしてある列)に繰り返し貼り付けをしたいのです。 ※参考画像では、分かりやすいように姓名にしてありますが、 本当は文章とか数字とかを使います。 参考画像ではA列に5行分、B列に20行分しかありませんが、 本当はA列に50行分、B列に3,000行分あります。 ですから、A列の50行を、3,000÷50=60回も貼り付けするのが面倒で、 3,000という数字も、毎回1,000~10,000と変動するので、 今後のことを考えると、マクロを組んだ方が早いのでは、と思いました。 また、欲を言えば、A列に数式を入れていることもあり、 C列に数式の繰り返し貼り付けをおこないたいのですが、 これは難易度がぐっと上がるのでしょうか? 他力本願で大変申し訳ございませんが、 何卒宜しくお願い致します。

  • エクセル2000で質問があります。

    エクセル2000で質問です。 あるデータが毎日メールに添付して送られてきます。 列は10列と決まっています。 1行目に項目が入っていて2行目から数行に渡ってデータが入っています。 日によって行数は異なります。 毎日それをコピー&ペーストして1ヶ月分のデータを作成しているのですが 何かルールを付ける事により自動で増やしていっていく方法は無いのでしょうか? もちろん昨日までの分はそのまま残った状態で増やしていきたいのです。 項目はすでに入っているので必要ありません。2行目以降のデータのみを 移すやり方ってないものでしょうか? たったそれくらいの作業は大して手間じゃないんだから毎日すれば! と言う声も聞こえてきそうですが・・・お許し下さい。

  • エクセルVBAで質問です。

    エクセルVBAで質問です。 不用な空白行を削除したいのですが、どのようにコードを書いたらいいでしょうか? 添付の画像のような表を作っています。 添付のではAAからGGまでデータが入っていますが、いつもデータ数は違います。ただし20行目 より多くなることはありません。データ範囲の5行目から20行目まででおさまります。 このような条件で、データのない空白行を自動で削除するようにしたいと考えています。 よろしくお願いします

  • エクセルで在庫表を作りたい

    添付画像のように赤い線の行列に売れた個数の数字を入れていくと 在庫数が減る計算方法などがあれば教えていただきたいのですが。 エクセル2010を使用しております。

  • エクセル2007にて表から

    エクセル2007にて表から DATAを抜き出したいのでご教授ください 画像の上のセルに数字を入れていき個数部分(青丸部分)に数値があるものを 元にして 下セル13からのような並びにDATAを作成したく思っております。 マクロは自動保存などで触ったことがあります。 数値がある部分というのが難しく思っておりますので すいませんがよろしくお願いします

  • マクロについて質問です。

    画像のように別のブックがあって同じレイアウトでデータが並んでいるとします。ブック1が主のデータです。ブック2のA列にある数字をめやすに、ブック1のA列に同じ数字があったらそこから下7行横4列を置き換えるということはできるのでしょうか。画像でいうと、数字の5と8の行列が入れ替えられる感じです。もし、こういうことができるマクロがありましたら、教えていただきたいです。よろしくお願いします。

  • エクセル マクロでの繰り返し処理について

    エクセル初心者です。エクセル2010を使用しています。 とあるホームページから、ページをコピーして、エクセルに「テキストで貼り付け」をおこない、 A列に8行の項目が入ります。この8行と次の8行の間には、自然に空白行が1行ずつ入ります。 これは、完全に手作業です。 次に、下記の作業を、マクロの自動記録を相対参照で行います。 上記のエクセルのデータを、1つめの8行のデータをコピーして(A1からA8)、C1に「行と列を入れ替え」を選択してC1からJ1に貼り付けます。 その後は、次のデータのまとまりのA10のセルに移ります。これをCtrl+a を押し続けることで、数百件か多いときは4000件ほどの並べ替えをしています。 「データがある間は、この処理を繰り返す。」 というマクロにしたいのですが、参考書等を見ながらチャレンジしてもうまくいきません。 わかる方、教えていただけますか。 以下が、マクロの自動記録でできた物です。データの個数は数百のこともあれば4000件のこともあります。 Sub 行列入れ替え8行() ' ' 行列入れ替え8行 Macro ' ' Keyboard Shortcut: Ctrl+a ' ActiveCell.Range("A1:A8").Select Selection.Copy ActiveCell.Offset(0, 2).Range("A1").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True ActiveCell.Offset(9, -2).Range("A1").Select End Sub どうぞ、ご指導よろしくお願いいたします。