Enbolden Font in This Array only.

[Guanjin Peter]

where do I add the font.bold = true if I want to make this part of the array in bold only?

        rProd.Offset(3, 0).Resize(, 6) = Array("HandOver By:", "", "", "", "", "Received By:")

.Font.Bold = True

 

[Guanjin Peter]

rProd.Offset(3, 0).Resize(, 6).font.bold = Array("HandOver By:", "", "", "", "", "Received By:")

Unable to set bold property for font class.

 

[Guanjin Peter]

*bump*

 

[northwolves]

rProd.Offset(3, 0).Resize(, 6).font.bold=true

 

[Guanjin Peter]

hmm...then where do i place the array?

Array("HandOver By:", "", "", "", "", "Received By:")

 

[northwolves]

Try:

Sub macro1()
With rProd.Offset(3, 0).Resize(, 6)
.Value = Array("HandOver By:", "", "", "", "", "Received By:")
.Font.Bold = True
End With
End Sub

Regards
Northwolves

 

[Guanjin Peter]

i see. thank you very much!

 

[Norie]

Wasn't this answered back in post #3 by jonmo?

 

[Guanjin Peter]

rProd.Offset(3, 0).Resize(, 6).font.bold=true = Array("HandOver By:", "", "", "", "", "Received By:")


actually I was dumb enuff to try that...so didn't work.