Word2007 バックスラッシュをマクロで表示

解決済

質問者：soar-in
質問日時：2011/07/01 01:26
回答数：1件

XPsp3 で Word2007 Pro を使用しています。

バックスラッシュ(アスキーコード&h5C)を
"\"に変えずに、バックスラッシュのまま、
表示させる処理について教えてください。

人がオペレーションするには
Wordのオプション中の
「バックスラッシュを円記号に変換する」
をアンチェックにすればＯＫですが、

これをマクロから設定する方法、
あるいはここがCheckedでも
ASCII &h5CをASCII &h5Cのフォントのままに表示させる方法は
あるでしょうか？

よろしくお願いします。

（マクロ記録とOptions Objectメンバのブラウズ
　はしてみましたがわかりませんでした）

通報する

この質問への回答は締め切られました。

質問の本文を隠す

このQ&Aに関連する最新のQ&A

「マクロワード」に関するQ&A：エクセルのVBAで、ひとつのセル内にある文章に特定のキーワードが含まれているかを返すマクロを作ったの

さらに表示

「ワード記号」に関するQ&A： Office ワードの段落記号消したい。

「バックスラッシュ」に関するQ&A：エクセルでマクロを作成してますが、バックスラッシュが入力出来ません。設定方法等教えて頂けないでしょ

「フォント意味」に関するQ&A：フォントの左に出るTとかOは何を意味するものですか

「アスキー変換」に関するQ&A：コンソールプログラムで10進のアスキーコードから文字列に変換

「記号変換」に関するQ&A： ①～⑳は記号で変換できますが、それ以降（２１～）はどうすればよいのでしょうか？

「記号フォント」に関するQ&A：「■」と「●」などの記号とフォントの選択について

「英語フォント」に関するQ&A：英語フォントで中点の書き方

回答 (1件)

ベストアンサー優先
最新から表示
回答順に表示

No.1ベストアンサー

回答者： enunokokoro
回答日時：2011/07/01 12:18

Word2002でマクロ記録を取ってみました。

Sub Macro1()
'
'半角￥記号を半角バックスラッシュに変換する（しない）
'
ActiveDocument.Compatibility(wdLeaveBackslashAlone) = False '( or True )

End Sub

http://msdn.microsoft.com/ja-jp/library/microsof …(office.11).aspx

上記で半角バックスラッシュを表記させることができるかも
しれませんが、フォント名によっては半角の文字表記が違い
日本語用フォントが含まれないフォントを指定してあれば、
半角の￥記号になることはありませんが、日本語用フォント
を英語用フォントでも指定してあると、意味がありません。
日本語用フォントのほとんどが半角￥記号がわりあてられて
いますので。

ちなみに、この質問にある半角￥記号がバックスラッシュで
表記されている閲覧者がいるかもしれません。
ブラウザ上で指定しているフォントによって表記が違うので。
私の環境では半角￥記号になっていますね。

- 0
- 件

通報する

この回答へのお礼

できました！
Compatibility で設定できたんですね。
すばやいレス、助かりました。
ありがとうございました。

通報する

お礼日時：2011/07/02 00:21

このQ&Aに関連する人気のQ&A

「記号変換」に関するQ&A： EXCELでチェックマーク（レ点）を入力するには

さらに表示

「バックスラッシュ」に関するQ&A：逆向き/（スラッシュ）の入力方法

「記号フォント」に関するQ&A：エクセルで「印」のしるしを書く方法

「ワード記号」に関するQ&A：ワードで発音記号を表すにはどうやるのですか？

「英語フォント」に関するQ&A：英字キーボードで、記号の一覧をだすには？

「アスキー変換」に関するQ&A：アスキー、バイナリーの違い、注意点（FFFTP）

「フォント意味」に関するQ&A：エクセル：セルのバックの色だけをコピペしたい

「マクロワード」に関するQ&A：エクセルからワードに書き出すマクロを教えてください。

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

