Predmet:Re: Boldiranje određenih redova u reportu

---

hvala ljudi

ja se živ napatio a vi to jednostavno nije mi palo na pamet

kome bude trebalo ispravan

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim B As Boolean
B = Me.bold
If B = True Then
Text0.FontWeight = 700 ' Boldirana slova
Text2.FontWeight = 700 ' Boldirana slova
Text3.FontWeight = 700 ' Boldirana slova
Text4.FontWeight = 700 ' Boldirana slova
Text5.FontWeight = 700 ' Boldirana slova
Text6.FontWeight = 700 ' Boldirana slova
Else
Text0.FontWeight = 400 ' Boldirana slova
Text2.FontWeight = 400 ' Boldirana slova
Text3.FontWeight = 400 ' Boldirana slova
Text4.FontWeight = 400 ' Boldirana slova
Text5.FontWeight = 400 ' Boldirana slova
Text6.FontWeight = 400 ' Boldirana slova

End If
End Sub

hvala zxz tvoj sam odmah skonto

hvala i gjoreski tvoj još nisam al skontat ču iako sam ispravio nazve polja