excel export range

Private Sub msxxxSaveRangeAsImage(ByVal vvrgeSourceRange As Range, _ ByVal vvstrFilePathName As String) Dim lvobhGUIDDispatchInterface As mvobhGUID Dim lvobhImageProperties As mvobhImage Dim lvobhIPicture As IPicture...