[878] 特定の文字が完全一致で含まれる列の削除
ちゅん太郎 [2024/12/17 11:19:01]
初めまして。
例えば、
リンゴ、ミカン、キウイ、メロン、ブドウ
の列名があるとした場合、
ミカン、キウイの列を削除したいです。
ダイアルボックスで指定するのではなく、マクロで「ミカン」「キウイ」が完全一致で含まれる場合に削除したいです。
ただし、
リンゴ、キウイ、メロン、ブドウ
のように「ミカン」が含まれない場合でも「キウイ」が削除できるようにしたいです。
上記可能なマクロをご教示頂けますでしょうか。
Re: [878] 特定の文字が完全一致で含まれる列の削除
あすかぜ [2024/12/17 21:38:15]
次のようなマクロでどうでしょうか。
for (x = Right; x >= 1; x--) {
if ([x,1] == "ミカン" || [x,1] == "キウイ") {
DeleteCol(x);
}
}
1 行目が "ミカン" もしくは "キウイ" の場合にその列を削除します。
試してみてください。
Re: [878] 特定の文字が完全一致で含まれる列の削除
ちゅん太郎 [2024/12/18 12:48:54]
ありがとうございます!!!
頂いたマクロでできました!
Re: [878] 特定の文字が完全一致で含まれる列の削除
ちゅん太郎 [2025/01/16 12:37:54]
続けてのご質問申し訳ありません。
頂いたマクロが終了したあとに、「列削除が完了しました」のメッセージボックスを表示させるにはどのような表記になるでしょうか。
下記試してみましたが上手くいきませんでした。
DeleteCol(x);
}
}
MessageBox("列削除が完了しました");
Re: [878] 特定の文字が完全一致で含まれる列の削除
あすかぜ [2025/01/16 21:26:49]
はい、メッセージボックスを表示させるには MessageBox() の追加であっているはずです。
念のため、ダウンロード可能な形の .cms ファイルを作ってみました。
https://www.asukaze.net/soft/cassava/macro/asukaze/bbs878_20250116.cms
間違ったファイルを編集していないか、確認をお願いします。
また、マクロファイルの置き場は「ユーザーマクロフォルダ」と「アプリケーションマクロフォルダ」の 2 箇所があります。
2 つの場所に同じ名前のマクロがあるとどちらが実行されているのかわからなくなってしまうので、どちらか片方のみを使うのをおすすめします。
Re: [878] 特定の文字が完全一致で含まれる列の削除
ちゅん太郎 [2025/01/21 11:27:22]
ありがとうございます!
自分が何を誤っていたのか、頂いた方法でできました!