ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Charts and Charting in Excel (https://www.excelbanter.com/charts-charting-excel/)
-   -   Visually add (graph) vectors (https://www.excelbanter.com/charts-charting-excel/96126-visually-add-graph-vectors.html)

Banaticus

Visually add (graph) vectors
 

I'd like to visually add (graph) vectors, up to three of them. I'd
prefer to simply add them as polar coordinates, although I can easily
convert them to rectangular coordinates. I'd like Excel to graph one
vector after another, adding the tail of each vector to the head of the
previous vector (or the origin). At the end, I'd like Excel to draw a
vector from the origin of the graph to the head of the last vector and
give the resulting polar coordinates (converting as required). In the
following table I show how I'd like to format the initial polar
coordinates -- it also shows the calculated x/y end points for the same
line stretching from the origin. I have four vectors in this sample
table just so that I can check my x,y calculations.

Code:
--------------------
Vectors
Mag Angle Ref Ang x y
100 50 50 64.2788 76.6044
150 170 10 -147.7212 26.0472
50 185 5 -49.8097 -4.3578
50 275 85 4.3578 -49.8097
--------------------


The code for the Ref Angle on the first line is:
=IF(B3<90,B3,IF(B3<=180,180-B3,IF(B3<=270,B3-180,IF(B3<=360,360-B3,"ERR"))))

The code for x on the first line is:
=IF(OR(B3<90,B3270),ROUND(A3*COS(RADIANS(C3)),4), ROUND(A3*COS(RADIANS(C3))*-1,4))

The code for y on the first line is:
=IF(B3<180,ROUND(A3*SIN(RADIANS(C3)),4),ROUND(A3*S IN(RADIANS(C3))*-1,4))


--
Banaticus
------------------------------------------------------------------------
Banaticus's Profile: http://www.excelforum.com/member.php...o&userid=35795
View this thread: http://www.excelforum.com/showthread...hreadid=555681


Banaticus

Visually add (graph) vectors
 

Check out this attachment -- I'm looking to add arrowheads to the points
and change the color of the final line (the resultant).


+-------------------------------------------------------------------+
|Filename: lab 3.zip |
|Download: http://www.excelforum.com/attachment.php?postid=4944 |
+-------------------------------------------------------------------+

--
Banaticus
------------------------------------------------------------------------
Banaticus's Profile: http://www.excelforum.com/member.php...o&userid=35795
View this thread: http://www.excelforum.com/showthread...hreadid=555681


Jon Peltier

Visually add (graph) vectors
 
You might be able to adapt this approach to your project:

http://peltiertech.com/Excel/Charts/VBAdraw.html

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
http://PeltierTech.com
_______


"Banaticus" wrote
in message ...

I'd like to visually add (graph) vectors, up to three of them. I'd
prefer to simply add them as polar coordinates, although I can easily
convert them to rectangular coordinates. I'd like Excel to graph one
vector after another, adding the tail of each vector to the head of the
previous vector (or the origin). At the end, I'd like Excel to draw a
vector from the origin of the graph to the head of the last vector and
give the resulting polar coordinates (converting as required). In the
following table I show how I'd like to format the initial polar
coordinates -- it also shows the calculated x/y end points for the same
line stretching from the origin. I have four vectors in this sample
table just so that I can check my x,y calculations.

Code:
--------------------
Vectors
Mag Angle Ref Ang x y
100 50 50 64.2788 76.6044
150 170 10 -147.7212 26.0472
50 185 5 -49.8097 -4.3578
50 275 85 4.3578 -49.8097
--------------------


The code for the Ref Angle on the first line is:
=IF(B3<90,B3,IF(B3<=180,180-B3,IF(B3<=270,B3-180,IF(B3<=360,360-B3,"ERR"))))

The code for x on the first line is:
=IF(OR(B3<90,B3270),ROUND(A3*COS(RADIANS(C3)),4), ROUND(A3*COS(RADIANS(C3))*-1,4))

The code for y on the first line is:
=IF(B3<180,ROUND(A3*SIN(RADIANS(C3)),4),ROUND(A3*S IN(RADIANS(C3))*-1,4))


--
Banaticus
------------------------------------------------------------------------
Banaticus's Profile:
http://www.excelforum.com/member.php...o&userid=35795
View this thread: http://www.excelforum.com/showthread...hreadid=555681





All times are GMT +1. The time now is 04:45 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com