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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب مساعدة بسيطة hikmat 3 43 منذ 2 ساعة مضت
آخر رد: Rabeea Qbaha
  [كود] مساعدة في إكمال كود البحث بأكثر من جدول أبووسم 4 100 منذ 3 ساعة مضت
آخر رد: أبووسم
  مساعدة هامة جدا ashfgsm 18 298 19-10-17, 05:39 PM
آخر رد: WAEL ABED
  [VB.NET] مساعدة بخصوص mysql MOSTAFA.KAMEL 0 48 06-10-17, 07:30 AM
آخر رد: MOSTAFA.KAMEL
  مساعدة في حفظ ماهو مكتوب في textbox اوتوماتيكي trakktour 1 86 01-10-17, 10:30 PM
آخر رد: Amir_alzubidy
  مساعدة في الكود hikmat 0 42 27-09-17, 10:08 AM
آخر رد: hikmat
  [كود] مساعدة في عمل عضوية مميزة عبدالرحمن المكاوي 0 49 21-09-17, 05:51 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة safalo 3 86 19-09-17, 03:46 PM
آخر رد: أبو نوره
  [نقاش] مساعدة من حضراتكم salma.eg 1 63 15-09-17, 09:45 PM
آخر رد: أبو نوره
  [VB.NET] محتاج مساعدة من فضلكم asadtaif 2 100 15-09-17, 01:01 PM
آخر رد: asadtaif

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


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