3

「オブジェクトの選択」カーソルタイプをプログラムで有効にする方法を見つけるのに苦労しています。Application.CursorTypeオブジェクト ブラウザを確認したところ、またはのようなプロパティが見つかるはずApplication.DrawingModeでした。

カーソル タイプの変更はマクロ レコーダーでは検出されず、これに関する情報がどこにも見つからないため、間違った用語を検索しているに違いありません。

編集:を介して設定できるカーソルの外観について話しているのではないことを明確にする必要がありましたApplication.Cursor。むしろ、描画ツールバーの [オブジェクトの選択] アイコンをクリックして、GUI で設定できるのと同じモードにカーソルを設定したいと考えています。これは、図形の選択のみを許可し、セル、テキスト、および数式バーを無視するカーソルです。

実際、ツールチップをチェックしてこの更新を書き込むまで、このカーソル モードの正しい名前を知りませんでした。

4

4 に答える 4

3

これを行う理由はよくわかりませんが、組み込みの CommandBar コントロールを実行することにより、プログラムで「オブジェクトの選択」描画モードを切り替えることができます。

Call CommandBars("Drawing").Controls("Select Objects").Execute

また、状態を確認することで現在のモードを判断できます。

If CommandBars("Drawing").Controls("Select Objects").State Then
  Call Debug.Print("Select Object mode is on")
End If

幸運を！

于 2009-05-17T00:01:19.620 に答える
1

私はこれについて少し「パーティーに遅れている」のですが、ここに「彼がこれをやりたい理由」と「彼がやりたいこと」に対する答えがあります.

'Turn ON 'Select Objects' option during initial display. While ON, cell input is prevented.
If CommandBars("Drawing").Controls("Select Objects").State = False Then
    CommandBars("Drawing").Controls("Select Objects").Execute
End If

「ActiveSheet」ディスプレイに 1 つのコマンド ボタンと 2 つのチェック ボックスがある単純なタイマー アプリケーションでこれを使用します。Select ObjectsをONにすることで、カーソルの入力対象をこの3つに限定しています。セルは選択できません。

乾杯、ローレンス

于 2014-04-08T16:09:37.447 に答える
0

このリンクは役に立ちますか?

概要は次のとおりです。

アプリケーションでは、次の 4 つの選択肢があります。

  • xlDefault
  • xlWait
  • xlBeam
  • xlNorthwestArrow

あなたはそれを次のように呼びます：

Application.Cursor = xlDefault

フォームよりも多くの選択肢があります。詳しくは記事をご覧ください。

于 2009-05-15T10:01:02.300 に答える
0

「描画モード」の意味がわかりません。ただし、マウス カーソルの外観を変更する場合、探しているプロパティは次のとおりです。Application.Cursor

xlWait, xlNorthwestArrow, xlIBeamおよびの 4 つの定義済み値のいずれかに設定できますxlDefault。

他のカーソルを表示する場合は、Access でカスタム カーソルを表示する方法に関するこの記事を参照してください。WinAPI を使用するため、ソリューションは Excel でも同様に機能するはずです。

編集：

あなたの編集に応えて：あなたがやりたいことはできないと思います。それを実行できる VBA コマンドがないため、マクロ レコーダーはそれを取得しません。デザイン モードに切り替えて何を達成しようとしているのかによっては、他の方法があるかもしれません。

ユーザーがワークブックのデータを変更できないようにする場合は、Application.Visibleプロパティを使用して Excel ウィンドウ全体を非表示にすることができます。

ユーザーが何かを選択したり変更したりできないようにしたいが、それでもデータを表示したい場合は、 [ツール] - [保護]の下にあるActiveSheet.Protectまたはを参照してください。ActiveWorkbook.Protect

ブック内の一部のコントロールを移動またはサイズ変更する場合は、コントロールのLeft、Top、HeightおよびWidthプロパティを変更することによってプログラムで行うことができます。マクロからこれを行うためにデザイン モードに切り替える必要はありません。

于 2009-05-15T10:01:03.377 に答える