No.2
- 回答日時:
Sub test2()
Dim TempObject As MSForms.DataObject
Set TempObject = New MSForms.DataObject
With TempObject
.GetFromClipboard
ActiveCell.Find What:=.GetText, LookIn:=xlValues, _
MatchCase:=False, LookAt:=xlPart, MatchByte:=False
End With
Excel.Application.CommandBars.FindControl _
(msoControlButton, 1849).accDoDefaultAction
Set TempObject = Nothing
End Sub
この回答への補足
有難うございます。とても早く回答して下さったのに、お礼が遅くなって申し訳ありません。
会社であまり時間が取れないため、帰宅してから検証させて頂いたのですが、『コンパイルエラー:ユーザ定義型は設定されていません』と出てしまいます。会社のPCはEXCEL2003ですが、自宅のPCは2002なので、そのせいでしょうか?明日、会社でもう一度やってみます。
エクセルの検索は頻繁に行わなければならない仕事なので、もし検索文字列をコピー後、ショートカットキーを押しただけで検索対象に行きつけたとしたら、ものすごい感動です(笑)
No.1
- 回答日時:
>デフォルトでオフの設定にする方法がありましたら教えて下さい。
無いと思います。
VBAで、「検索」ダイアログを起動すればどうでしょうか。
Findメソッドのパラメータで、LookAt:=xlPart が
『セル内容が完全に同一であるものを検索する』がオフの設定です。
Sub test1()
ActiveCell.Find What:="検索", LookIn:=xlValues, _
MatchCase:=False, LookAt:=xlPart, MatchByte:=False
Excel.Application.CommandBars.FindControl _
(msoControlButton, 1849).accDoDefaultAction
End Sub
上記に、ショートカットキーを割り当てればよいと思います。
有難うございます。とても助かりますv
追加質問で申し訳ないのですが、
"検索"のところに『クリップボードの内容』を入れる事が出来ないでしょうか?
また、置換の時はどの辺を変えればよいでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- iOS iPhone重いです軽くする方法あますか? iPhone8 64gb残り6gb いおs16 最新バー 4 2023/04/06 07:12
- その他(ブラウザ) Android Google でなく Bing検索すれば 何検索したかわからずデータ収集されない? 2 2023/03/10 05:25
- Windows 10 Googleサイトのサイト内検索(虫眼鏡アイコン、検索ボックス)について 1 2022/04/08 12:16
- Excel(エクセル) Excel 参照元の値を参照したい 1 2022/08/20 18:58
- iPhone(アイフォーン) iPhone WiFi をオフにしていても自動的にオンになっています 設定で永久にオフにできる? 6 2023/03/10 21:14
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Excel(エクセル) ExcelのFIND関数について 4 2023/06/06 18:10
- Windows 10 DELLのスクショのやり方 2 2022/11/02 14:40
- その他(Microsoft Office) WordやExcelで英数字のみ半角または全角にしたい 6 2022/08/03 08:18
- Excel(エクセル) VLOOKUP が機能しない、その原因は何 ? 8 2022/10/19 12:06
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ファイルのアクセス回数について
-
エクセルのプロパティーでセキ...
-
ExcelブックをGoogleスプレッド...
-
Wordで差込印刷した後に別々の...
-
Excel csv保存 列数が異なる場...
-
PowerPoint 2002でファイル名を...
-
サブフォルダから部分一致のエ...
-
マクロ実行後、表示がおかしくなる
-
エクセルでcsvファイルを開いて...
-
複数のexcelのファイルを一括で...
-
エクセルファイル名に更新日時...
-
エクセル UserForm 呼び出しで...
-
実行時エラー52
-
エクセルのマクロで行と列の削...
-
Excel VBA シート挿入 passw...
-
Xlms とはなんでしょうか?
-
エクセルvbaでdocuworksprinter...
-
エクセルで複数のコメントのサ...
-
バッチファイル 二つ上のディ...
-
ファイルサーバ上のファイルが...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイルのアクセス回数について
-
エクセルのプロパティーでセキ...
-
ExcelブックをGoogleスプレッド...
-
Wordで差込印刷した後に別々の...
-
Excel csv保存 列数が異なる場...
-
エクセルファイル名に更新日時...
-
エクセル UserForm 呼び出しで...
-
サブフォルダから部分一致のエ...
-
実行時エラー52
-
エクセルでcsvファイルを開いて...
-
マクロ実行後、表示がおかしくなる
-
VBAでマクロを使って、マクロ無...
-
複数のexcelのファイルを一括で...
-
PowerPoint 2002でファイル名を...
-
エクセルのマクロで行と列の削...
-
大量のCSVファイルをExcel形式...
-
EXCEL 検索時の設定
-
For~Nextルーチンで最初の1回...
-
処理速度にムラがあり過ぎる
-
エクセルで、フィルタかけたま...
おすすめ情報