Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


45077 / 76732 ←次へ | 前へ→

【36662】Re:Excelを開くとき、保存する時にバージョン情報を表示させたい
発言  Jaka  - 06/4/7(金) 11:28 -

引用なし
パスワード
   エクセルののバージョンは、
Msgbox Application.Version
で、調べられます。。

開く時は、下記コードを
Private Sub Workbook_Open() か、
Sub Auto_Open()
で、判定させればいいと思います。

If Application.Version <> "95のバージョンは上記で調べた物を書く。" Then
  MsgBox "エクセルのバージョンが95じゃないので・・・・・"
End If

保存する時、
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Application.Version <> "" Then
  MsgBox "エクセルのバージョンが95じゃないので・・・・・"
  '保存中止
  Cancel = True
End If
End Sub

95形式で保存するのかどうかの判断は解りません。(出来たかもしれない。)
ただ、97や2000以上で95形式で上書き保存するのは止めた方がいいと思います。
ファイルサイズが、約2倍前後増えるみたいです。
95形式と上書きした時のエクセルバージョン形式の2つ保存する事になるらしいです。
因みに、原本をそのまま使っているのでしょうか??

4 hits

【36660】Excelを開くとき、保存する時にバージョン情報を表示させたい nana* 06/4/7(金) 10:59 質問
【36662】Re:Excelを開くとき、保存する時にバージョ... Jaka 06/4/7(金) 11:28 発言
【36669】Re:Excelを開くとき、保存する時にバージョ... Kein 06/4/7(金) 13:47 発言
【36683】Re:Excelを開くとき、保存する時にバージョ... nana* 06/4/7(金) 17:09 お礼

45077 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free