VB.net: كيفية الحصول على البيانات من ورقة عمل Excel إلى كائن سلسلة؟

StackOverflow https://stackoverflow.com/questions/1223515

  •  11-07-2019
  •  | 
  •  

سؤال

ولقد حاول هذا:

    'start Excel app
    Dim exApp As Microsoft.Office.Interop.Excel.Application
    exApp = CreateObject("Excel.Application")

    ' load excel document
    exApp.Workbooks.Open(fname)
    Dim exSheet As Microsoft.Office.Interop.Excel.Worksheet
    exSheet = exApp.Workbooks(1).Worksheets(1)

وومن، على سبيل المثال الوصول إلى "C3" خلية:

 Dim b As String
 b = exSheet.Cells("A3")

وأو:

b = exSheet.Cells(3,3)

وويلقي لي استثناء. أشعر بأني أفعل شيئا خاطئا مع وصول وجوه، ولكن نجاح هذه الطريقة في VB جزءا لا يتجزأ، ولا يعمل في صافي. أيضا، حاولت أن جوجل رمز الاستثناء، مع عدم وجود نتيجة ذات الصلة.

هل كانت مفيدة؟

المحلول

وجرب:

b = exSheet.Range("A3").Value.ToString

نصائح أخرى

وأنا لا أعتقد أنك يجب كتابة التعليمات البرمجية في أسلوب VB6 لvb.net.

وإذا نظرنا إلى المثال رمز، وأعتقد أن ما تحتاج إليه هو

b = exSheet.Cells(3,3).Text

أو

b = exSheet.Cells(3,3).Value

وتحرير: أعتقد أنه يجب أن يتم تعيين إشارة إلى مثيل مجموعة
. لذلك، رمز قد تبدو

Range exampleRange = exSheet.Cells(3,3)
b = exampleRange.Text 'OR it can be b = exampleRange.Value
مرخصة بموجب: CC-BY-SA مع الإسناد
لا تنتمي إلى StackOverflow
scroll top