Чтобы сделать это программно, необходимо сделать три вещи:
Получают путь папки с закрытым ключом.
Получают имя файла закрытого ключа в той папке.
Добавляют разрешение к тому файлу.
Видят это сообщение для некоторого примера кода, который делает все три (конкретно смотрят на метод "AddAccessToCertificate").
Вы захотите использовать один из инструментов анализа «что, если», в частности, таблицы данных или сценарии, в зависимости от количества входных переменных:
Анализ «что, если» в целом:
Таблицы данных, вероятно, лучший выбор, если вы имеют 1 или 2 входные переменные:
This is not going to be what you want to hear but I had a similarly complicated function which I had developed over a period of time and I wanted to graph it. I never did figure out how to and eventually came to the realisation that I needed to upgrade my tools. I switched to Matlab and never looked back.
I'll be following this question with interest. I am curious to see if there is a way.
Если вы в порядке с использованием VBA, простое решение может быть (ALT + F11, чтобы войти в редактор, затем вставить модуль)
Sub GenerateData()
Dim curDataPt As Long, curVal As Long
Dim rngOut As Range, rngIn As Range, rngData As Range, rngVar As Range
'*** SET VALUES HERE ***'
Const maxVal As Long = 2000000
Const minVal As Long = 0
Const stepVal As Long = 1000
Set rngIn = Sheet1.Range("A1")
Set rngOut = Sheet1.Range("B1")
Set rngVar = Sheet1.Range("D1")
Set rngData = Sheet1.Range("E1")
'************************'
For curVal = minVal To maxVal Step stepVal
curDataPt = curVal / stepVal
rngIn = curVal
rngVar.Offset(curDataPt) = curVal
rngData.Offset(curDataPt) = rngOut
Next curVal
Sheet1.Names.Add "DataIn", rngVar.Resize(curDataPt + 1)
Sheet1.Names.Add "DataOut", rngData.Resize(curDataPt + 1)
End Sub
Это предполагает, что размер вашего резервуара для хранения в A1 на листе 1, а общая экономия - в B1. Sheet1
в коде - это кодовое имя для объекта листа. Посмотрите на панель проводника проекта в окне редактора VB, чтобы убедиться, что это правильно.
Способ использовать это - запустить VBA (ALT + F8) для создания набора данных и использовать мастер диаграмм для создания диаграмма. Однако при выборе исходных данных на вкладке рядов введите = Sheet1! DataOut
для значений и = Sheet1! DataIn
для меток оси категорий (X).
Теперь вы можете играйте с различными значениями минимума / максимума / шага, и диаграмма автоматически обновит ряд данных.