在Excel中更改字体样式从VB6?

我目前正在编写一个button,将所有数据从一个列表视图转移到一个Excel工作簿,所以它可以打印为条形码标签。 条形码的工作方式是它是一个真正的字体。 即时通过运行到问题,但通过VB6,我不知道如何格式化一个单元格的范围有不同的字体样式,所以我可以改变某些单元格,以便能够显示条形码。 我得到了

oSheet.range("D2:D10").Font 

其中D2:D10不是我正在玩的单元格的设定范围。 即时通讯不知道去哪里的字体属性在这里。

你有没有尝试过:

 oSheet.range("D2:D10").Font.Name = "BarCode Font Name"