تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في فتح ملف اكسيل موجود في Resources
#1
السلام عليكم ورحمة الله وبركاتة 

زي مهوة واضح عاوز افتح ملف اكسيل موجود في Resources
واغير بعض خلايا بداخلة بس يجي عند مرحلة فتح الملف ويجيب خطأ ممكن حد يصلح الكود 
 
الخطأ بيكون في السطر دة  خبرتي قليلة في مجال الفيجول بيسك ارجو المساعدة وطبعا على خبرتي المنيلة مش عارف الباقي صح ولا 
PHP كود :
 xlWorkBook xlApp.xlWorkSheet.Open("MyProgram.Resources"System.Reflection.Assembly.LoadFile("test")) 



PHP كود :
Imports Excel Microsoft.Office.Interop.Excel
Public Class insertdataar1
    Dim Myrs 
As New Resources.ResourceManager("MyProgram.Resources"System.Reflection.Assembly.GetExecutingAssembly)
 
   Dim xlApp As New Excel.Application
    Dim xlWorkBook 
As Excel.Workbook
    Dim xlWorkSheet 
As Excel.Worksheet

    Private Sub Button2_Click
(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.ClickButton1.Click

        xlWorkBook 
xlApp.xlWorkSheet.Open("MyProgram.Resources"System.Reflection.Assembly.LoadFile("test"))
 
                                           
        xlApp
.Visible False
        xlWorkSheet 
xlWorkBook.Sheets("START")
 
       With xlWorkSheet
            
.Range("A2").Value T1.Text
            
.Range("A3").Value T2.Text
            
.Range("A4").Value T3.Text
            
.Range("D5").Value T4.Text
            
.Range("K5").Value T5.Text
        End With
        insertdataar2
.Show()
 
       Me.Hide()

 
   End Sub 
الرد }}}}
تم الشكر بواسطة:
#2
(04-12-15, 12:25 AM)salahalmasry كتب :  وطبعا على خبرتي المنيلة مش عارف الباقي صح ولا 
ههههه والله انك ظريف , عموما اخي معظم الناس من مبرمجين وغيره يبحثون عن حلول لمشاكلهم في الانترنت وغيره .
وطالما انك تبحث فهذا شيء جميل .

لكن لم افهم شيء . انت تريد فتح ملف الـ Excel من الـ Resource  وحفظ التعديلات . ام فقط فتح الملف ؟
الرد }}}}
تم الشكر بواسطة: salahalmasry
#3
الي احتاجة
1-فتح الملف بدون الحفظ
2 -تصدير الملف ل PDF بعدين الاغلاق الملف وبرنامج الاكسيل
الرد }}}}
تم الشكر بواسطة:
#4
Dim filePath As String = Application.StartupPath & "\test.xlsx"
If System.IO.File.Exists(filePath) = False Then System.IO.File.WriteAllBytes(filePath, My.Resources.test)
xlWorkBook = xlApp.xlWorkSheet.Open(filePath)

و بعد ما تكمل الاجراءات تبعك على الملف قم بحذف الملف
الرد }}}}
تم الشكر بواسطة: salahalmasry
#5
السلام عليكم اخي myalsailamy جربت الكود حقك بس بيجيني خطأ هنا
xlWorkBook = xlApp.xlWorkSheet.Open(filePath)
الرد }}}}
تم الشكر بواسطة:
#6
ضع هنا رسالة الخطا التي تظهر لك
الرد }}}}
تم الشكر بواسطة: salahalmasry
#7
(مستحيل التعديل على ملف في الريسورس وحفظه )
لحمد لله رب العالمين على كل شي
الرد }}}}
تم الشكر بواسطة:
#8
انا مش عاوز احفظ الملف الهدف كلة ادخال بيانات معينة وتصدير النموزج ل pdf وبعدين اغلاق الملف بدون الحفظ
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 42 01-12-16, 03:09 AM
آخر رد: khalaroy
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 59 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عمل برنامج rabeh.ram 4 169 27-11-16, 12:29 AM
آخر رد: rabeh.ram
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 280 25-11-16, 11:57 AM
آخر رد: العزابي
  [سؤال] اداة Geckowebbroser التي موجود في لغة vb.net عبدالرحمن المكاوي 0 47 24-11-16, 03:54 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عرض البيانات في التقرير haiderkh 1 70 21-11-16, 11:24 PM
آخر رد: السرور
  مساعدة بخصوص Listbox CLARO 3 78 16-11-16, 06:15 PM
آخر رد: silverlight
  [VB.NET] مساعدة بسيطة في الكمبوبكس . أبووسم 3 82 16-11-16, 11:58 AM
آخر رد: أبووسم
  مساعدة فى برنامج ارسال رسائل sms للموبايل nabil.1710 2 71 13-11-16, 12:00 PM
آخر رد: أبوبكر سويدان
Question [سؤال] مشكلة محيرتني هل من مساعدة shwehdi4pc 14 2,089 10-11-16, 03:55 PM
آخر رد: أبوبكر سويدان

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم