PDA

View Full Version : پس microsoft.office.interop.Excel کو؟



odiseh
دوشنبه 12 شهریور 1386, 12:44 عصر
سلام
من روی سیستمم .Net2.0 دارم و Office2002 sp3 ولی نمی تونم اون microsoft.office.interop.Excel رو پیدا کنم تا بهش در پروژه ام رفرنس بدم.....

چه کنم؟ چیکار کنم؟

hesam_hma
دوشنبه 12 شهریور 1386, 17:21 عصر
دوست عزیز برای استفاده از این کد ابتدا باید از منویproject گزینهproperties وسپس
references رو انتخاب و بعد بر روی دکمه add کلیک کنی و از برگه com گزینه زیر را انتخاب سپس ok کنید
...Microsoft Excel 11.0 object li
و بقیه کار رو که حتما می دونی مثلا ...

Dim objex As Microsoft.Office.Interop.Excel.Application

odiseh
سه شنبه 13 شهریور 1386, 09:49 صبح
دوست عزیز برای استفاده از این کد ابتدا باید از منویproject گزینهproperties وسپس
references رو انتخاب و بعد بر روی دکمه add کلیک کنی و از برگه com گزینه زیر را انتخاب سپس ok کنید
...Microsoft Excel 11.0 object li
و بقیه کار رو که حتما می دونی مثلا ...

Dim objex As Microsoft.Office.Interop.Excel.Application



یعنی با ید به صورت ActiveX Component با Excel کار کنم؟
ممکنه لطفا بقیه کد رو هم بگی چون دقیقا نمی دونم که چطوری میشه کار کرد.

با تشکر

hesam_hma
سه شنبه 13 شهریور 1386, 18:08 عصر
مثال زیر در خانه a1 مقدار hesam رو می نویسه و ذخیره میکنه و صفحه اکسل رو به چاپگر می فرسته اگه کد رو متوجه نشدی بگو تا بیشتر توضیح بدم

Dim objxlapp As Microsoft.Office.Interop.Excel.Application
Dim objxlworkbooks As Microsoft.Office.Interop.Excel.Workbooks
Dim objxlabc As Microsoft.Office.Interop.Excel.Workbook
Dim sheet As Microsoft.Office.Interop.Excel.Worksheet
objxlapp = New Microsoft.Office.Interop.Excel.Application
objxlworkbooks = objxlapp.Workbooks
objxlabc = objxlworkbooks.Open("c:\abc.xls")
sheet = objxlabc.Worksheets(1)
sheet.Range("a1").Value = "hesam"
objxlabc.Save()
objxlabc.PrintOut()
objxlabc.Close()
objxlapp.Quit()

Afshin160
شنبه 17 شهریور 1386, 00:45 صبح
دوست عزیز می تونی از نسخه tiem suit VB.net 2005
استفاده کنی ...
خودش هم کامپونت excel هم داره...
اگر کد بدرد بخوری هم پیدا کری به من هم بده ..

aeafshin@gmail.com

odiseh
شنبه 17 شهریور 1386, 09:48 صبح
مثال زیر در خانه a1 مقدار hesam رو می نویسه و ذخیره میکنه و صفحه اکسل رو به چاپگر می فرسته اگه کد رو متوجه نشدی بگو تا بیشتر توضیح بدم

Dim objxlapp As Microsoft.Office.Interop.Excel.Application
Dim objxlworkbooks As Microsoft.Office.Interop.Excel.Workbooks
Dim objxlabc As Microsoft.Office.Interop.Excel.Workbook
Dim sheet As Microsoft.Office.Interop.Excel.Worksheet
objxlapp = New Microsoft.Office.Interop.Excel.Application
objxlworkbooks = objxlapp.Workbooks
objxlabc = objxlworkbooks.Open("c:\abc.xls")
sheet = objxlabc.Worksheets(1)
sheet.Range("a1").Value = "hesam"
objxlabc.Save()
objxlabc.PrintOut()
objxlabc.Close()
objxlapp.Quit()


سلام دوست عزیز
ممنون از لطفت. یه سوال: من توی برنامه ام وقتی رفرنس اونو به پروژه ام اضافه کردم و بعد توی بخش کد نوشتم:
Dim objxlapp As Microsoft.Office.Interop.Excel.Application
اصلا محیط برنامه ، انگار Object Library مربوط به Excel رو نمی شناخت و از من Error می گرفت.....
نمی دونم کجای کار ایراد داره؟