Tuesday, July 28, 2015

Existing home loan transfer case study

Home Loan Case Study:
Loan amount 20 Lacs, existing ROI 10.5%

Home loan with a IDBI bank which charges 10.5% interest rates. Also they allow part-payment facility only once in a quarter (maximum 25% of outstanding principal in a year) + IDBI has trick to say that if you do your part payment at 15th of the month, it will get effected from next month !! so they make sure to charge you for the next 15 days of interest !!!!

Option 1: Transfer loan to HDFC home loan scheme of 8.25% for first two years

To fore-close existing loan IDBI BANK charge is %, therefore for loan of say 20 Lacs,
fore-closure charges of IDBI = 2% of 20 lacs = 40,000 Rs.
10.3% service tax on the same = 4,120 Rs.
Total fore-closure charges = 44,120 Rs.

Application to HDFC
Processing fees = 10,000 Rs.
Stamp duty = 0.2% of 20 lacs = 4,000 Rs. (+tax10.3%412 Rs)=4,412 Rs.
Total cost of application = 14,412 Rs.

Total cost of loan fore-closure + transfer = 44,120 + 14,412 = 58,532 Rs.

So if one keeps the EMI same as previous bank then sure he will save ~7 installment which is equivalent to ~2,30,000 Rs. which effects into reduction of my loan tenure and net effect even after re-paying cost of transfer he will be able to save ~1.7 Lacs.

So what benefits you get

  • Flexibility of part-payment, & as it is paid effect on interest taken care of (note IDBI is not doing this)
  • You can see loan details on-line (for IDBI, they are not still ECS also, so no way u can know abut ur home loan status, unless specifically asked and for that u need to go there)
  • Get minimum benefit of over a lakh of rupee which is worth considering
  • IDBI - no ECS available so u need to give lot of cheques signed !!!! post dated .. and if there is a mistake then !!!! of course u need to pay off for that !!! HDFC - no doubt they provide ECS


so do let me know ur views on this ....

cheers !!

Friday, July 24, 2015

Import images to PowerPoint Automatically

In our day to day office work it is a regular task to make management presentations and obviously to do this we need many many images to be placed in powerpoint file.

What if we can do this at click of button :-)

So I have made a program which will do this work for you automatically.

Here is some automatic macro program to help you uploading pictures automatically from your hard disk into a PowerPoint presentation.

Follow the simple steps to have this macro in your book1 and then assign some shortcut so as to insert pictures automatically to your PowerPoint presentation.

STEPS
1) Copy the source code given in this post in between two lines
2) Open a new blank PowerPoint presentation with any name you like
3) It will ask you to click to add new slide - do it
4) Goto the Tools menu --> Macro --> Record New Macro
5) It will show default macro name as "Macro 1", just select OK
6) Now select STOP macro record button
7) Now press Alt + F11 to goto the Visual Basic editor
8) Expand the left window upto Module1 level by double clicking it
9) You will see Sub Macro1()
10) Select all code there and paste the code below in that window
11) Close the Visual Basic editor
12) Now press Alt + F8 buttons together to get macro Run dialogue box
13) Select the macro "ImageUpload" and press Run
14) It will ask for filetype (Default is JPG), press OK
15) It will automatically insert all images in the folder in which this Powerpoint file is placed

DONE :-)

Make such master file which contains this macro with any name you like say "ImageUplod.PPT"

Copy this file to any folder that contains images to be uploaded to PPT file, then rename it as you like, then open and run the macro to import all images at a stretch.

I know it is bit difficult to do this for very basic level people so they can just leave me a comment with email ID and I will send compiled file to them over email.

Also I have made complete code which adds a button toolbar, so just press a button and import images type, this will be posted by me in next week.

Cheers !!



Copy the code below :

'===============================================================================
Sub ImageUpload()

Dim wb As Presentation
Set wb = ActivePresentation


Dim strTemp As String
Dim strPath As String
Dim strDir As String
Dim strFileSpec As String
Dim oSld As Slide
Dim oPic As Shape

strFileSpec = InputBox(Prompt:="Enter type of image files to import", _
Title:="ENTER FILE TYPE", Default:="JPG")
strFileSpec = "*." & strFileSpec

strPath = wb.Path & "\"
strFileSpec = "*.jpg"
strDir = strPath & strFileSpec
strTemp = Dir(strDir)
Do While strTemp <> ""

Set oSld = ActivePresentation.Slides.Add(ActivePresentation.Slides.Count + 1, ppLayoutBlank)
Set oPic = oSld.Shapes.AddPicture(FileName:=strPath & strTemp, _
LinkToFile:=msoFalse, _
SaveWithDocument:=msoTrue, _
Left:=0, _
Top:=0, _
Width:=100, _
Height:=100)

With oPic
.ScaleHeight 1, msoTrue
.ScaleWidth 1, msoTrue
End With

strTemp = Dir
Loop

For NumSlide = 1 To ActivePresentation.Slides.Count
ActivePresentation.Slides(NumSlide).Select
For Each Picture In ActiveWindow.Selection.SlideRange.Shapes
Picture.Select
Picture.LockAspectRatio = msoTrue
Picture.Height = 450 'Change this numbers to fit your needs
'Picture.Width = 500 'Change this numbers to fit your needs
Next
Next
End Sub

'===============================================================================