
Excel2000を使っています。
ある表を作成中、フォントを青文字と赤文字でリストを作っていました。
が、複数人数で作業をしていた為、フォントの「青文字」が「青」と「薄い青」で作成されてしまいました。
ところどころに「赤」のフォントもあります。
同じセル内での文字色は1色です。
リストの量が多いため、ひとつひとつセルをクリックして「薄い青」を「青」にしていくのが難儀です・・・
「薄い青」を「青」にどうにか簡単に変更できないものでしょうか?
と、この説明で伝わるでしょうか・・・。
知恵を貸して頂けたら、と思います。よろしくお願いします。
No.2ベストアンサー
- 回答日時:
>同じセル内での文字色は1色です。
ならまだ簡単です。以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。マクロの実行はALT+F8でマクロ一覧を開き、マクロ名を選択して「実行」ボタンです。
Sub Macro2()
Dim r As Range
For Each r In Cells.SpecialCells(xlCellTypeConstants, 3)
If r.Font.ColorIndex = 41 Then
r.Font.ColorIndex = 5
End If
Next r
End Sub
No.4
- 回答日時:
探していただきありがとうございます。
どうやらこのURLの内容もエクセル2000では出来ないようです。
今後の参考にしたいと思います。
No.3
- 回答日時:
Excel2000では未確認ですが、2002では「置換」でできました。
以下お試し下さい。
[編集]→[置換]
[検索する文字列] の [書式(M)] をクリック
[フォント]タブをクリック
[色] で 「薄い青」 を選ぶ
同様に
[置換後の文字列] で 「青」 を選ぶ
文字列は両方空欄 で [すべて置換(A)]をクリック。
>[編集]→[置換]
>[検索する文字列] の [書式(M)] をクリック
ここまでは出来るのですが、「フォント」タブが出てきません・・・
2000ではここまでなのかもしれないですね。
でもこの方法なら私が自力でも出来そうです!
2002を使用する際には活用できそうです。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで文字の入力がセルの...
-
多数の計算セルに一括で同一の...
-
Excelのアポストロフィーの削除
-
Excelの空文字セルの削除方法を...
-
エクセル カッコ()がマイナ...
-
Excelで、半角スペースをTABに...
-
【エクセル】ピボットテーブル...
-
エクセルで「4」「9」抜けの...
-
小数点を消す方法
-
Excel2010 データの並び替え
-
エクセル:別シートのセル参照...
-
Excelからテキストへのコ...
-
Excel折線グラフ作成でマイナス...
-
メモ帳の数字を任意の数字を足...
-
エクセルでスペースの記号を表...
-
excelで可視セルのみ置換
-
置換機能を使わずに先頭に「'」...
-
エクセルで計算式の中のセル表...
-
エクセルで連続データから、数...
-
Office2021のエクセルで米国株...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで文字の入力がセルの...
-
多数の計算セルに一括で同一の...
-
Excelで、半角スペースをTABに...
-
Excelからテキストへのコ...
-
excelで可視セルのみ置換
-
Excelの空文字セルの削除方法を...
-
Excelのシートにある1行...
-
エクセルで「4」「9」抜けの...
-
一括でダブルクリックした状態...
-
【エクセル】ピボットテーブル...
-
置換機能を使わずに先頭に「'」...
-
Excelの入力済みセルに一括で、...
-
小数点を消す方法
-
エクセルでセル内の一部を一括...
-
Excelのアポストロフィーの削除
-
エクセルのセルの中の,よりも前...
-
エクセルでセル内の一部分だけ...
-
企業名簿で(株)や(有)を無視し...
-
Excelで特定の文字の前だけに空...
-
別シートのリストから置換する方法
おすすめ情報