У меня есть электронная таблица, которая рассчитывает сокращение выработки и выбросов на источник топлива для штата Висконсин на разных уровнях солнечной фотоэлектрической мощности в штате, в процентах от общей мощности производства электроэнергии в штате.

Прямо сейчас я могу ввести одно значение для этого процента от общей емкости, и электронная таблица вычислит результаты (четыре значения), которые я хочу, при этом заданном значении.

То, что я ищу, - это способ изменить этот вход от 1 до 100 целыми числами и записать строку данных для результатов на каждом входе.

Я использовал VBA в других (не Microsoft) приложениях, поэтому я открыт для решений с VBA, но я не уверен, как начать работу с VBA в Excel.

|источник

1 ответ1

1

Понял! Спасибо @Raystafarian за указатель на использование «записи макроса», что было очень полезно. Вот код, который я использовал в итоге:

Sub iteratePV()

Dim i As Integer
Dim pasterow As Integer
Dim copyrange As String

For i = 1 To 200
    Range("A2").Select
    ActiveCell.FormulaR1C1 = i / 100
    Range("A2:M2").Select
    Selection.Copy
    pasterow = i + 2
    Let copyrange = "A" & pasterow
    Range(copyrange).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Next i
End Sub

A2 - это то, где я ввел входное значение в процентах, а полученный результат заполнил диапазон B2:M2 .

Эти результаты были затем скопированы в последующих строках.

|источник

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .