おしゃべり掲示板!みんなの話題共有サイト

ズーム -1元のサイズ+1

ヒントみんなの疑問、質問、相談、体験談、意見、情報が誰かの役に立っています。

つまみ読み
記事 213 by YOUCAN

こんにちは<(_ _)>初めてカキコさせて頂きます。プログラム等の知識は殆どないのですが、書籍... ( 続きを読む )

1.
詳しい説明を ゆき

2.おっしゃる通りです。

メール転送可
コメント 215 by YOUCAN
>>214 ゆきさん

早速のレスありがとうございます。

> 97形式のxlsファイルは開けたけれど、編集して
> 保存しようとしてエラーになったということでしょうか?

おっしゃる通りです。
「保存中しています・・・」
「Excel5.0/7.0保存しています・・・」
と左下に表示された後、「保存できませんでした」と
メッセージボックスが表示されます。

よろしくお願いします。
To:YOUCAN

返信を書き込む

主題: Excel VBAに関して

コピー保険に加入(本文コピー)  写真を貼り付ける 埋め込む
カメラ 写真(画像)貼付の設定

笑 [返信内容の確認]をするときに、あなたが撮影した写真や画像を指定します。投稿すると安全処理されてから投稿欄に表示されます。

設定を閉じる

YouTube公式チャンネル 動画貼付の設定
URL:

笑 YouTube の動画枠直下にある[共有]を押すと出るURLか、再生ページのURLを以下のように入力します。
https://youtu.be/*****

貼り付けてよい動画?

笑 企業等の公式チャンネルの動画や個人が撮影して公開中の動画を掲示板等に貼り付けて共有リンクするのは著作権上合法だそうです。

貼り付け方は?

設定を閉じる

2002年8月12日(月) 1時54分 親記事 3件目のコメント
コメント 216 by ゆき
YOUCANさん
ちは、レスが遅くなって申し訳ないです。以下の手順をやってみて
再度、保存してみてください。駄目元で・・・。
駄目な場合、具体的なマクロを可能であれば教えてください。
[ツール] メニューの [オプション] をクリックし、[オプション] ダイアログ ボックスの [移行] タブの "計算方式を変更する" チェック ボックスを オフ にします。
この投稿に返信
2002年8月12日(月) 23時59分違反通報親記事 4件目
コメント 217 by YOUCAN
>>216 ゆきさん

こんばんは色々とご指導ありがとうございます。
↑で教えて頂いた事を試してみましたが、
ゆきさんがご推測の通り、状況は変わりませんでした。
それで、終了させる時のマクロを記載いたします。
何か、気づかれた事などありましたらご指導お願い致します。

お盆休みの折、ご報告遅くなりました事お詫びいたします。

Sub auto_close()
Application.ScreenUpdating = False
Dim sh As Object
For Each sh In Sheets
sh.Visible = True
Next sh
Dim mysheet As Object
Sheets("メニュー").Select
For Each mysheet In Worksheets
mysheet.Select
Range("A1").Select
ActiveWindow.DisplayHeadings = True ActiveWindow.DisplayOutline = True ActiveWindow.DisplayHorizontalScrollBar = True ActiveWindow.DisplayVerticalScrollBar = True ActiveWindow.ScrollRow = 1 ActiveWindow.ScrollColumn = 1
Next mysheet
Sheets("メニュー").Select
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets(Array("メニュー", "基本情報", "決算表紙", "資産", "負債", "損益", "販棚", "原価", "利益処分", "注記事項", "営報表紙" _
, "推移", "要約BS", "要約PL", "経営分析", "試算表")).Select
Sheets("メニュー").Activate
Sheets("メニュー").Activate
ActiveWindow.SelectedSheets.Visible = False
Sheets("sheet1").Visible = True
Sheets("sheet1").Select
Sheets("メニュー").Visible = False
Application.DisplayFullScreen = False
ActiveWindow.DisplayWorkbookTabs = False
Application.ScreenUpdating = True
Application.Quit
End Sub
この投稿に返信
2002年8月19日(月) 22時10分違反通報親記事 5件目