位置を選択; 解除（すでに設定されていると効かないため） 設定; 上記を実行すると、選択したセルb10の位置を基準にウィンドウ枠（行と列）が固定されます。 セルb10を選択すると固定される部分は「a列」と「9行目」（選択したセルの上と左側）となります。 注意 ウィンドウ枠を固定する基準を変更する際には、(2)のステートメントのように、一旦ウィンドウ枠の固定を解除する必要があります。 なおこのサンプルは、ウィンドウ枠が分割されたワークシートでは正常に動作しませんので注意してください。 vbaでプロジェクトウィンドウやプロパティウィンドウの位置が変わってしまったから戻したい、位置を変えたい時のやり方です。 使いたいウィンドウが消えてしまった場合の再表示のやり方はページの後半で説明しています。 ウィンドウ枠を固定している場合、Window オブジェクトの ScrollRow プロパティは固定領域を対象外とします。 If the panes are frozen, the ScrollRow property of the Window object excludes the frozen areas. Sample1では行と列の枠を固定しましたが、次は行のみ枠を固定化します。 Excel VBA でウィンドウ枠の固定位置を取得したい場合、Web で検索すると ActiveWindow の SplitRow と SplitColumn を利用する方法か ScrollRow と ScrollColumn を利用する方法のいずれかがヒットします 1 。. VisibleRange, objTarget) Is Nothing Then Exit Function Else ' 分割あり ' ウィンドウ枠固定か If objAW. この 2 行の記述を実行するだけで、画面の表示位置 (左上角に表示される行列) がシートの左上 (a1 セルの位置) に復帰します。 このサンプルでは選択セル自体を変更していないので、文字を入力したり四方の矢印キーを操作すると、また画面のような右下方に移動してしまいます。 ちなみに枠固定や固定解除の処理は実行する際に重複（固定状態⇒固定処理、解除状態⇒解除処理）してもエラーなどは発生しませんので、その点は使いやすいですね。 行のみ枠固定. ・一瞬別の位置にウィンドウが見える といった問題があります。 ・位置のみを指定する、もしくは外部のウィンドウのサイズを取得する方法 ・表示する前に位置を変える方法 あるいは ・位置のみを指定して実行する方法 について教えていただきたいです。 Panes. 次の使用例は、行 10 が上端になるようにウィンドウをスクロール … More than 3 years have passed since last update. 例 Example. Excel VBA. FreezePanes Then ' どのウィンドウに属するか判定 For lngIx = 1 To objAW. エクセルVBAでWindowsコレクションオブジェクトのFreezePanesプロパティを利用して、Excelのウィンドウ枠を固定する方法について解説しています。VBAの基礎から応用まで幅広くまとめている初心者向けVBA入門サイト。 Count ' 発見？ If Not Intersect (objAW. Panes (lngIx). エクセルVBAでExcelウィンドウの表示位置を設定する方法ついて解説しています。ディスプレイの左上を基点として座標値を設定することで表示位置が決定します。VBAの基礎から応用まで幅広くまとめている初心者向けVBA入門サイト。