36912_it-IT

liliconcom

Excel VBA per automatizzare JMP

Ciao gente, sto cercando di eseguire l'analisi delle serie temporali JMP da excel VBA.

 

di seguito i codici

 

Sub LData()

Dim myjmp As JMP.Application
Dim jmp_doc As JMP.Document
Dim jmp_BL As JMP.DataTable
Dim jmp_dt As JMP.DataTable
Dim jmp_dtFinal As JMP.DataTable
Dim jmpstr As String
Imposta myjmp = CreateObject("JMP.Application")
myjmp.Visible = Vero

Imposta jmp_doc = myjmp.OpenDocument("C:\Data_Doc1.xlsx")
Imposta jmp_BL = jmp_doc.GetDataTable

Dim TS As JMP.TimeSeries
Imposta TS = jmp_doc.CreateTimeSeries()

Dim Cont As JMP.timeSeriesConstraintConstants
Inverno = tsConstraintZeroToOne

Dim Modd As JMP.timeSeriesModelConstants
Modd = tsModelWinters

TS.LaunchAddYSeries ("Vendi")
TS.LaunchAddNumAutoCorrLags (25)
TS.Launch

Chiama TS.SmoothingModel(Modd, Winters)

 

Fine sott

 

mi dà un messaggio di errore in JMP

operazione sconosciuta
Il modello stagionale richiede un argomento numerico: periodi per stagione

 

non avevo la possibilità di digitare periodi per stagione quando stavo facendo Call.TS.SmoothingModel(Modd,Winters)

 

ho bisogno del tuo aiuto per illuminarmi su ciò che mi manca

 

Grazie mille in anticipo.

 

Saluti.

Kenny

 

Re: Excel VBA per automatizzare JMP

nessun problema, grazie mille per il tuo aiuto.

Re: Excel VBA per automatizzare JMP

Sfortunatamente, sembra che il metodo di automazione per Smoothing Model non sia aggiornato con le opzioni in Time Series. Contatterò il supporto tecnico per informarli che il problema deve essere inserito per correggerlo in una versione futura del prodotto. L'unica soluzione alternativa di cui sono a conoscenza per questo caso è utilizzare il metodo di automazione "RunCommand" per inviare JSL direttamente a JMP per eseguire l'analisi. Quindi, potresti fare qualcosa come sotto (usando i dati di esempio "Raleigh Temps")

 

Dim DocX As JMP.Document
DocX = myJMP.OpenDocument("c:\programmi\sas\jmppro\14\samples\data\Time Series\Raleigh Temps.jmp")
myJMP.RunCommand("Serie temporali(X( :Numero mese ),Y( :Temperatura ),Metodo Winters( 48, Zero a uno, Intervallo previsione( 0.8 ) ))")

Re: Excel VBA per automatizzare JMP

Serie storica(
Y( :Vendi ),
Numero di periodi di previsione( 12 ),
Metodo Winters( 48, Zero a Uno, Intervalli di confidenza( 0.8 ) ),
Invia a rapporto(
Spedizione(
{"Confronto modelli"},
"2",
ScaleBox,
{Aggiungi linea di riferimento( 0, tratteggiata, "nera" )}
),
Spedizione(
{"Confronto modelli"},
"8",
ScaleBox,
{Aggiungi linea di riferimento( 0, tratteggiata, "nera" )}
),
Spedizione(
{"Confronto modelli"},
"3",
ScaleBox,
{Aggiungi linea di riferimento( 70, Solido, "Blu" ), Mostra griglia principale( 1 )}
),
Spedizione(
{"Confronto modelli"},
"4",
ScaleBox,
{Aggiungi linea di riferimento( 0, tratteggiata, "nera" )}
),
Spedizione(
{"Confronto modelli"},
"5",
ScaleBox,
{Aggiungi linea di riferimento( 0, tratteggiata, "nera" )}
)
)
);

 

 

Grazie mille per l'aiuto

Re: Excel VBA per automatizzare JMP

Potete produrre l'analisi che desiderate utilizzando le finestre di dialogo Time Series di JMP? In tal caso, puoi pubblicare lo script da un'analisi riuscita qui (report Triangolo rosso-> Salva script-> Nella finestra dello script).

 

Grazie,

Brian Corcoran

Sviluppo JMP