- ベストアンサー
VBA初心者です。空白の行を詰めたいです。
こんにちは。 お仕事上、必要になりましてぜひともご教授願います。 (1)Ａ列に もぐら と書いていない行は全部消すＶＢＡの式 (2)Ａ列に もぐら と書いていない1～500の行は全部消すＶＢＡの式 (3)Ａ列が 空白の200～400行を全て消すＶＢＡの式 を教えてください。似たような式をwebで見つけたのですが イマイチ応用ができませぬ。それと実行に時間も かかってしまうので、ぜひとも解りやすく宜しくお願い致します。 はあ、今夜も徹夜かあ。
- mogurayama
- お礼率96% (145/150)
- オフィス系ソフト
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (1)
- rollback
- ベストアンサー率14% (1/7)
お疲れ様です。 必要条件が上記だけならば、VBAは必要ないかと思います。 (1)一番左に列を追加 (2)追加した列に１、２、３・・・とオートフィルで行ＮＯを作成 (3)ツールバーの「データ」→「フィルタ」→「オートフィルタ」を押下 (4)オプションで「もぐら」以外にする (5)消したいものを削除 で、(1)～(3)全て可能かと思われます。 これではダメですか？
お礼
なるほど、そのようにもできるのですね。 頭の発想が鈍いなあ・・・・ ありがとうございます!!
関連するQ&A
- 空白行を取得し、その次の行から２行ずつセルを結合するＶＢＡコードについて
例えばＡ列の空白行を取得し、 その次の行から２列ずつ結合し、 次の文字が入力されている手前まで連続でそれを続ける ＶＢＡコードはどのように記述したらよろしいでしょうか？
- ベストアンサー
- オフィス系ソフト
- EXCELで式での空白セルの挿入方法
Ａ列は空白行で、Ｂ列は数値が入っていたり空白だったりする行で構成されています。 またＣ列からＤ列までの全ての行には数値が入っています。 この時Ａ列に条件付き数式を入力して、Ｂ列が空白でなければＢ列に空白セルを挿入して現Ｂ列からＤ列を右にシフトさせたいのですが、数式で可能でしょうか？ 数式で可能ならばＡ列に入力する式を、不可能なら参考のためＶＢＡでの記述をお教え頂けると嬉しいです。（ＶＢＡはあまり理解しておりませんが。） 例 【処理前】 Ａ列 Ｂ列 Ｃ列 Ｄ列 Ｅ列 22 33 44 55 66 77 88 99 100 101 【処理後】 Ａ列 Ｂ列 Ｃ列 Ｄ列 Ｅ列 式 22 33 44 式 55 66 式 77 88 99 式 100 101 ２万行の処理を１回のみしたいです。 宜しくお願いします。
- ベストアンサー
- その他([技術者向] コンピューター)
- 空白行削除
宜しくお願いします。 1枚のファイルシートに14ブロックのデータが貼り付けてあります。各ブロック行の長さは違く、ランダムに貼り付けてあります。例えば、データ 何百行の空白 データ…と繰り返されており、約3万5千行ぐらいあります。 空白行削除で多分半分近くまで上に詰められれば良いのですが、たくさんあるのでマクロで教えていただければと思います。ネットでころがってるデータ試してみたのですが(1部) ENDLESSに実行されて、出来てるのかどうかも確認はとれてません。ちなみに自分のシートに貼ってあるデータはA列からAS列まであり数字、文字混在です。また各ブロックの終わりは集計行となっており、空白セルがまじってます。宜しくお願いします。
- ベストアンサー
- Excel（エクセル）
- VBA 別ファイルの空白行を探す
すみません、よろしくお願いいたします。 ＜前提＞ Aファイル・・貼り付け元（マクロを組み込んでいるのはこちら） xファイル・・貼り付け先（ファイル名が一定ではない・シートは1つでシート名は固定） ＜質問内容＞ Aファイル、ｘファイルともに開き、 AファイルのデータをｘファイルのA:B列（結合している）の空白行へ 貼り付けという作業をしたいと思っています。 ｘファイルの名前がかわってしまうので、 どちらのファイルも開いていて、 この二つのファイル以外は開いていないという前提で、 Windows(2).Activate でxファイルを指定するところまではできたのですが、 （教えてgooで教えていただきました） ｘファイルのA:B列の空白行を探して貼り付けというのを どうVBAで記述したらいいのかわかりません。 すみませんが、わかるかたお願いいたします。
- ベストアンサー
- その他MS Office製品
- ＶＢＡ 行の削除
全くの初心者で、初めて質問させていただきます。 Ａ列には、数字・空白・文字を入力したセルが混在しています。 そのＡ列の数字の内 0 のセルが入力されている行のみを削除するＶＢＡの記述の仕方を教えて下さい。 宜しく御願い致します。
- ベストアンサー
- Windows XP
- エクセルVBAで質問です。
エクセルVBAで質問です。 A列 B列 AAAA 1111 BBBB 2222 CCCC 3333 とあります。 上記を AAAA （空白） （空白） 1111 （空白） BBBB （空白） （空白） 2222 （空白） CCCC （空白） （空白） 3333 （空白） A列にB列を挿入し、2・3・5行目に空白のセルを入れていきたいのです。 9000行ぐらいあります。 他の列に A列、B列のものを取得していく形でも構いません。 とにかく、縦1列に並べたいです。 どなたか、ご教授お願い致します。
- ベストアンサー
- Visual Basic
- VBA:空白の取得はできる？
Excel2003で、従業員データを管理する表を作成してます。 1行づつ従業員人のデータがあります。(従業員名、住所、連絡TEL、取引先、取引先担当者、取引先TEL） A列 従業員名、B列 住所、C列 連絡TEL、D列 取引先、E列 取引先担当者、F列 取引先TEL、です。 例えば、4行目の従業員が辞めた時A列からC列を削除します。 D列以降は取引先なので削除しません。 但し、その従業員が辞めた為、取引先とも取引を止めざるを得ない場合はD列以降も削除するので （例えば）4行目は（A4：F4)は空白になります。 空白の場合、以下（例えば5行目以降）のデータを繰上げたいのですが、その為に空白を取得したいのですが？ （「A4～F4は空白である 」を取得出来ますか？） 一つのセルが空白か否かは取得出来たのですが・・・・ 複数のセルが空白か否か取得出来るんでしょうか？ エクセル関係のサイトは探してみたんですが、わからなくて・・ ご教授願えたら嬉しいです。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロ、集計行の上に空白行挿入
エクセルデータがA、B、C、D、E列1000行まであります。 C列基準でE列を合計するマクロを作成しましたが（集計行はデータの下に挿入）、実行の結果、新たに挿入される集計行の上に空白行を1行挿入していくということを、作成したマクロに付加できるでしょうか？ ご教授頂きたく、お願いします。
- ベストアンサー
- オフィス系ソフト
- 空白行を省いた 表をつくりたい
第１表 A列 B列 1行 CODE 名前 100行 1001 あいうえお 333行 1002 ああいうえ 441行 1003 おあいうえ 512行 1004 えおいうえ 625行 1005 うえおあい 725行 1006 うえああい 第２表 第１表の空白行を省いた表 1行 CODE 名前 2行 1001 あいうえお 3行 1002 ああいうえ 4行 1003 おあいうえ 5行 1004 えおいうえ 6行 1005 うえおあい 7行 1006 うえああい 第１表は空白が多くて 見ずらいので A2 からB725を 検索して 空白行を省いた表を作りたい。
- ベストアンサー
- オフィス系ソフト
- 3相200Vの電力使用量(kWh)を記録できる機器を探しています。
- 目的は契約容量の適正化による基本料金コストダウンです。
- 不要な機器をOFFにすればいくつまで下げられるか検証したいと思っています。
お礼
ご回答ありがとうございました!! 非情に仕事がはかどることになりました。 zap35さんに感謝です!!