04-12-20, 07:35 PM
(آخر تعديل لهذه المشاركة : 04-12-20, 07:42 PM {2} بواسطة technomedia.)
إستيراد أسماء زبائن من ملف Excel الى List box
الكود المستعمل Vb.net
.................................
لكن أريد فقط معرفة طريقة فتح ملف Excel دون ذكر مكان الملف
الكود المستعمل Vb.net
.................................
كود :
("Dim oExcel As Object = CreateObject("Excel.Application
("Dim oBook As Object = oExcel.Workbooks.Open("e:\1.xlsx
(Dim oSheet As Object = oBook.Worksheets(1
Dim i As Integer
Dim cell As String
For i = 0 To AscW(ListBox1.Items.Count.ToString()(i = i + 1)) - 1
(cell = "E" & Convert.ToString(i + 1
cell = oSheet.Range(cell).Value
If cell = "" Then
Exit For
Else
(ListBox1.Items.Add(cell
كود :
End If
Next
() oExcel.Quit
لكن أريد فقط معرفة طريقة فتح ملف Excel دون ذكر مكان الملف
قال الله تعالى:" وقلت استغفروا ربكم إنه كان غفارا يرسل السماء عليكم مدرارا و يمددكم بأموال وبنين ويجعل لكم جنات ويجعل لكم أنهار"
"أستغفر الله العظيم و أتوب إليه عدد ما كان و عدد مايكون و عدد الحركات و السكون"