Creating Gantt chart

I have the following code:

Please Login or Register  to view this content.

The

Please Login or Register  to view this content.

displays values in a range A3:D7 in Sheet"Schema"

In the code above I want to change the range so it is A3:D7. Now it works like this:

You select a range within a sheet
Then you run the macro
Then you enter a title
Then the Chart shows up


I want to skip the part where you select the range manually. Just pick the values thats in Userform1.show

Thank you.

I managed to work it out, the code looks like this:

Please Login or Register  to view this content.

the RiSoftGantt.Show is a userform which takes value from the userform and paste it in range "A3:D7"


Thank you.