14457_fr-FR

liliconcom

VBA - Enregistrer le classeur Excel en tant que table de données JMP<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Bonjour, je connais Excel VBA mais je suis nouveau dans les scripts JMP. J'utilise actuellement JMP 11.

J'aimerais ouvrir un classeur Excel (avec une seule feuille de calcul) et l'enregistrer en tant que tableau de données JMP, afin de pouvoir y exécuter une analyse JMP.

Comment référencer la table de données JMP non enregistrée créée par ce code VBA ?

Dim app As JMP.Application
Dim doc As JMP.Document
Dim dt As JMP.DataTable

'Démarrer JMP
Set app = CreateObject("JMP.Application")
app.Visible = Vrai

'Ouvrir un classeur Excel contenant une seule feuille de données
app.OpenDocument ("C:\jmp\Data.xlsx")

Lorsque je préfixe la dernière ligne avec "dt =", j'obtiens une erreur.

Toute suggestion serait appréciée.

Re : VBA - Enregistrer le classeur Excel en tant que tableau de données JMP

Merci Brian. C'était exactement ce dont j'avais besoin.

Re : VBA - Enregistrer le classeur Excel en tant que tableau de données JMP

Super facile à faire en JSL.Voici un exemple de code pour une façon d'aborder cela.Copiez le code dans une nouvelle fenêtre JSL (sous Fichier > Nouveau...) et cliquez sur le script d'exécution en haut de la fenêtre.

Noms par défaut ici ( 1 ) ;

dt = Ouvrir () ;

dt << Enregistrer sous ( "Données Excel.xlsx" ) ;

J'espère que cela vous aidera!

M

Re : VBA - Enregistrer le classeur Excel en tant que tableau de données JMP

Vous devriez être capable de faire :

doc = app.OpenDocument ("C:\jmp\Data.xlsx")

dt = doc.GetDataTable();

Les exemples de programmes inclus dans votre installation JMP peuvent vous aider, en particulier l'exemple de table de données.

Brian Corcoran

Développement JMP

Re : VBA - Enregistrer le classeur Excel en tant que tableau de données JMP

OK, je l'ai fait fonctionner:

Dim app As JMP.Application

Dim doc As JMP.Document

'Démarrer JMP

Set app = CreateObject("JMP.Application")

app.Visible = Vrai

'Ouvrir le classeur Excel et enregistrer en tant que table de données JMP

Set doc = app.OpenDocument("C:\jmp\Data.xlsx")

doc.SaveAs ("C:\jmp\Data.jmp")