昨日までなんともなかったのですが、急におかしくなったので教えて下さい

いつも画像を“Photo Editor”で開いていましたが、開こうとすると
“No file format information can be found in the registry”と出てきて
開けなくなりました!

昨日から調子は悪く上にある“ファイル”“表示”などが全て英語になってしまっていました。

ここのカテゴリーで検索して皆さんの回答を読ませて頂きまして


1.jpgファイル(どれでも良いです)を一旦クリック
2.Shiftキーを押しながら、右クリック
3.メニューの「アプリケーションから開く」をクリック
4.リストの中からPhotEditorを探す。リストになければ「その他」をクリックして、PhotEditorの実行ファイル場所を指定する。
5.「この種類の~」にチェックを入れてOKする。

この通りしてみましたが駄目でした。

No file format information can be found in the registryの意味も全くわかりません。

どうしたらよいのか教えて下さい!宜しくお願いいたします。

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

A 回答 (1件)

jpegファイルを書き換えてしまう、ワームがあります。

知人で、jpegがVBSに綯なてしまったという例は、loveletterワームでした。参考URL参照のこと
ファイル”“表示”などが全て英語になってしまったというのも、ウィルス感染のように思います。
ウィルスチェックをしてみては、いかがでしょう。
英語メッセージは、このファイル形式は、レジストリーの中に見つけられないということです。ですから、開けないと言うことですね。

参考URL:http://www.symantec.com/region/jp/sarcj/data/v/f …
    • good
    • 0
この回答へのお礼

アドバイスありがとうございます (=^・^=)
もう解決いたしました!
アドバイスありがとうございました~♪♪♪

お礼日時:2001/10/05 07:02

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

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

Q多数のExcel Fileのデータを単一のExcel Fileにまとめる方法

1.対象の「データ」(表)
親フォルダの中に10個の子フォルダがあり、その子フォルダそれぞれが200個のExcelファイルを収納し、それぞれのExcelファイルの最初のsheetにのみ「データ」が入っている。従って「データ」を収納しているsheet数は合計で2000。

2.一つのファイルに集合(コピーまたは移動)
この2000sheetsのデータを、一つのExcelファイル(*)に集合したい。 
(*)この集合用ファイルのsheet2000個を使い、その各sheetに個別にデータ(2000)を収める。

この作業を、できれば一括処理(又は、それに近い処理)で完了できる方法があれば教えてください。

Aベストアンサー

ExcelのVBAを利用すれば可能です。
VBAについては、書籍がたくさん出ていますので、そちらを参考にしてみてください。

参考URL:http://www.gihyo.co.jp/books/4-7741-1966-0

QEXCELで作成したFileに画像を入れると画像のFileサイズ以上に大きくなる

EXCELで作成したFileに画像を入れると画像のFileサイズ以上に大きくなるのですが、大きくならない方法は有りますか?

Aベストアンサー

どんな風に画像を入れていますか?

例えば他のソフトでコピーし、Excelで貼り付けしているなら、挿入-図-ファイルからで入れるようにしましょう。
ようはクリップボードを経由して挿入しない事です。
断然小さくなります。

既にこの方法でやっていて、尚且つサイズを小さくしたいなら元の画像を画像処理ソフトで必要なピクセルサイズに修正しておくか、減色するかでしょうね。

Qエクセルでセルをクリックすると“○”と入力したい。

VBA”超”初心者です。
理屈抜きにして結果だけ教えていただきたいことがございます。

課題である表記を実現するために、
ワークシートエリアに以下を記しました
(サイトからコピーしてきただけですが。。)

同時に同じワークシート内において、
"R18:R103" においても'処理対象としたいのですが、
どう改造すればよいでしょうか?

(追伸)それと、シングルクリックバージョンも検討したいのです。よろしくお願いします。


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Const rng As String = "O18:O103" '処理対象のセル範囲
If Not Application.Intersect(Target, Range(rng)) Is Nothing Then
If Target.Value = "" Then
Target.Value = "○"

Else
Target.ClearContents
End If
End If
End Sub

VBA”超”初心者です。
理屈抜きにして結果だけ教えていただきたいことがございます。

課題である表記を実現するために、
ワークシートエリアに以下を記しました
(サイトからコピーしてきただけですが。。)

同時に同じワークシート内において、
"R18:R103" においても'処理対象としたいのですが、
どう改造すればよいでしょうか?

(追伸)それと、シングルクリックバージョンも検討したいのです。よろしくお願いします。


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolea...続きを読む

Aベストアンサー

こんばんは!

ダブルクリックの場合

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Application.Intersect(Target, Range("O18:O103,R18:R103")) Is Nothing Then Exit Sub
Cancel = True
With Target
If .Value = "" Then
.Value = "○"
Else
.ClearContents
End If
End With
End Sub

※ シングルクリックは間違ったセルをクリックしても反応してしまいますので、おススメはしませんが・・・
敢えてやると

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.Intersect(Target, Range("O18:O103,R18:R103")) Is Nothing Then Exit Sub
With Target
If .Value = "" Then
.Value = "○"
Else
.ClearContents
End If
End With
End Sub

こんな感じになると思います。
上記コードは同居させないでください。m(_ _)m

こんばんは!

ダブルクリックの場合

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Application.Intersect(Target, Range("O18:O103,R18:R103")) Is Nothing Then Exit Sub
Cancel = True
With Target
If .Value = "" Then
.Value = "○"
Else
.ClearContents
End If
End With
End Sub

※ シングルクリックは間違ったセルをクリックしても反応してしまいますので、おススメはしませんが・・・
敢えてやると

Private Sub Worksheet_SelectionChange(ByVa...続きを読む

Q“コピー”と“ショートカットの作成”の違い

タイトルの通りなんですが、違いを教えて下さい。
コピーはそのままコピーされますよね?
ショートカットの作成もアイコンの左下に右上がりの矢印がつくだけで、変わりはないと思うのですが?
それと、なぜ元のファイルはメモリーが多いのに、ショートカットの作成をした場合は1キロバイトに減ってしまうのでしょうか??
お願いします。

Aベストアンサー

ショートカットはファイルへの「入り口」です。具体的には「ここへ飛べ」というプログラムなのでファイルの本体ではありません。

コピーはいわゆる本体のコピーです。100バイトのファイルをコピーすれば当然100バイトになります。

もっと違いが分かるにはそれぞれのファイルを少し変えてみて元ファイルが変更されたかどうかを見てみてください。

ショートカットで選ばれた方はそこから本ファイルに飛ぶので本体を変更した事になりますが、コピーの方はコピー先を変更しているだけなのでコピー前のファイルは変更される事はありません。

Q“180823”と入力すると、“平成18年8月23日”と表示する方法

タイトルの通りなんですが、たとえば、ユーザー定義でセルA1に
ggge"年"m"月"d"日"
として、(私なりにこの定義を使うかな、ということで、これは必須ではありません)

セルB1に
“180823”と入力すると、それを参照して
セルA1に“平成18年8月23日”と表示する方法はありますでしょうか?

なお、日付は本日とは限らないので、TODAY、NOW関数は使えません。

Aベストアンサー

平成にしか対応しませんが
A1=IF(B1="","",TEXT(("H"&TEXT(B1,"00!/00!/00"))*1,"gggee年mm月dd日"))


このカテゴリの人気Q&Aランキング

おすすめ情報