-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
Making Wind Rose in Excel!!
- Thread starter ckmoied
- Start date
Suppose follwing data is in col A. where 0 or 360 represent north direction. 90=East, 180=South, and 270=West. Now the data once plotted must appear as a wind rose.
There are softwares which can produce wind rose charts. However I want to generate them using Excel Charts.
102.24
109.55
111.49
149.39
144.53
134.59
147.49
96.61
100.97
125.51
101.47
118.97
115.07
93.06
99.24
108.5
104.32
205.33
310.13
327.73
348.11
350.7
349.32
334.41
396.88
395.33
352.37
258.25
There are softwares which can produce wind rose charts. However I want to generate them using Excel Charts.
102.24
109.55
111.49
149.39
144.53
134.59
147.49
96.61
100.97
125.51
101.47
118.97
115.07
93.06
99.24
108.5
104.32
205.33
310.13
327.73
348.11
350.7
349.32
334.41
396.88
395.33
352.37
258.25
Upvote
0
fairwinds
MrExcel MVP
- Joined
- May 15, 2003
- Messages
- 8,638
Maybe this can get you a bit on the way...?
As I could not manage with chart I put your directions in column A (but changed so no one is more than 360 degrees) and put some wind speeds in column B
and run this:
As I could not manage with chart I put your directions in column A (but changed so no one is more than 360 degrees) and put some wind speeds in column B
and run this:
Code:
Sub XXX()
a = 2
Do While Cells(a, 1) <> ""
ActiveSheet.Shapes.AddShape(msoShapeUpArrow, 177#, 104, 20, 10). _
Select
Selection.ShapeRange.IncrementRotation Cells(a, 1)
Selection.ShapeRange.ScaleHeight Cells(a, 2), msoFalse, msoScaleFromBottomRight
a = a + 1
Loop
End Sub
Upvote
0
Similar threads
- Solved
