人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

WinXP/Excel2003を使っています.
システムに入っているフォント全てで「ABC0123」という文字を見てみたいのですが,いちいちリストからフォントを選択するのが面倒です.
マクロか何かで一括で書体確認をやりたいのですが,どうすればよいのかわかりません.
ご教授お願いします.

●質問者: Ficus_palmeri
●カテゴリ:コンピュータ
✍キーワード:WinXP システム フォント マクロ リスト
○ 状態 :終了
└ 回答数 : 4/4件

▽最新の回答へ

1 ● xiaoyin
●15ポイント

excelではないですが、フリーソフトでは書体の一覧表示ができます。

フォントインストーラーSAKURAはフォントのインストール、アンインストール、一時インストール、レジストリの操作、シンボルフォント、ユニコードの閲覧を行う総合フォント管理ツールです。

・インストール済みのフォントの情報確認、書体の一覧表示、アンインストール

http://tam.vni.jp/soft/sakura/sakurasample.html

◎質問者からの返答

ありがとうございました.

使ってみましたが,やはり見比べができる方法を待ってみます.


2 ● 天狼
●10ポイント

http://download.seesaa.jp/contents/win/system/font/

ここで探されては?

◎質問者からの返答

どれが良いですか?

現在,FontオブジェクトのNameプロパティに直接ファイル名を指定することで書体変更ができるので,ファイル名リストを作ってマクロで読み込んで指定するという方法をとっています.

あまりスマートじゃないですが...


3 ● tawazou
●60ポイント ベストアンサー

以下のマクロで実現できます。

Sub Macro1()

Set FontList = Application.CommandBars("Formatting").FindControl(ID:=1728)

For i = 0 To FontList.ListCount - 1

Cells(i + 1, 1).Value = FontList.List(i + 1)

Cells(i + 1, 1).Font.Name = FontList.List(i + 1)

Next i

End Sub

◎質問者からの返答

2006-07-24 00:09:29

503行目まで来ると「FontクラスのNameプロパティをせっていできません」というエラーが出てしまいます.

2006-07-24 01:00

挙動からわかったことですが,どうやらExcelではひとつのBookでフォント設定できる箇所が500程度であるようです.

512からは遠いし,なんとも腑に落ちませんが...


4 ● kurukuru-neko
●5ポイント

コントロールパネル→フォントで

Windowsにインストールさているフォントを表示

表示したいものを選択して開くで見れます。

◎質問者からの返答

任意の文字列を任意の大きさで,しかも他と比較しながら見たいので...

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