哎,office都有宏录制器,为什么还有这么多人问VBA的问题呢

解决方案 »

  1.   

    VB中是这样的
    Dim xlsApp   As New Excel.Application
    Dim xlsBook   As New Excel.Workbook
    Dim xlsSheet   As New Excel.Worksheet
    Set xlsApp = CreateObject("Excel.Application")
    Set xlsSheet = xlsBook.Worksheets(1)
       xlsSheet.Name = "表1"
    你参考下改改呢
      

  2.   

    用OLEDB链接,用SQL语句改,不知道可行否用VBA必须要安装EXCEL
      

  3.   

    不是啊,我要的是用c#更改表名,如:原来提sheet1,改成out
      

  4.   

    http://www.codeproject.com/aspnet/getsheetnames.asp
    这上面有获取Excel sheet的代码 参考着改一下就行了
      

  5.   

    获得sheet后直接sheet.Name="new";就可以了
    获得sheet可以这样 Worksheet sheet=(Worksheet)wb.Sheets["name"];
    创建wb用xlApp.Workbooks.Open
    xlApp=new Microsoft.Office.Iterop.Excel.Application();
      

  6.   

    Worksheet sheet=(Worksheet)wb.Sheets["name"]
    这个必须要加入Excel的命名空间才行吧
      

  7.   

            #region 获取excel工作表的表名
            public string[] GetExcelName()
            {
                System.Data.DataTable TableSheet = null;
                string[] SheetName = null;
                try
                {
                    connection.Open();
                    TableSheet = connection.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, null);
                    if (TableSheet == null)
                    {
                        return null;
                    }
                    else
                    {
                        SheetName = new string[TableSheet.Rows.Count];
                        int i = 0;
                        foreach (DataRow myRow in TableSheet.Rows)
                        {
                            string strTemp = myRow["TABLE_NAME"].ToString();
                            SheetName[i] = strTemp.Substring(0, strTemp.Length - 1);
                            i++;
                        }
                    }
                }
                catch (Exception ex)
                {
                    throw new Exception(ex.Message);
                }
                finally
                {
                    connection.Close();
                }
                return SheetName;
            }
            #endregion
    这是获取工作表名的啊