Решение задач в Excel на VBA. Применение программных средств в проектировании автомобильных конструкций. Калядин В.И. - 36 стр.

UptoLike

ВУЗ: 

МАМИ | Москва

Составители: 

Рубрика: 

36
3. Представление данных в виде графиков и диаграмм
3.1. Построение графиков
Построение в Excel графика функции
Y(X)Y
по значениям
i
Y
в
равноотстоящих точках
],[X
i
ba
отрезка
],[ ba
изменения аргумента
выполняется следующим образом: выделяют столбец значений
i
Y
, а за-
тем используют цепочку вызовов Вставка, Диаграммы, График. При
этом график будет построен не на шкале аргумента
X
, а на шкале ин-
дексов (номеров точек). Чтобы придать этой шкале вид оси аргумента
X
, меняют подпись горизонтальной оси, подставляя в еѐ диапазон чис-
ла из столбца
X
. Полученная картинка будет соответствовать графику
Y(X)Y
для однозначной функции при равноотстоящих значениях
i
X
.
В общем случае, когда график строится по массивам точек
i
X
и
i
Y
,
следует использовать точеные диаграммы. Рассмотрим их применение
при решении следующей задачи.
Пример 3.1. Построить график функции
F(X)Y
, заданной формулой
«=X/КОРЕНЬ(1 + X ^ 2)» в ячейке B2. Для запоминания значений аргумен-
та X, изменяющегося от -2 до +2 с шагом 0,1 , использовать ячейку A2.
Решение примера 3.1 начнѐм с оформления ячеек на рабочем листе:
введѐм в ячейки A1 и B1 соответственно символы X и F, а ячейкам A2 и
B2 присвоим имена X и F (выбрав предварительно Формулы на ленте).
Введѐм формулу в ячейку B2. Оформим вычисление значений аргумен-
тов и функции в виде следующего макроса:
Sub PutXF()
Const N As Integer = 40 ' Число подинтервалов на [a; b]=[-2; 2].
H = (2 - (-2)) / N ' Шаг по аргументу X.
For i = 0 To N ' Начало цикла по точкам графика.
X = -2 + H * i ' Значение аргумента X
Range("X") = X ' переслать в ячейку A2 для вычисления F(X) в B2
Cells(i + 3, 1) = X ' и переслать в ячейку i+3 строки столбца A.
Cells(i + 3, 2) = Cells(2, 2) ' Скопировать значение F(X) в
' ячейку строки i+3 столбца B.
Next i ' Конец цикла по точкам графика. 
   3. Представление данных в виде графиков и диаграмм
                  3.1. Построение графиков
  Построение в Excel графика функции Y  Y(X) по значениям Yi в
равноотстоящих точках Xi [a, b] отрезка [a, b] изменения аргумента
выполняется следующим образом: выделяют столбец значений Yi , а за-
тем используют цепочку вызовов Вставка, Диаграммы, График. При
этом график будет построен не на шкале аргумента X , а на шкале ин-
дексов (номеров точек). Чтобы придать этой шкале вид оси аргумента
X , меняют подпись горизонтальной оси, подставляя в еѐ диапазон чис-
ла из столбца X . Полученная картинка будет соответствовать графику
Y  Y(X) для однозначной функции при равноотстоящих значениях Xi .
  В общем случае, когда график строится по массивам точек Xi и Yi ,
следует использовать точеные диаграммы. Рассмотрим их применение
при решении следующей задачи.
Пример 3.1. Построить график функции Y  F(X), заданной формулой
«=X/КОРЕНЬ(1 + X ^ 2)» в ячейке B2. Для запоминания значений аргумен-
та X, изменяющегося от -2 до +2 с шагом 0,1 , использовать ячейку A2.
Решение примера 3.1 начнѐм с оформления ячеек на рабочем листе:
введѐм в ячейки A1 и B1 соответственно символы X и F, а ячейкам A2 и
B2 присвоим имена X и F (выбрав предварительно Формулы на ленте).
Введѐм формулу в ячейку B2. Оформим вычисление значений аргумен-
тов и функции в виде следующего макроса:
Sub PutXF()
Const N As Integer = 40              ' Число подинтервалов на [a; b]=[-2; 2].
H = (2 - (-2)) / N                ' Шаг по аргументу X.
For i = 0 To N                        ' Начало цикла по точкам графика.
  X = -2 + H * i        ' Значение аргумента X
  Range("X") = X ' переслать в ячейку A2 для вычисления F(X) в B2
  Cells(i + 3, 1) = X       ' и переслать в ячейку i+3 строки столбца A.
  Cells(i + 3, 2) = Cells(2, 2)             ' Скопировать значение F(X) в
                                             ' ячейку строки i+3 столбца B.
Next i                                 ' Конец цикла по точкам графика.

                                           36

Страницы