専門家回答数ランキング

専門家

※過去一週間分の回答数ランキングです。

質問する（無料）

他の専門家の回答をチェック

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルでマクロを作成してますが、バックスラッシュが入力出来ません。設定方法等教えて頂けないでしょ

エクセルでマクロを作成してますが、バックスラッシュが入力出来ません。
設定方法等教えて頂けないでしょうか。

よろしくお願いします。

Aベストアンサー

下記URLのページをご覧ください。
次のように説明されています。

「005C」というコードを欧文フォント（英数字用フォント）では半角の「＼」という形で表示させていますが、和文フォント（日本語用フォント）では半角の「￥」という形で表示させることにしてしまったので、和文フォントを使うかぎり、半角のバックスラッシュを入力できないのです。

従って、現状の日本語用フォントを英数字用フォントに変更すれば、バックラッシュが表示されると思います。

「バックスラッシュを入力したい」
http://www.relief.jp/itnote/archives/001280.php

他の回答も見る

Qバックスラッシュを入力する方法について

ネットで調べるといくつか出てくるのですが、私の環境では入力できません。Windows7 64bit IME2010
google検索欄と、ExcelでArielをフォント選択した時は入力できますが、Wordやテキストエディタでは入力できません。コピペしても\に替わってしまいます。「ファイル名を指定して実行」で入力したいのですが、できずにとても困っています。解決方法をご存知の方いらしゃいましたら何卒よろしくお願いします。

Aベストアンサー

バックスラッシュと「\」は同じものです。
表示する時に、システム/アプリによってどちらかを表示しているだけです。
例えば、今入力している画面では円マークキーを押しても画面上ではバックスラッシュが表示されます。
英語入力モードで円マークキーと「ろ」のキー（バックスラッシュ）を押してみてください。同じ文字が入力てきるはずです。

他の回答も見る

QEXCELファイルのカレントフォルダを取得するには？

EXCELファイルのカレントフォルダを取得するには？

C:\経理\予算.xls

D:\2005年度\予算.xls

EXCEL97ファイルがあります。

VBAで
　　カレントフォルダ名
(C:\経理\,D:\2005年度\)
を取得する事は可能でしょうか？

CURDIRでは上手い方法が見つかりませんでした。

Aベストアンサー

こんばんは。
Excel97 でも、同じですね。以下で試してみてください。

Sub test()
'このブックのパス
a = ThisWorkbook.Path
'アクティブブックのパス
b = ActiveWorkbook.Path
'Excelで設定されたデフォルトパス
c = Application.DefaultFilePath
'カレントディレクトリ
d = CurDir
MsgBox "このブックのパス　　　: " & a & Chr(13) & _
　　 "アクティブブックのパス: " & b & Chr(13) & _
　　 "デフォルトパス　　　　: " & c & Chr(13) & _
　　 "カレントディレクトリ　: " & d & Chr(13)
End Sub

他の回答も見る

Q別のシートから値を取得するとき

Worksheets("シート名").Activate
上記のを行ってから別シートの値を取得するのですが、
この処理を行うと指定したシートへ強制的にとんでしまいます。。。

※イメージ
For　～　To　～
　　Worksheets("シートＡ").Activate
　　シートＡの値取得
　　　　　　　：
　　Worksheets("シートＢ").Activate
　　シートＢの値取得
Next

このイメージ処理を行うとものすごい勢いで画面がチカチカします。。。
シートを変えずに他のシートから値を取得する方法はないのでしょうか。
教えてください！

Aベストアンサー

Worksheets("シートＡ").Range("A1")

みたいな感じでできませんか？

他の回答も見る

QEXCEL VBA　で現在開いているブックのファイル名を取得する方法

