388194_zh-CN

liliconcom

在 Excel 导入中包含文件名

有没有办法在导入的 Excel 表中包含带有文件名的列？ 使用多文件导入工具有一个选项可以包含此内容，但在导入单个文件时我还没有找到等效的选项。

 

我尝试使用获取路径/获取名称，然后将其写入列，但这只是给了我“Sheet1.jmp”。

 

我使用的打开命令是从向导中复制的：

 

dtt.file= Pick File(); // Opens File dialogue

Open(
 dtt.file,
 Worksheets( "Sheet1" ),
 Use for all sheets( 1 ),
 Concatenate Worksheets( 0 ),
 Create Concatenation Column( 0 ),
 Worksheet Settings(
  1,
  Has Column Headers( 1 ),
  Number of Rows in Headers( 2 ),
  Headers Start on Row( 1 ),
  Data Starts on Row( 3 ),
  Data Starts on Column( 1 ),
  Data Ends on Row( 0 ),
  Data Ends on Column( 0 ),
  Replicated Spanned Rows( 1 ),
  Replicated Spanned Headers( 0 ),
  Suppress Hidden Rows( 1 ),
  Suppress Hidden Columns( 1 ),
  Suppress Empty Columns( 1 ),
  Treat as Hierarchy( 0 ),
  Multiple Series Stack( 0 ),
  Import Cell Colors( 0 ),
  Limit Column Detect( 0 ),
  Column Separator String( "-" )
 );
);

数据存取回复：在 Excel 导入中包含文件名

感谢您提供这个解决方案。

我遇到了类似的问题，需要将其放入循环中以打开多个 Excel 文件。

 

Names Default To Here( 1 );
path = Pick Directory( "Select a directory" );
file_list = Files In Directory(path, recursive);

for(i = 1, i <= N Items(file_list), i++,
filename = path||file_list[i];

dt = Open(
 filename,
 Worksheets( "Sheet1" ),
 Use for all sheets( 1 ),
 Concatenate Worksheets( 0 ),
 Create Concatenation Column( 0 ),
 Worksheet Settings(
  1,
  Has Column Headers( 1 ),
  Number of Rows in Headers( 1 ),
  Headers Start on Row( 41 ),
  Data Starts on Row( 42 ),
  Data Starts on Column( 1 ),
  Data Ends on Row( 54 ),
  Data Ends on Column( 20 ),
  Replicated Spanned Rows( 1 ),
  Replicated Spanned Headers( 0 ),
  Suppress Hidden Rows( 1 ),
  Suppress Hidden Columns( 1 ),
  Suppress Empty Columns( 1 ),
  Treat as Hierarchy( 0 ),
  Multiple Series Stack( 0 ),
  Import Cell Colors( 0 ),
  Limit Column Detect( 0 ),
  Column Separator String( "-" )
 )
);
dt << New Column ("Filename", Character, "Nominal", << Set Each Value(Word(-1, file_list[i], "/")));

);

回复：在 Excel 导入中包含文件名

谢谢你！ 使用以下内容可以实现我想要实现的目标：

dt << New Column("Filename", Character, "Nominal", << Set Each Value(Word(-1, dtt.file, "/")));

 

回复：在 Excel 导入中包含文件名

不确定是否有任何直接的解决方案，如“多文件导入”，但您可以在加载数据后创建新列。

 

以下是两种方法，一种使用选取的文件路径，另一种使用表名称（这可能受工作表名称影响）：

Names Default To Here(1);

dtt.file= Pick File(); // Opens File dialogue

dt = Open(
 dtt.file,
 Worksheets( "Sheet1" ),
 Use for all sheets( 1 ),
 Concatenate Worksheets( 0 ),
 Create Concatenation Column( 0 ),
 Worksheet Settings(
  1,
  Has Column Headers( 1 ),
  Number of Rows in Headers( 2 ),
  Headers Start on Row( 1 ),
  Data Starts on Row( 3 ),
  Data Starts on Column( 1 ),
  Data Ends on Row( 0 ),
  Data Ends on Column( 0 ),
  Replicated Spanned Rows( 1 ),
  Replicated Spanned Headers( 0 ),
  Suppress Hidden Rows( 1 ),
  Suppress Hidden Columns( 1 ),
  Suppress Empty Columns( 1 ),
  Treat as Hierarchy( 0 ),
  Multiple Series Stack( 0 ),
  Import Cell Colors( 0 ),
  Limit Column Detect( 0 ),
  Column Separator String( "-" )
 );
);
dt << New Column("Filename", Character, "Nominal", << Set Each Value(Word(-1, dtt.file, "/")));
dt << New Column("Filename", Character, "Nominal", << Set Each Value(dt << Get Name()));

有关函数的更多信息，尤其是 Word()，请参阅脚本索引。