Πρώτα Βήματα - Γλώσσες προγραμματισμού

Απ: Export sqlData to Ecel erro : xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

manosB — Wed, 23 Jul 2014 16:04:00 GMT

Για να μπορέσεις να χρησιμοποιήσεις το interop πρέπει πρώτα να κάνεις add reference από το COM tab το Microsoft Excel xx.0 Object library. Εγώ που έχω office 2010 είναι η Microsoft Excel 14.0 Object library.

Κάτι δεν μου αρέσει στον κώδικά σου. Γιατί ξαναθέτεις το xlApp. Δεν παίζει αυτό που γράφεις.

Πάρε Copy paste ένα working example. Επειδή όλα μου τα παραδείγματα είναι σε C# πάρε Πχ δεύτερο αποτέλεσμα στο Google για vb.net.

http://www.dotnetperls.com/excel-vbnet

Απ: Export sqlData to Ecel erro : xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

anthou — Fri, 18 Jul 2014 16:07:16 GMT

Ευχαριστώ φίλε μου θα το δοκιμάσω

Απ: Export sqlData to Ecel erro : xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

dimos.homatas — Thu, 17 Jul 2014 21:45:21 GMT

Μυστήριο πράγμα το office interop... το χρησιμοποιώ μόνο όταν χρειάζομαι την φουλ δύναμη του Excel, πχ να διαβάσω την εμφάνιση κάποιων cells ή άλλα χαρακτηριστικά τους.

Για δες μήπως μπορείς να κάνεις την δουλειά σου με αυτό το snippet... το χρησιμοποιώ για export κατά κόρον:

public class WorkbookEngine

{

public static void CreateWorkbook(DataSet ds, string file)

{

XmlDataDocument xmlDataDoc = new XmlDataDocument(ds);

XslTransform xt = new XslTransform();

using (StreamReader reader = new StreamReader(typeof(WorkbookEngine).Assembly.GetManifestResourceStream(typeof(WorkbookEngine), "Excel.xsl")))

using (XmlTextReader xRdr = new XmlTextReader(reader))

using (StringWriter sw = new StringWriter())

using (StreamWriter myWriter = new StreamWriter(file))

{

xt.Load(xRdr, null, null);

xt.Transform(xmlDataDoc, null, sw, null);

myWriter.Write(sw.ToString());

myWriter.Close();

}

Export sqlData to Ecel erro : xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

anthou — Thu, 17 Jul 2014 17:48:08 GMT

καλημέρα

Προσπαθώ από ένα πίνακα να διαβάσω τις εγγραφές και να τις κάνω εξαγωγή σε ένα Excel

Όμως έχω το παρακάτω λάθος :

xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

(Interop type 'ApplicationClass' cannot be embedded. Use the applicable interface instead)

Ο σχετικός κώδικας είναι

Dim i, j As Integer

Dim xlApp As New Microsoft.Office.Interop.Excel.Application

Dim xlWorkBook As Microsoft.Office.Interop.Excel.Workbook

Dim xlWorkSheet As Microsoft.Office.Interop.Excel.Worksheet

Dim misValue As Object = System.Reflection.Missing.Value

xlApp = New Microsoft.Office.Interop.Excel.ApplicationClass

xlWorkBook = xlApp.Workbooks.Add(misValue)

xlWorkSheet = xlWorkBook.Sheets("sheet1")

Dim sql As String = "SELECT * FROM kinisi"

κλπ

.......

Υπάρχει κάποια άποψη για να λύσω το πρόβλημα η κάποια άλλη άποψή για την δημιουργία σε Excel