تقييم الموضوع :
  • 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 وبعدين اغلاق الملف بدون الحفظ
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] طلب مساعدة في اصلاح بعض الاخطاء trakktour 18 198 أمس, 05:51 PM
آخر رد: trakktour
  طلب مساعدة في اضافة save & restore trakktour 8 139 أمس, 03:16 AM
آخر رد: trakktour
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 1 187 06-02-17, 02:44 AM
آخر رد: ٌRy SAEED
  مساعدة فى xml Mohamed20 2 100 02-02-17, 05:40 PM
آخر رد: Mohamed20
  [VB.NET] مساعدة في نقل الصنف من شاشه البحث الي فاتوره الشراء gmailali 6 219 24-01-17, 08:32 PM
آخر رد: gmailali
  [كود] مساعدة في كود keyDown المبرمج العبقري 2 97 23-01-17, 01:49 AM
آخر رد: مساعدة
  [VB.NET] مساعدة في بحث CoderMM 0 75 22-01-17, 06:02 PM
آخر رد: CoderMM
  [VB.NET] اخ مساعدة الرجاء النظر الي هذا موضوع 3asfa~mdmra 5 193 21-01-17, 12:33 AM
آخر رد: 3asfa~mdmra
  [VB.NET] مساعدة حول تحيديث بينات جدول من جدول آخر kassa djeffal 1 82 19-01-17, 09:16 PM
آخر رد: ahmed.nabil
  [VB.NET] مساعدة لنشر موقعي safa 1 99 18-01-17, 11:11 AM
آخر رد: أبو عمر

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


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