![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.2ベストアンサー
- 回答日時:
エクセルの置換機能で置換した文字列があるセルのフォントを変更することは可能ですが、セル全体にそのフォントが適用されます。
「Wingdings」の中にある「◆」は文字コードが「117」でMS Pゴシックにすると「u」と同じ文字コードになります。ですから手作業で行うなら「◆」を「u」に置換して、その文字だけフォントを「Wingdings」に変更するしかありません。
もしこの操作を自動的に行うならマクロが必要です。マクロは最後に掲載しますが、この要望は意味があることですか? マクロで置き換えたとしてもワークシート画面では希望通りに見えても、プリンタによっては印刷すると「u」で印刷されますよ。
MSゴシックの「◆」とWingdingsの「u(◆)」を見比べましたが、それほど違うとは思えませんでした。あまり意味があるとは思えませんが…
どうしてもと言われるなら以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。シート画面に戻り、マクロの実行はALT+F8でマクロ一覧を開き、マクロ名を選択して「実行」ボタンです。
Sub Macro1()
Dim r As Range
Dim ptr As Integer
For Each r In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, 3)
With r
ptr = InStr(r.Value, "◆")
Do While ptr > 0
If .Characters(Start:=ptr, Length:=1).Font.Name = "MS ゴシック" Then
.Characters(Start:=ptr, Length:=1).Text = "u"
.Characters(Start:=ptr, Length:=1).Font.Name = "Wingdings"
End If
ptr = InStr(r.Value, "◆")
Loop
End With
Next r
End Sub
No.3
- 回答日時:
こんばんは。
ExcelのVersion にもよりますが、
Excel 2003 なら、
すでに、MSゴシックの(◆)が入っているはすでずから、
編集-置換-
検索値 ◆
置換値 u (書式-フォント-Wingdings)
に換えればよいのではありませんか?
それが出来ないパーションでしたら、ひとつずつ、コピーで貼り付けていくか、u に変えてから、書式をコピーしていくことになるでしょうね。#2さんのマクロという手もあるけれども……。
No.1
- 回答日時:
質問は何を言っているか判っていないかも知れない。
あるフォントで文字・記号に見えているものも、根底に文字コード(体系)があります。
外国のものは別として、ほとんどの文字で、ほとんどのフォントで、は
(A)見た目は違うものの、同じ文字記号に割り当てていると思う(異字体程度はある)。
(B)違う文字や記号に割り当てて、違う風に見えているフォントは少ないと思います。
(B)はフォントによっては、現実に無いとはいえないでしょうが。
ーー
その際、そもそも置換というのは
(A)文字コード(x)-->文字コード(y)
を行うもので、
(B)文字コード+フォント種類ーー>文字コード+フォント種類
という機能を持ったソフトや機能はほとんど無いと思う。
あるフォントで◆=文字コード(X)--->別のフォントで◆の文字コード(y)の対応がわかるなら、その置換を考えることになる。
その際Xの◆は良いとして、置換後の指定yはあるフォントの中での
どういう文字・記号になるかを指定することになる。もし文字として存在しないとなると、置換後の指定に困る。置換後を文字コードで指定させてくれるソフトがあればよいが、通常はその機能は無いと思うが・
ーー
結論は、エクセルやワードでは難しいのでは。特にエクセルはそういうことを力点を置くソフトではない。何でもエクセル族の発想。
ーー
以上言っていることが、ピントはずれであれば無視してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Word(ワード) ワードで,特定の文字だけ,字体を一括変換する方法は? 1 2023/04/26 10:11
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
- Word(ワード) ワードフォント 一括置換の方法 4 2022/12/31 00:27
- フリーソフト フォルダ、ファイル名の一括変換について 3 2023/03/16 09:23
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
- Excel(エクセル) Excel 365 フリーズ 頻発 エクセルのセルの中に日本語の文章を全角半角和文英文数字を混ぜて入 3 2022/12/12 15:09
- その他(IT・Webサービス) 少し複雑なテキスト置換がしたいです。 2 2022/10/13 14:42
- その他(メールソフト・メールサービス) メールソフトを教えてください 1 2023/03/28 23:32
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- その他(Microsoft Office) Microsoft IME 一発で変換できない言葉がある 3 2022/07/19 19:29
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Word2000で括弧の中の文字だけ...
-
Wordでカッコで括った文字を一...
-
Wordの脚注を,1)・・2)・・3)...
-
ワードで半角英数の文字だけ選...
-
MSワード、エクセルの文章にマ...
-
Excelからワード文書の文字置換...
-
Word相互参照の文字を一括で変...
-
ワードで特定の文字列だけを太...
-
EXCELで日本語の記号を特殊文字...
-
ワードの表の中の値の表示形式...
-
word ある文字色の部分のみ別の...
-
Wordで【相互参照】で挿入した...
-
ワードで太字になっているとこ...
-
word である文字をすべてイタリ...
-
wordの置換の技について教えて...
-
Wordの置換でフォントが変わらない
-
wordで書いた日本語の文章をで...
-
ワードでローマ字数字を入力す...
-
パワーポイント 文字の太さを...
-
Wordの入力中と確定後の文字の...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでシートにある赤文字...
-
Wordの脚注を,1)・・2)・・3)...
-
excelマクロ ボタンを押して文...
-
Word文書、取り消し線部分の一...
-
ワードで赤字のみを削除する方法
-
「WORD」での作業 日本語・英...
-
Wordでカッコで括った文字を一...
-
word である文字をすべてイタリ...
-
Wordデータから,特定の単語を...
-
箇条書きのアタマに一括で「・...
-
ワードで半角英数の文字だけ選...
-
wordで特定の色だけ印刷しない方法
-
word 2003で、赤い文字(あるい...
-
Excelの表中,数字の「1」をす...
-
ワードの表の中の値の表示形式...
-
英数字のフォント「Century」に...
-
エクセルで、コンマをピリオド...
-
Word2000で括弧の中の文字だけ...
-
ワードで太字になっているとこ...
-
ワードで特定の文字列だけを太...
おすすめ情報