جدا کردن سه رقم سه رقم در جعبه متن

در صورتی که نیاز باشد در یک جعبه متن اعداد سه رقم سه رقم جدا شوند(مانند مقادیر مالی که لازم است اینکار انجام شود) از کد زیر استفاده نمایید

 

Private Sub TextBox1_Change()

    TextBox1.Text = Format(TextBox1.Text, "#,##0")

End Sub

نقل شده از:

https://stackoverflow.com/questions/32421055/format-numbers-in-textbox-as-you-type

خطای The document caused a serious error the last time it was opened زمان باز شدن فایل اکسل یا ورد

برای رفع مشکل مسیر زیر را دنبال کنید

 

file-option-addins-manage

در این بخش از بخش انتخاب گزینه disabled items را انتخاب نمایید و سپس go را بزنید

در لیست اورده شده فایل مد نظر را انتخاب و enable را بزنید

 

نقل شده از:

https://docs.microsoft.com/en-us/office/troubleshoot/office-suite-issues/error-open-word-excel