Excel VBA: metodi LaunchSet utilizzati dai grafici di controllo IR<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Ciao di nuovo. Ho esaminato l'esempio di "analisi" VB.NET su:
C: \ Programmi \ SAS \ JMP \ 11 \ Samples \ Automation \ Visual Basic Samples \ Analysis .NET \ analysis.vb
Quindi, dalla procedura ControlChart_Click (), ho estratto il codice relativo ai grafici IR (vedi sotto).
Il codice è stato eseguito correttamente ... tranne per le 2 righe di codice che ho aggiunto:
ccontrol2.LaunchSetIRChartParms (True, False, 2)
ccontrol2.LaunchSetKSigmaAlphaH (True, False, False, 3.0, 1.0)
Si prega di avvisare sulla sintassi corretta. Grazie!
'------------------------------------------------- ---------
'Analisi> Diagramma di controllo> IR> Misura individuale
'------------------------------------------------- ---------
Sub ControlChart ()
Dim app As JMP.Application
Dim doc As JMP.Document
Dim dt As JMP.DataTable
Dim ccontrol2 As JMP.ControlChart
'Avvia JMP
Imposta app = CreateObject ("JMP.Application")
app.Visible = True
'Accedi al documento e recupera il puntatore alla tabella di dati sottostante.
Imposta doc = app.OpenDocument ("C: \ Programmi \ SAS \ JMP \ 11 \ Samples \ Data \ Big Class.jmp")
Impostare dt = doc.GetDataTable
'Porta la tabella dei dati in primo piano e rendila la tabella attiva.
dt.Activate
'Crea un tipo specifico di oggetto di analisi (ad esempio, ControlChart),
'che viene utilizzato per specificare le colonne e quindi avviare l'analisi.
Imposta ccontrol2 = doc.CreateControlChart
'Seleziona la colonna per la creazione di grafici sull'asse verticale.
ccontrol2.LaunchAddProcess ("height")
'Seleziona la colonna i cui valori etichettano l'asse orizzontale.
ccontrol2.LaunchAddSampleLabel ("età")
'Seleziona la colonna per l'elaborazione di gruppo.
ccontrol2.LaunchAddBy ("sex")
'Seleziona il tipo di grafico che vuoi da jmpControlChartConstants (es. IR).
ccontrol2.LaunchSetChartType ((JMP.jmpControlChartConstants.jmpControlChartIR))
'Per il grafico IR, impostare l'opzione Misura individuale e i parametri KSigma.
ccontrol2.LaunchSetIRChartParms (True, False, 2)
ccontrol2.LaunchSetKSigmaAlphaH (True, False, False, 3.0, 1.0)
'Esegui l'analisi con colonne precedentemente specificate tramite LaunchAdd___.
ccontrol2.Launch
End Sub
Ri: Excel VBA - Metodi LaunchSet usati dai grafici di controllo IRGrazie, Brian. Il test del mio codice mi ha aiutato a indirizzarmi nella giusta direzione.
Ho letto della sintassi per la chiamata di subroutine:
- Se si utilizza la parola chiave "Chiama", è necessario racchiudere l'elenco degli argomenti tra parentesi.
- Se ometti la parola chiave "Chiama", devi anche omettere la parentesi che circonda l'elenco degli argomenti.
Quindi ci sono 2 modi corretti per codificarlo in VB:
Chiama ccontrol2.LaunchSetIRChartParms (True, False, 2)
Chiama ccontrol2.LaunchSetKSigmaAlphaH (True, False, False, 3 #, 1 #)
e
ccontrol2.LaunchSetIRChartParms Vero, Falso, 2
ccontrol2.LaunchSetKSigmaAlphaH Vero, Falso, Falso, 3 #, 1 #
Ri: Excel VBA - Metodi LaunchSet usati dai grafici di controllo IRCiao JB,
Non posso aiutarti su questo. I metodi che hai menzionato sopra hanno funzionato bene per me. Che tipo di errore stai ottenendo?
Brian Corcoran
JMP
