مهارة التعامل مع البيانات الصغيرة في الاكسل للمحاسبين

 الكود المستخدم

() Private Sub SpinButton1_SpinUp

'comptabook +213670169466'

ZoomIn

End Sub

  () Private Sub SpinButton1_SpinDown

    ZoomOut

End Sub

 () Private Sub ZoomIn

    With ActiveWindow

        If .Zoom < 400 Then

            Zoom = .Zoom + 10.

        End If

    End With

End Sub

() Private Sub ZoomOut

    With ActiveWindow

        If .Zoom > 10 Then

            Zoom = .Zoom - 10.

        End If

    End With

End Sub

----------------------------------------------

تنزيل الملف النصي ونسخ ولصق الكود الى ملف الاكسل

تنزيل الملف النصي اضغط هنا

----------------------------------------------

تنزيل ملف العمل

---------------------------------------------

عرض طريقة العمل

سجل في تطبيقاتنا