Minimize Bits per Pixel

Public Sub MinimizeBitsPerPixel( _
   Optional ByVal reserved1 As Double = 0, _
   Optional ByVal reserved2 As Double = 0 _
) 

Color images  are converted to grayscale if contain only various shades of gray.   Color or grayscale images are converted to bi-tonal if  contain only almost white and almost black pixels.

CiRepair Object