EXCEL2003 VBAで業務を簡素化するために、現在開いているブックのファイル名を取得する方法が分かりません。
作業手順をマクロを使って処理していますが、オリジナルのワークブックをファイル名を変えて保存し、以後、このワークブックを読み込んで使用しています。
このときのVBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになり、以後の業務に使用できません。
常にファイル名を取得出来るVBAをどなたか、教えて下さい。

Aベストアンサー

＞現在開いているブックのファイル名
　ちょっと曖昧な表現かなぁという気もいたしますが、VBAが書いてあるブックのブック名は
ThisWorkbook.Name
で、現在 "アクティブにして" 操作対象になっているブックの名前は
ActiveWorkbook.Name
ですね。

　しかし、
＞VBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになり
というような文脈からすると、
ThisWorkbook.Name
の方ですかね。

他の回答も見る

Qフォルダ内の全てのBookに同じ処理を繰り返す

フォルダ内にエクセルファイルが約3,000個あります。
この全てのBookに同じ処理をしたいのですが、マクロで繰り返す方法がわからないので教えて下さい。
処理をする内容は簡単なもので、マクロで作りました。

・　各Bookには1つのシートしか存在せず、シート名は重要ではないので全て「Sheet1」になっています。
・　各Bookのデータの配置や表形式は同じです。
・　レコードの行数がBookによって異なります。

処理の内容をマクロで作るところまではできましたが、知識がないためタイムアウトです。

ご教示宜しくお願い致します。

Aベストアンサー

だいたいこんな流れで。

sub macro1()
　dim myPath as string
　dim myFile as string

　mypath = "C:\test\"

’指定フォルダのブックを順繰り拾う
　myfile = dir(mypath & "*.xls*")
　do until myfile = ""

　’ブックを開いて処理を行い保存して閉じる
　　workbooks.open mypath & myfile
　　activesheet.range("A1") = "DONE"
　　activeworkbook.close true

　　myfile = dir()
　loop
end sub

必要に応じて
・画面の表示を抑制する
・再計算を手動にする
といった手管を追加して高速化を図ります。

他の回答も見る

Q逆向き/（スラッシュ）の入力方法

タイトルの通り、逆向き/（スラッシュ）の入力方法がわかりません。

記号⇒変換　で出てくるのは＼、大文字ですよね、
これの小文字バージョンの出し方がわからないのです。
cgiのプログラミングにチャレンジ中でブチ当たって
しまい、途方にくれています。
ちなみに使ってるキーボードは１０６です。

Aベストアンサー

殆どの場合、バックスラッシュを使うのであれば、￥記号で代用できます
これは、フォントの問題であって、内部的な数値は同じ物だからです

もし、cgiプログラミングの本などでバックスラッシュを使うように指示があった
場合は、スラッシュではなく￥記号にするのが間違いがないはずです

他の回答も見る

Qエクセル　マクロで指定フォルダを開く

エクセルにて
指定フォルダを開く、マクロがあれば教えて頂けないでしょうか。
よろしくお願いいたします。

Aベストアンサー

こんにちは。

こういうものですか？
開くフォルダを変えたいときは targ に与えるパスを変更します。

Sub OpenFolders()
Dim targ As String
targ = "C:\"
Shell "C:\Windows\Explorer.exe " & targ, vbNormalFocus
End Sub

他の回答も見る

QEXCELで「￥」マーク表示されない。

EXCELで「￥」を打ってENTERを押すと、「＼」バックスラッシュが表示されてしまいます。教えてください。会計報告書作成時（英語）
OS：2000　OFFICE:2000

Aベストアンサー

バックスラッシュが打てない
http://www.junmas.com/wwwboard2/messages/397.html
と逆のケースであろうと思います。
ソフトが英語版だからと思います。
上記ＷＥＢにもあるように、バックスラッシュと￥
は、文字コードの点で古くより因縁のある問題であります。
http://www.watch.impress.co.jp/internet/www/column/ogata/part1_2.htm（この中でバックで検索し、最後の
辺りを読んで下さい）

他の回答も見る