- ベストアンサー
Excel 2000 のマクロで漢字の含まれているセルを検索する方法
Excel 2000 のマクロを使用して、漢字の含まれているセルを検索 したいのですが、方法がよくわかりません。どうすればよいのでしょうか?
- jfaoifjoajfja
- お礼率56% (39/69)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
こんにちは。maruru01です。 漢字かどうかの判断は文字コードでします。 その場合、文字コードの何番から何番までが漢字かを自分で指定しないといけません。 漢字に限らず、ひらがなでもカタカナでも記号でも、該当する文字コード範囲を自分で指定しないといけません。 漢字コードについての参考URLを紹介しておきます。 http://hp.vector.co.jp/authors/VA017832/hide_chimarl/chimarl09_03.html 実際のコードはこんな感じになります。 (とりあえず、1つのセルの文字について調べます。引数にセルの文字を入れて下さい。) Private Function CheckKanji(Str As String) As Boolean Dim tempChr As String '調べる文字 Dim tempCode As Integer '調べる文字のコード Dim i As Long 'ループカウンタ Dim StartCode As Integer '最初の漢字のコード Dim EndCode As Integer '最後の漢字のコード Const StartChr As String = "亜" '最初の漢字 Const EndChr As String = "黑" '最後の漢字 CheckKanji = False '漢字をコードに変換 StartCode = Asc(StartChr) EndCode = Asc(EndChr) For i = 1 To Len(Str) tempStr = Mid(Str, i, 1) tempCode = Asc(tempStr) '判定 Select Case tempCode Case StartCode To EndCode '漢字 CheckKanji = True Exit Function Case Else '漢字ではない '何もしない End Select Next i End Function あとは、検索対象のセルをループで回して下さい。
関連するQ&A
- Excelで、マクロが含まれているセルを見つける方法
EXCELファイルを開くとき、マクロが含まれてるというメッセージが でますが、どのセル(あるいは、どのシート)にマクロが含まれているのか 調べる方法があれば教えてください。 また、含まれている場合、それら全てを削除する方法はありますか?
- ベストアンサー
- オフィス系ソフト
- 検索の方法(エクセル マクロ)
マクロは記録マクロしかできない超初心者です。 エクセルのsheet1のA1のセルに入っている内容(都度変更)と同一のセルをsheet2で検索し、カーソルをそこに移動させるマクロ記述をしたいのですが、どうなりますか。 記録マクロで、sheet1のA1をコピーし、sheet2に移動して検索窓で貼り付けて「次を検索」とやったのですが、記述をみるとA1の内容がそのまま記述されていて汎用性が無いようです。 よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- エクセルマクロで検索
エクセル初心者です。 エクセルで表を作ったのですがその中の計算式で月が変わるたびに参照するワークシートが変わるのでマクロの検索をつかいたいと考えています。 表の横に検索するワークシート名と置き換えするワークシート名をいれるセルをつくりマクロを組んで実行すると置き換えが完了するというようなマクロはできませんか?セル自体を検索置き換えはできるのですがセルの中の文字を指定の仕方がわかりません。 説明がヘタなのでわかりにくいかと思いますがよろしくおねがいします。
- ベストアンサー
- オフィス系ソフト
- 検索結果をセルに表示させるマクロ
こんにちは。 エクセルのマクロ初心者です。 シート1に作ったあるリストから、シート2のあるセルにキーワードを入力すると、隣のセルに検索結果を表示させるマクロと作りたいのですが…。 エクセルの検索機能を使って、キーワードを入力し、次を検索をクリックすると、シート1のリストの中の部分的に合致するセルをカーソルは選択しますよね? その選択したセル内容をシート2のセルに表示させる方法がわかりません…。 アドバイスいただけないでしょうか。
- 締切済み
- オフィス系ソフト
- エクセルで別のセルにあるふりがなを,漢字の上に表示させる方法はあります
エクセルで別のセルにあるふりがなを,漢字の上に表示させる方法はありますか? たとえばA2に漢字表示,B2にそのふりがなが表示されています。このふりがなをA2の漢字の上に表示したい(同じセルの中に)のですが関数でできますか? マクロはほとんど分からないので,できれば関数か他の方法がいいのですが…。
- ベストアンサー
- その他MS Office製品
- カタカナで検索したのに漢字が候補になる
Excelの2010を使用しています。 カタカナの文字列を検索する時に、何故か漢字が検索されてしまう事があります。 例) 『クロ』で検索したら『袋』が含まれるセルが。 『エビス』で検索したら『夷』が含まれるセルが。 ものすごく困っている訳ではないのですが、ちょっと気になります。 何でわざわざ漢字を仮名にして検索なんて、面倒くさい事をしているんでしょう? また、漢字が検索されない様にする設定方法はありますか?
- 締切済み
- Excel(エクセル)
- EXCELのマクロでテキストを読み込む方法
EXCELのマクロを使って、テキストファイルから、ある文字列を検索し、コピーしEXCELのシートのセルにペーストするマクロの書き方をご存知の方は、ご教示願います。 例えば、テキストファイル中の「dog」という文字列を検索して、EXCELの決まったセル(A、1)にコピペするというマクロです。 よろしくお願い申し上げます。
- ベストアンサー
- Visual Basic
- Excel97 マクロで検索
Excel97を使っています。 「マクロの記録」でセルの値を検索して記録し、そのまま「マクロの実行」で実行するとうまくいくのに、コマンドボタンから呼び出すと、「実行時エラー1004:RangeクラスのFindプロパティを取得できません」と出ます。ヘルプにもないようで困っています。 どのようにしたらよいのでしょうか? 教えてください
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロでセル内改行を設定する方法
XP・Excel2003使用のマクロ素人です。 エクセルのマクロを使って、ある特定の文字の手前でセル内改行する方法を教えてください。 例えば「■」の手前で改行したいのですが・・・ ■今日は■あたたかい■日でした ↓ ■今日は ■あたたかい ■日でした 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- VBAマクロ・・同一セルの検索と検索したセルの操作
VBAマクロ・・同一セルの検索と検索したセルの操作 VBAのほぼ初心者です。 決められたセル(たとえばE100)に入力された文字列と同一の文字列を その列内の上(E1~E99)で検索する。 そして、検索できれば(たとえばE30)そのセルがある行(行30)を削除する。 なお、複数検索されれば、検索されたすべてのセルに対応する行を削除する。 というようなことをVBAのマクロで作成したいです。 FindメソッドとDo..Loop Whileを使って試行錯誤してみたのですが、うまくいきません。。 いい方法があれば、是非教えていただきたいです。 どうぞよろしくお願いいたします。
- ベストアンサー
- Visual Basic
お礼
ありがとうございました。