Excel VBA Important Tips User Form Zoom & Resize

'''''Lesson 54 Excel '''

'Zoom In
Me.Zoom = Me.Zoom - 5
Me.Width = Me.Width - ((Me.Width * 5) / 100)
Me.Height = Me.Height - ((Me.Height * 5) / 100)

'Zoom Out
Me.Zoom = Me.Zoom + 5
Me.Width = Me.Width + ((Me.Width * 5) / 100)
Me.Height = Me.Height + ((Me.Height * 5) / 100)