请教:打印出来的格式必须按照自己的要求,并且每个数据在固定的位置打印!谢谢各位高手多多指点!

我也用了水晶报表啊!但是有个问题啊!我在别的电脑上安装这个程序时,说那台电脑没有水晶报表,安装不上啊!我想用excel的方式打印我的数据!就是不知道应该怎么弄!代码怎么写

问题是我现在连把数据导入excel都不会啊!能不能给个导入实例啊!谢谢啦!我的QQ15471750,邮箱是[email]cumtsc@[/email]

现在有出现了一个问题,我怎么才能把值填入excel指定的单元格中呢????我查了一下网上的代码,但是不能运行
各位高手帮我看看是哪里出错啦!
 Dim x As String
        If OpenFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
            x = OpenFileDialog1.FileName
        End If
        Dim mExcel As Object = CreateObject("Excel.Application")
        Dim App As New Microsoft.Office.Interop.Excel.Application
        Dim xlBook As New Microsoft.Office.Interop.Excel.Workbook
        Dim xlSheet As New Microsoft.Office.Interop.Excel.Worksheet
        mExcel.Workbooks.Open(x)
        mExcel.Visible = True
        xlSheet.Cells(14, 4) = "0712001"
        App = Nothing '交还控制给Excel
        xlBook = Nothing
        xlSheet = Nothing

我现在又出现了一个问题啦！

我的代码是这样。在我电脑上运行没有问题，到别的电脑上时，就说什么office版本不对啦！不能安装程序啦！
Try
            
            '给excel表格填写值()
            Dim myexcel As New Microsoft.Office.Interop.Excel.Application
            myexcel.Workbooks.Open("cement.xls")

            myexcel.Cells(3, 9).value = TextBox4.Text
                        myexcel.Visible = True
        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            Dim pList() As System.Diagnostics.Process = System.Diagnostics.Process.GetProcessesByName("excel")
            For Each proc As System.Diagnostics.Process In pList
                'Try
                '    proc.Kill()
                'Catch ex As Exception
                '    MsgBox(ex.Message)
                'End Try
            Next

        End Try

我的代码里面Dim xlApp As New Excel.Application这一句必须是
Dim myexcel As New Microsoft.Office.Interop.Excel.Application
要不然VB2005就会报错！那是怎么会事啊？？