Be-Excelers,
Saya membuat object FormatCondition bernama fmtCondPlan.
FormatCondition saya atur formula dan stylenya sbb:
(complete code vba ada di file terlampir)

'=================================================================================================
    Set fmtCondPlan = rgData.FormatConditions.Add(Type:=xlExpression, 
Formula1:="=" & strCondPlan)
    With fmtCondPlan
        .Interior.Color = rgbAquamarine
        .Borders.LineStyle = xlContinuous 'note #1
        '.Borders(xlEdgeTop).LineStyle = xlContinuous 'note #2
    End With
'==================================================================================================

Saat baris note#2 saya non-active kan, program berjalan dengan baik, tetapi 
jika note#1 saya non activekan dan note#2 saya aktifkan muncul pesan error 
"Unable to set the LineStyle property of the Border class".


Hasil yang diharapkan adalah pada baris Rencana: Ada garis continuos di atas, 
sedangkan pada baris Aktual: ada garis putus-putus.

Mohon pencerahan solusinya.

terimakasih
-zainul


Attachment: vba-conditionalformat.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Kirim email ke