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