In your code you write $Chart->{ChartType}=xlStockOHLC;, but in the error message you write error 0x80020009: "" in propertyput "ChargeType" - which one is it - ChartType or ChargeType? I guess you just miscopied the error message, but it pays to make sure :)

My approach to such things is to use the macro recorder and then inspect the VB code for what it does differently from how my Perl code does it.