Напишите VBScript, чтобы открыть все файлы xlsx в папке и сохранить каждый лист в виде другого txt-файла? [Дубликат]

Не пытайтесь делать это дома или воспринимайте это слишком серьезно, это просто для сладкого удовольствия ...

function conditionalSwitch (значение, cond, callback / * cond , callback, cond, callback, ... * /) {for (var i = 1; i & lt; arguments.length; i + = 2) {if (arguments [i] (value)) {arguments [i + 1 ](стоимость); вернуть; }}} function test (val) {let width, height; conditionalSwitch (val, (val) = & gt; val & gt; 10, () = & gt; [высота, ширина] = [48,36], (val) = & gt; val & gt; 5, () = & gt; [высота , width] = [40, 30], // Default () = & gt; true, () = & gt; [height, width] = [16, 12]) console.log (ширина, высота); } test (4.9); // 12 16 тест (5.1); // 30 40 тест (10.1); // 36 48

0
задан vicjun 15 July 2013 в 09:51
поделиться

1 ответ

Как указано в разделе info для тега , вы не можете использовать именованные параметры в VBScript. Кроме того, вы помещаете имя переменной objWorksheet в двойные кавычки. Это сделало бы это буквальной строкой «objWorksheet» вместо переменной, содержащей объект рабочего листа. Измените строку

.SetSourceData Source:="objWorksheet".Range("B2:B10"), Plotby:=xlColumns

на это:

.SetSourceData objWorksheet.Range("B2:B10"), xlColumns

В более общем примечании вам следует использовать ключевое слово Const для определения констант:

Const xlLine     = 4
Const xlPrimary  = 1
Const xlCategory = 1
Const xlValue    = 2
Const xlColumns  = 3

, в противном случае они будут регулярными (изменяемыми) переменными.

2
ответ дан Community 16 August 2018 в 02:34
поделиться
  • 1
    Большое спасибо! Теперь я могу запустить код без ошибок. Но в файле нет диаграммы (после сохранения и открытия в Excel). Кажется, что-то что-то создает во время выполнения кода, но когда я открываю файл, это просто пустая область диаграммы. У меня есть данные в двух столбцах (B и C), и я хочу создать простую линейную диаграмму со значениями B как значения x и C как y. Я изменил .ChartType на xlLine. Нужно ли мне отдельно сохранять график / график? – vicjun 15 July 2013 в 11:48
  • 2
    Ваш код открывает текстовый файл. Проверьте, действительно ли данные импортированы так, как вы ожидаете. – Ansgar Wiechers 15 July 2013 в 14:51
  • 3
    Я понял, что я испортил константы, это Const xlColumns = 2 – vicjun 17 July 2013 в 13:32
Другие вопросы по тегам:

Похожие вопросы: