Excel VBA質問箱 IV

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

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


76159 / 76738 ←次へ | 前へ→

【5004】コードの訂正 m(_ _)m
発言  こう E-MAIL  - 03/4/16(水) 22:44 -

引用なし
パスワード
   こうさん,バグってますよ。と自己ツッコミを入れてみたりする。

>ウィンドサイズを求めて,タイトルバーサイズ分大きくし
>表示位置を上にずらして「見えなく」するコードです。
>    .Height = yy * 0.75 + 20
>    .Width = xx * 0.75 + 0

このあと画面サイズを元に戻そうとしていますが,
>  MsgBox "ねっ!"
>  With Application

誤り   .Height = yy * 0.75 + 30
正解   .Height = yy * 0.75 + 0
             
>    .Width = xx * 0.75 + 0
>    .Top = 0
>    .Left = 0
>    .CommandBars("Worksheet Menu Bar").Enabled = True
>  End With
>End Sub

です。
(別に+0しなくてもよいけど,「加算を止める」という意味でございます)
5 hits

【4962】タイトルバー 青木 03/4/15(火) 17:08 質問
【4966】Re:タイトルバー ぴかる 03/4/15(火) 17:51 回答
【4968】Re:タイトルバー 森三中 03/4/15(火) 21:11 質問
【4970】ほんまですね。 ぴかる 03/4/16(水) 8:56 発言
【4974】Re:ほんまですね。 森三中 03/4/16(水) 10:07 発言
【4975】Re:ほんまですね。 ぴかる 03/4/16(水) 10:21 発言
【4976】Re:大変申し訳ございませんでした。 森三中 03/4/16(水) 11:08 発言
【4983】Re:大変申し訳ございませんでした。 ぴかる 03/4/16(水) 12:46 発言
【4985】Re:なにやら・・ れいぞー 03/4/16(水) 13:14 回答
【4986】まあ,凹んだりアツクなったりしないで・・・ こう 03/4/16(水) 13:19 回答
【5004】コードの訂正 m(_ _)m こう 03/4/16(水) 22:44 発言
【4993】ありがとうございました。 ぴかる 03/4/16(水) 17:25 お礼
【4999】デバッグって何? こう 03/4/16(水) 20:57 回答
【5006】Re:デバッグって何? ぴかる 03/4/17(木) 9:10 発言
【5025】ありがとうございます。 青木 03/4/17(木) 19:10 お礼
【5048】Re:ありがとうございます。 bykin 03/4/19(土) 0:05 回答
【5066】Dim xx, yy As Integerは怪しいかった? こう 03/4/20(日) 23:10 発言

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