Export az vb.net be excel

[amir_g1355]

من از این دستور استفاده میکنم

excel_app = CreateObject("Excel.Application")
new_book = excel_app.Workbooks.Add
new_sheet = new_book.ActiveSheet

این error میده
old format or invalid library
راهنمای کنید

[zarrin_306]

کد مربوط به نمایش اطلاعات اکسل در دیتا گرید رو دارم

[amir_g1355]

خیلی ممنون از جوابتون ،ولی سوال منو متوجه نشدین من می خوام از vb.net به excel export کنم

[solmaz_zm]

پیغام خطایی که میده منم داشتم،فکر کنم به خاطر اینه که اکسل خیلی زیاد به ورژن وابسته هست.
حتی اگر ویندوز هم عوض کنید ممکن خطا بگیره و اجرا نشه.

آقای zarrin_306 نیکی و پرسش،اگه کدی دارین خوب بدین؟؟!!1

راستی من یه کد دارم شاید کمکت کنه:
(البته این کد ، آقای رضایی (saeed_rezaei)زحمتش را کشیدند.)



dim xlapp as excel.application
dim xlbook as excel.workbook
dim xlsheet as excel.worksheet
xlapp= ctype (createobject ("excel.application"),excel.application)
xlbook= ctype (xlapp.workbooks.add, excel.workbook)
xlsheet = ctype (xlbook.worksheets(1),excel.worksheet)
xlsheet.cells (1,2)=5000
xlsheet.cells (2,2)=75
xlsheet.cells (3,1)="total"
xlsheet.range("B3").formula= "=sum (R1C2:R2C2)"
xlsheet.range ("B3").font.bold=true
xlsheet.application.visible=true
xlsheet.saveas ("d:\mytest.xls")

[saeed_rezaei]

من از این دستور استفاده میکنم

excel_app = CreateObject("Excel.Application")
new_book = excel_app.Workbooks.Add
new_sheet = new_book.ActiveSheet

این error میده
old format or invalid library
راهنمای کنید

سلام.
متاسفانه این یه bug توی آفیس هست. با نصب سرویس پک جدید هم برطرف نمی شه. دو راه حل وجود داره.
یا اینکه از multi languge pack استفاده کنید.
یا اینکه به مسیر زیر برید:
control panel ->regional and lang... ->
توی صفحه regional option دو تا کمبوبوکس می بینید.
یکی شون باید تغییر کنه (احتمالا اولی) اما شما برای اطمینان خیال اولی رو بزنید
engilsh (united state)
و دومی رو
united state