<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />こんにちは。JMP 11 に含まれているサンプル プログラムを参照しています。
C:\Program Files\SAS\JMP\11\Samples\Automation\Visual Basic Samples\Data Table .NET\datatab.vb
私は Visual Studio (Excel のみ) を持っていないので、"datatab.vb" をメモ帳で開き、"Subset_Click" プロシージャを Visual Basic (VB) から Visual Basic for Applications (VBA) に変換しようとしました。 以下のコード例を参照してください。
いくつかの質問を聞きたいんです：
- 「doc = app.OpenDocument(fname)」によって実行時エラー「オブジェクト変数が設定されていません」が発生するのはなぜですか?
- データテーブル サブセット メソッドはどのように機能しますか? これらは Excel VBA オブジェクト ブラウザで確認できますが、詳細はあまりありません。
- データテーブル ハンドルはどのように使用されますか?
ご協力いただきありがとうございます。
-------------------------------------------------- -------
'重量と高さで bigclass をサブセット化
'新しいデータテーブル ハンドルを NewDT に保存し、テーブルをsubset.jmpとしてディスクに保存します
-------------------------------------------------- -------
サブサブセット()
Dim app As JMP.Application
Dim doc As JMP.Document
Dim dt As JMP.DataTable
JMP.DataTable として newDT を暗くする
Dim dtDoc を JMP.Document として
Dim dir As String
文字列としての薄暗い fname
'JMPを開始
app = CreateObject("JMP.Application") を設定します。
app.Visible = True
'データテーブルを取得
dir = "C:\Program Files\SAS\JMP\11\Samples\Data\"
fname = dir & "Big Class.jmp"
doc = app.OpenDocument(fname)
dt = doc.GetDataTable
'サブセットデータ
dt.Activate
dt.SubsetSetRandomSelection(2, False)
dt.SubsetStratifyAddColumn (「年齢」)
dt.AddToSubList ("名前")
dt.AddToSubList ("重み")
dt.AddToSubList ("高さ")
newDT = dt.サブセット
dtDoc = newDT.Document
dtDoc.SaveAs ("C:\JMP\subset.jmp")
サブ終了
-------------------------------------------------- -------
うわー、JMP のインストール ディレクトリにはたくさんの優れた機能があります。 Automation Reference PDF のメソッドの説明は確かに役に立ちます。
私の元の質問に関して：
- オブジェクト参照を変数に割り当てるには、"Set" キーワードが必要でした。
- あなたの解説と写真は、サブセットコードを理解するのに役立ちました。
再度、感謝します！
こんにちは。
JMP 11 がインストールされている Documentation ディレクトリに、完全な自動化リファレンスがインストールされています。不適切な参照を取得している場合は、JMP の起動に失敗した (App オブジェクトが空である) か、Big Class データ テーブルが見つからず、その参照が空であることを意味します。JMPPro を使用している場合は、ディレクトリが JMP\11 ではなく、JMPPRO\11 になることに注意してください。他の JMP 製品についても同様です。
このサンプルは、ランダム サンプル サイズが 2 のサブセットを実行しています。層化が設定され、年齢列が層化されたサンプルに使用されます。選択した列のみが出力されます。この場合、名前、身長、体重が選択された列です。これをインタラクティブに行うとどうなるかを示す写真を添付します。
これが役に立てば幸いです。
ブライアン・コーコラン
JMP開発
