VBA Определить углы между заданной прямой и прямыми с настраиваемыми параметрами

Помогите определить углы между заданной прямой и прямыми с настраиваемыми параметрами.

Основная функция

5x3y+6=0

Функции с пользовательскими параметрами

a1x+2a2y=0,
7a3x-a4y+4=0,
5a5x+a6y-2=0,
a7x+a8y=0

Вид таблицы - Невидимые границы, заголовок полужирный, значения углов.

Вид диаграммы - График с маркерами

Представление результатов - Сообщение «Работа выполнена. Углы такие:» + значения углов через запятую