IDでもっと便利に新規取得

Yahoo!知恵袋

JavaScriptが無効です。ブラウザの設定でJavaScriptを有効にしてください。
JavaScriptを有効にするには

亜紀さん

2022/1/27 16:00

11回答

VBAで１列目の番号をKEYに１列目２列目をソートしたいのですが、赤のセルは、かならずあける。そういうソートプログラムを書きたいのですが、どうすればよろしいでしょうか？

VBAで１列目の番号をKEYに１列目２列目をソートしたいのですが、赤のセルは、かならずあける。そういうソートプログラムを書きたいのですが、どうすればよろしいでしょうか？よろしくおねがいします。

Visual Basic・34閲覧・500

ベストアンサー

関数は苦手

関数は苦手さん

カテゴリマスター

2022/1/27 16:13

行削除→並び替え→行挿入では不都合でしょうか？赤いセルが空白ならば、A14:B15をA11にコピーして並び替え後、A11:B13に空白セルを挿入という方法もありますね。

亜紀さん

質問者2022/1/27 16:57

ご回答ありがとうございます。赤いセルは、空白ではありません。でも、いいヒントになったかなぁ？

質問者からのお礼コメント

うわぁーすごいすごい、ちゃんとできてる。ご回答、ご丁寧にありがとうございました。

お礼日時：1/27 18:08

カテゴリQ&Aランキング

Visual Basic

34.5年余り、ソフトウェア開発を行ってきましたが、わけあって転職しました。転職先で今までに比べると極めて小規模なソフトウェアを作成していますが、評判が良かったらしくVB.netで作成したソフトウェアをAccessのフォームからも呼び出したいとの依頼を受けました。VBでは他のプロジェクトからも使える様にクラスライブラリとして作成しました。今までVBAから呼び出したことがないので良く解らない部分があり、質問させて頂きました。プロジェクトのプロパティでCOMとして使えるように設定してビルドを行いました。DLLとTLBファイルは作成されました。他のPCで使うにはregasmを実行しないと使えな...

VBAって難しいですか？

VBAコードなのですが、依頼で作ってもらったものですが、マクロコードでActiveCell.FormulaR1C1=_"=IF(R8C="""","""",IF(OFFSET(集計!R[-9]C2,0,3)=R8C,OFFSET(集計!R[-9]C2,0,6),""""))"となってます。エクセルバーではこの表示になってます。=IF(C$8="","",IF(OFFSET(集計!$B2,0,3)=C$8,OFFSET(集計!$B2,0,6),""))これを下記のように表示させるには、どのようにコードを修正すればよいですか？また不可能の場合マクロコードを書き直せばよいでしょうか？=IF(B...

VBAについて先輩からVBAを現在進行形で教わっているのですが、その先輩がやった莫大な数あるコードから検索機能？を使った小技を見逃してしまいました。これはここのコードを参考にして～みたいな感じでショートカットキーを使いその検索機能を表示し、そこに単語を打ち込んだらその単語が黄色く表示されるという技です。どなたかやり方がわかる方、ご教授ください。

VBAでIfの使い方について質問です。Sub知恵袋()IfRange("A1")=""ThenRange("A1")="yahoo"Range("B1")="知恵袋"EndIfEndSub調べものをしている時に上記のコードを見かけました。私はIfを使う時は必ず"Else"を使わないといけないと思っていたのですが、別に"Else"は必要ないのでしょうか？

vba初心者です。過去のQ&Aを拝見し近いものはあったのですが、無知な自分にどうかご教授下さい。＜内容＞ﾌｫﾙﾀﾞを指定。複数Excelﾌｧｲﾙが存在しますが、このexcel内のｼｰﾄ名を検索してhitすればﾌｧｲﾙを一つ下の階層ﾌｫﾙﾀﾞに移動させたいのです。（例）重複してしまいますが・・・。ﾌｫﾙﾀﾞを指定して、このﾌｫﾙﾀﾞ内にある複数のexcel（最大1500ﾌｧｲﾙ）の中から、ｼｰﾄ名に「赤」が付いたexcelﾌｧｲﾙを抽出し（excelﾌｧｲﾙには「赤」が付いていないﾌｧｲﾙも存在します）、このﾌｫﾙﾀﾞの一つ下のﾌｫﾙﾀﾞに移動させたいのです。・できればﾌｫﾙﾀﾞの指定に（...

VBAで、他のエクセルファイルを開いて、VBAを記述して保存したいのですが、可能でしょうか？どのように書けば良いのかご教示頂けないでしょうか？

VBA初心者です。やりたい事が上手く出来ないので質問させて下さい。A列には、乱数を割り振る関数が入っています。最終的に、C5~C8セルに、2,9,3,8とか、9,22,0,4みたいに数字が割り振られるようにしたいです。可能ならばループしている最中はドラムロールのように数字が徐々に増えていく様が表現出来たら助かります。エラーで弾かれてしまいますが、コードも載せておきます。詳しくは画像を参照お願いします。------------------------------------------------submacro()j=0k=0l=0m=0DoIfRange("c9")=""AndRang...

マクロ初心者です。どこがまちがっているのかわかりません【指示したい内容】「売上」ワークシートをシート内の一番右端にコピーするコードを次の条件で記述する。【作成条件】・シートのコピーには「Copy」メソッドを使用し、引数は参照シート（一番右端のシート）の後ろ（After）を指定する・一番右端のシート位置は「Worksheets」プロパティのコレクション番号を「Count」プロパティで参照する・シートの名前はセル「H1」の値と文字列"月売上"を連結演算子「&」でつなげたものを設定する※「&」演算子：P.88参照（「&」の前後には必ずスペースを入力）例）セル「H1」が数値の「2」でマクロを実行...

VBAでどのようにプログラムを書くか分かりません。やりたい内容は以下の様になります。【状況】A列には値をが入っている。B列、C列にはところどころ値が入っている。A列、B列、C列全て入っている行についてはコピーして、A列の初めの空白行から貼り付ける。貼り付けた行についてはC列の値をB列の値にする。A列、B列、C列が全て入っている行は複数行ある。このような場合はどのようにしたらよろしいのでしょうか？すみませんが、よろしくお願い致します。

【新機能】アンケート投票のテストを実施中

アンケート投票

最近の外出頻度は、コロナ禍以前と比べてどうですか？

アンケート中

1769人投票中

リモートワークで、どこでも自由に住めるとしたらどこに住みたい？

アンケート中

1937人投票中

初めてキャンプをするとして、最初に検討するべきものはどれ？

アンケート中

1397人投票中

ペットと一緒に暮らしてる？

アンケート中

2051人投票中

ゴールデンウィーク、どう過ごした？

アンケート中

1941人投票中

もっと見る

カテゴリ一覧

コンピュータテクノロジー

プログラミング

C言語関連

Java

PHP

Ruby

JavaScript

HTML、CSS

Visual Basic

カテゴリ一覧を見る

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。