どうも、お世話になります。mmc820です。
現在、VB上でexcelを操作するプログラムを作成しているのですが、excelを開いてフォームをアクティブ(前面)にしたときにタスクバーのexcelのアイコンが点滅してしまいます。VBで動かすと問題ないのですが、コンパイルして.EXEで実行するとこの現象が起きます。処理自体には影響は無いのですが、このままではユーザーが誤ってエクセルを閉じてしまう可能性がある(途中で閉じてしまうと当然処理が出来なくなります)ので何とかしたいと思っています。コードは以下の通りです。稚拙なコーディングですが・・・。
Dim Fn As String
'ファイルを開く
With Form1.CommonDialog1
On Error GoTo ErrHandler2
.CancelError = True
.Flags = cdlOFNFileMustExist
.ShowOpen
End With
Fn = CommonDialog1.FileName
Workbooks.Open Fn
Text1.Text = Fn
'Debug.Print Fn
cmdstart.Enabled = True
ActiveWorkbook.Application.Visible = True
ActiveWorkbook.Activate
Application.ScreenUpdating = True
Form1.SetFocus '実行画面を前面に表示
DoEvents
ErrHandler2:
・・・いかがでしょうか?原因・解決法がおわかりの方、アドバイスいただければ幸いです。よろしくお願いします。
No.2ベストアンサー
- 回答日時:
>早速の回答ありがとうございます。
できればExcelは表示しておきたいんですよね・・・・。お勧めしませんねぇ。表示してる分遅いですし、ユーザに終了させられちゃうし。
>以前、途中の段階では、この現象は起こらなかったんです。デバッグを繰り返していくうちにいつの間にか・・・
Excelのオブジェクトを作った後に、フォームのボタンを押させるとか、何か入力させるなどの処理を追加していませんか?
アクティブなアプリケーションがExcelからVBアプリに移っているのかも。
CreateObject()、GetObject()、New等でオブジェクトを作成して、そのままExcelを操作しつづけていたときは
タスクバーの点滅は起こらなかったような。
度々のご回答ありがとうございます。
>Excelのオブジェクトを作った後に、フォームのボタンを押させるとか、何か入力させるなどの処理を追加していませんか?
ズバリです。ファイルを読み込んだ後に実行開始ボタンを押すようになってます。
>CreateObject()、GetObject()、New等でオブジェクトを作成して、そのままExcelを操作しつづけていたときは
タスクバーの点滅は起こらなかったような。
・・・との事でしたのでGetObject()に切り替えて試行錯誤していたところ何とかなりました!!ありがとうございます。しかし、何故以前は点滅しなかったのか・・・謎です(*_*)
ともかく、おかげで助かりました。いやー、さすがは「教えて!goo」ですね。いつもお世話になってますm(__)m
今後またお知恵を拝借する事が多々あると思いますが、どうか宜しくお願いします。回答ありがとうございました。
No.1
- 回答日時:
原因は、Excelがアクティブになろうとするからです。
表示している限り、回避する方法はありません。
なので、Application.Visible = Falseで非表示にしてしまうのが手っ取り早いと思われます。
この回答への補足
早速の回答ありがとうございます。できればExcelは表示しておきたいんですよね・・・・。無理を言うようで申し訳ないんですが。VBでエクセルファイルを選択するとフォームの後ろにエクセルが表示される、という形にしたいんです。以前、途中の段階では、この現象は起こらなかったんです。デバッグを繰り返していくうちにいつの間にか・・・以前のコードが残ってないのでどこをどうしてこうなったのかさっぱり・・・どうか宜しくお願いします。
補足日時:2002/07/30 13:22お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) マクロVBA 1シートをまとめる 閉じ方 初心者 SOS! 1 2022/06/17 14:54
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) 【VBAエラー】Nextに対するForがありません 対策について 5 2022/11/21 21:26
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- その他(プログラミング・Web制作) VBSでExcelファイル起動時、重複しても開くのを止めたい 1 2022/10/01 23:20
- Visual Basic(VBA) vbaのエラー対応(実行時エラー7:メモリが不足しています) 4 2023/04/24 00:20
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) モードレスでユーザーフォームが開け(表示)ません。 4 2022/09/09 11:05
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
タスクバーのボタンがオレンジ色になるのはどういう意味?
Windows Vista・XP
-
アイコンの点滅
Windows 10
-
【Excel VBA】マクロでExcel自体を終了させたい
Excel(エクセル)
-
-
4
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
5
エクセルVBAでUserFormを起動した時
Excel(エクセル)
-
6
VBA 変数名に変数を使用したい。
Visual Basic(VBA)
-
7
【VBA】ファイルパスに半角スペースが入ると、VBAが動かない
Excel(エクセル)
-
8
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
9
Excel VBA:フォーム←→セルのアクティブ切り替え
Excel(エクセル)
-
10
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
-
11
タスクバーが点滅
Windows Vista・XP
-
12
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
13
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
14
メッセージボックスを前面に表示させるには?
Visual Basic(VBA)
-
15
VBSで起動したアプリが前面表示しない
Visual Basic(VBA)
-
16
起動したソフトがタスクバーで点滅しないようにしたい
Windows 7
-
17
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
18
UserForm1.Showでエラーになります。
工学
-
19
エクセルVBAで、MsgBox やInputBox は、画面の中央以外に表示させたい。
Excel(エクセル)
-
20
エクセルVBAのメニューバー&リボンを再表示させる方法について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別フォームから戻ったときのイ...
-
「Cancel = True」とはどういう...
-
VBAでIEの「Web ページからのメ...
-
左シングルクリックと左ダブル...
-
VB2005 DataGridView上でクリッ...
-
マイページはどこを開くの
-
デジタル時計の時刻合わせの方...
-
ウインドウを毎回同じ位置、大...
-
エクセルのシート上に別のシー...
-
VBAのユーザーフォームのframe...
-
Javascript_submit()完了後に処...
-
VBAで任意のウインドウのサイズ...
-
小さな表示窓の呼び方は
-
Excelでワードアートや図を常に...
-
バッチファイルでdiskpart.exe...
-
PDFファイルの向きを縦から横に...
-
【Android】ユーザー補助機能ボ...
-
PDFを(htmlのように)無限に縦...
-
Photoshop 7 画像に上の青い境...
-
Windowsのポップアップの表示方...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「Cancel = True」とはどういう...
-
別フォームから戻ったときのイ...
-
VB2005 DataGridView上でクリッ...
-
excelのタスクバーアイコンが・...
-
Perlで数値(小数点、負の数、...
-
VB6.0のEnabledをfalseにしても...
-
VBAでIEの「Web ページからのメ...
-
エクセル アプリケーションの...
-
【ImageMagick】 PDF → JPG 変...
-
【C#】ラベルのダブルクリック...
-
Perlでページ処理がどうしても...
-
vba IE操作で こういう事って...
-
別ページからのタブ切り替えの...
-
処理終了後のに砂時計が、クリ...
-
数千行HTML 画面表示の性能改善
-
javascriptの中で、perlのコマ...
-
C# マウスオーバーの記述方法
-
実行中のOSを知るには?
-
C++での連続した左クリックの禁...
-
Sleep関数の最大時間について
おすすめ情報