選択部分に取り消し線 | |
---|---|
[196121] 選択部分に取り消し線- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ みん -(2024/03/27(11:23)) □U R L/ ボタンにマクロを登録して セル内の任意の文字列を選択し ボタンを押すと取り消し線が引かれるようにしたいです 例えば、セルに「ああああいいいいうううう」とある場合 キーボードで いいいい を選択、ボタンを押すと いいいい に赤の取り消し線 これだとセル対象になってしまいます どのようにすれば良いのでしょうか 教えていただければ幸いです Sub 取り消し赤() With Selection.Characters.Font .Strikethrough = True .Color = -16776961 End With End Sub |
[196122] Re[1]: 選択部分に取り消し線- ■記事引用/メール受信=OFF■ □投稿者/ 匿名 -(2024/03/27(12:01)) □U R L/ キーボードでいいいいを選択とは、 F2を押して矢印キーでカーソルを移動し、Shitt+矢印キーで選択する という事でしょうか |
[196123] Re[2]: 選択部分に取り消し線- ■記事引用/メール受信=OFF■ □投稿者/ hatena -(2024/03/28(12:08)) □U R L/ ボタンをクリックした時点でセル内の文字列の選択状態は解除されるので、その方法では無理です。別案を考えることになります。 例えば、下記のような方法ではどうでしょう。 セルをダブルクリックしたときに、ユーザーフォームを表示させて、ユーザーフォーム上のテキストボックスにセルのテキストを代入する。 そこで、ユーザーは対象の文字列を選択して、コマンドボタンをクリックするとセルの対象文字列に取り消し線が引かれる。 テキストボックスなら、SelStart、SelLengthプロパティで選択範囲を取得できますので、それをもとにセルの対象文字列に取り消し線を設定することは可能です。 |
[196124] Re[2]: 選択部分に取り消し線- ■記事引用/メール受信=OFF■ □投稿者/ みん -(2024/03/28(13:45)) □U R L/ > キーボードでいいいいを選択とは、 > F2を押して矢印キーでカーソルを移動し、Shitt+矢印キーで選択する > という事でしょうか 返信ありがとうございます はい、その通りです(もしくはマウスで選択) |
[196125] Re[3]: 選択部分に取り消し線- ■ / 記事引用/メール受信=OFF■ □投稿者/ みん -(2024/03/28(13:53)) □U R L/ hatenaさま 無理なのですね。。。 テキストボックスのご提案ありがとうございます ボタン1クリックで赤の取り消し線を付加したいと考えておりました 代入の手間を考えるとマクロは使わずに ・Excelのリボンに取り消し線を追加 ・フォントの色赤クリック の2回クリックになりますが、こちらで対応しようと思います |
このトピックに書きこむ |
---|