καλημέρα

Προσπαθώ από ένα πίνακα να διαβάσω τις εγγραφές και να τις κάνω εξαγωγή σε ένα 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 

Μυστήριο πράγμα το 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();

            }

        }

    }

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

Για να μπορέσεις να χρησιμοποιήσεις το 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