精华内容
参与话题
问答
  • 读写EXCEL

    2015-04-25 20:50:55
    读写EXCEL
    

    准备:需要引用

    poi-3.10-FINAL-sources.jar

    poi-3.10-FINAL.jar

     

    读取EXCEL

    private void readExcel() throws IOException {
    
    		FileInputStream stream = new FileInputStream("C:\\1.xls");
    
    		HSSFWorkbook workbook = new HSSFWorkbook(stream);
    
    		HSSFSheet sheet = workbook.getSheetAt(0);
    		// private static final String CELL_REFERENCE_FILE = "B6";
    		CellReference fileReference = new CellReference(CELL_REFERENCE_FILE);
    
    		Row row;
    		Cell cell;
    		Iterator<Row> rowIterator = sheet.iterator();
    		
    		while (rowIterator.hasNext()) {
    			row = rowIterator.next();
    			
    			int currentRow = row.getRowNum();
    
    			if (currentRow == fileReference.getRow()) {
    				cell = row.getCell(fileReference.getCol());
    
    				System.out.println("Data is " + cell.getStringCellValue());
    			}
    		}
    		stream.close();
    
    	}
    



    EXCEL


    private void writeExcel(ArrayList<String> list) throws Exception {
    
    		String fileName="./"+projectName+"_File.xls";
    		File file = new File(fileName);
    		if (!file.exists())
    			file.createNewFile();
    
    		FileOutputStream out = new FileOutputStream(file, false);
    
    		CellStyle style = null;
    		CellStyle style1 = null;
    		HSSFWorkbook wb = new HSSFWorkbook();
    		Sheet sheet1 = wb.createSheet("TestResults");
    		
               //
    		style = wb.createCellStyle();
    		Font font=createFont(wb, "Calibri", false, (short) 11);
    
    	    style.setFont(font);
    		style.setAlignment(CellStyle.ALIGN_LEFT);
    		style.setWrapText(true);
    		
    		style1 = wb.createCellStyle();
    		HSSFColor color = wb.getCustomPalette().findColor((byte) 255, (byte) 255, (byte) 0);
    		Font font1=createFont(wb, "Calibri", true, (short) 11);
    		style1.setFont(font1);
    		style1.setFillPattern((short) 1);
    		style1.setAlignment(CellStyle.ALIGN_LEFT);
    		style1.setWrapText(true);
    		style1.setFillForegroundColor(color.getIndex());
    
    		for (int i = 0; i < list.size(); i++) {
    			Row rows = sheet1.createRow(i + 1);
    			Cell cell = rows.createCell(0);
    			if(list.get(i).endsWith(".c")||list.get(i).endsWith(".h"))
    			{
    				cell.setCellStyle(style);
    			}else
    			{
    	
    				cell.setCellStyle(style1);
    			}
    			cell.setCellValue(list.get(i));
    		}
    		sheet1.setColumnWidth(0, 80 * 256);
    		sheet1.setColumnWidth(1, 40 * 256);
    
    		wb.write(out);
    		out.close();
    	}
    	private Font createFont(HSSFWorkbook wb, String fontName, boolean isBold,
    			short height) {
    		Font font = null;
    		font = wb.createFont();
    		font.setFontName(fontName);
    		if (isBold) {
    			font.setBoldweight(HSSFFont.BOLDWEIGHT_BOLD);
    		}
    
    		font.setFontHeightInPoints(height);
    		return font;
    	}
    


    展开全文
  • Python开发 之 Python3读写Excel文件(较全)

    万次阅读 多人点赞 2018-10-17 10:17:52
    Python读写Excel文件用xlrd包读取Excel文件 用xlrd包读取Excel文件 用法比较简单。 import xlrd import xlwt import openpyxl from datetime import date,datetime arrayNum = 6 #array = {'L1':'','L2':'...

    1、Python中几种常用包比较

    在这里插入图片描述

    2、用xlrd包读取Excel文件

    2.1、用法

    2.1.1、引用包

    import xlrd
    

    2.1.2、打开文件

    xlrd.open_workbook(r'/root/excel/chat.xls')
    

    2.1.3、获取你要打开的sheet文件

        # 获取所有sheet
        sheet_name = workbook.sheet_names()[0]
    
        # 根据sheet索引或者名称获取sheet内容
        sheet = workbook.sheet_by_index(0) # sheet索引从0开始
    

    2.1.4、获取指定单元格里面的值

    sheet.cell_value(第几行,第几列)
    

    2.1.5、获取某行或者某列的值

        # 获取整行和整列的值(数组)
        rows = sheet.row_values(1) # 获取第2行内容
        cols = sheet.col_values(2) # 获取第3列内容
    

    2.1.6、获取sheet的名称,行数,列数

        # sheet的名称,行数,列数
        print (sheet.name,sheet.nrows,sheet.ncols)
    

    2.2、源码示例

    import xlrd
    from datetime import date,datetime
    
    arrayNum = 6
    #array = {'L1':'','L2':'','L3':'','L4':'','Question':'','Answer':''}
    tables = []
    newTables = []
    
    def read_excel():
        # 打开文件
        workbook = xlrd.open_workbook(r'/root/chat.xls')
        # 获取所有sheet
        sheet_name = workbook.sheet_names()[0]
    
        # 根据sheet索引或者名称获取sheet内容
        sheet = workbook.sheet_by_index(0) # sheet索引从0开始
        # sheet = workbook.sheet_by_name('Sheet1')
    
        #print (workboot.sheets()[0])
        # sheet的名称,行数,列数
        print (sheet.name,sheet.nrows,sheet.ncols)
    
        # 获取整行和整列的值(数组)
        rows = sheet.row_values(1) # 获取第2行内容
        # cols = sheet.col_values(2) # 获取第3列内容
        print (rows)
        # print (cols)
    
        for rown in range(sheet.nrows):
           array = {'L1':'','L2':'','L3':'','L4':'','Question':'','Answer':''}
           array['L1'] = sheet.cell_value(rown,0)
           array['L2'] = sheet.cell_value(rown,1)
           array['L3'] = sheet.cell_value(rown,2)
           array['L4'] = sheet.cell_value(rown,3)
           array['Question'] = sheet.cell_value(rown,4)
           array['Answer'] = sheet.cell_value(rown,5)
           tables.append(array)
    
        print (len(tables))
        #print (tables)
        #print (tables[5])
    if __name__ == '__main__':
        # 读取Excel
        read_excel();
        print ('读取成功')
        
    

    3、尽量不用xlwt包写入Excel文件

    3.1、原因

    在xlwt中生成的xls文件最多能支持65536行数据。

    3.2、如果写入过多,会报错

    由于数据太多,会报这个错误:

    ValueError: row index (65536)not an intin range(65536)错误
    

    3.3、源码示例

      # 1. 导入模块
      import xlwt
    def write_excel():
      # 2. 创建Excel工作薄
      myWorkbook = xlwt.Workbook()
      # 3. 添加Excel工作表
      mySheet = myWorkbook.add_sheet('A Test Sheet')
      # 4. 写入数据
      myStyle = xlwt.easyxf('font: name Times New Roman, color-index red, bold on', num_format_str='#,##0.00')   #数据格式
      mySheet.write(i, j, 1234.56, myStyle)
      mySheet.write(2, 0, 1)                          #写入A3,数值等于1
      mySheet.write(2, 1, 1)                          #写入B3,数值等于1
      mySheet.write(2, 2, xlwt.Formula("A3+B3"))      #写入C3,数值等于2(A3+B3)
      #5. 保存
      myWorkbook.save('excelFile.xls')
    if __name__ == '__main__':
        # 写入Excel
        write_excel();
        print ('写入成功') 
        
    

    4、用openpyxl包写入Excel文件

    4.1、用法

    4.1.1、引用包

    import openpyxl
    

    4.1.2、创建工作簿

        f = openpyxl.Workbook() #创建工作簿
    

    4.1.3、创建sheet

        sheet1 = f.create_sheet()
    

    4.1.4、设置每个单元格里面的值

     for jkey in range(len(newTables)):
        jk = 1
        for cT in range(arrayNum):
          jk = jkey + 1
          if cT == 0:
            sheet1.cell(row=jk,column=cT+1).value='1'
          else:
            sheet1.cell(row=jk,column=cT+1).value='2'
    

    4.1.5、保存文件

        f.save("chatPy.xlsx") #保存文件
    

    4.2、源码示例

    import openpyxl
    
    #写excel
    def write_excel():
        f = openpyxl.Workbook() #创建工作簿
    
        sheet1 = f.create_sheet()
        #sheet1 = f.add_sheet(u'sheet1',cell_overwrite_ok=True) #创建sheet
        row0 = [u'L1',u'L2',u'L3',u'L4',u'问题',u'答案']
    
        #生成第一行
        #for i in range(len(row0)):
        #    sheet1.cell(column=i,row=0).value='L1')
    
        #生成后续
    
        for jkey in range(len(newTables)): 
           jk = 1
           for cT in range(arrayNum):
             jk = jkey + 1
             if cT == 0:
               sheet1.cell(row=jk,column=cT+1).value='1'
             else:
               sheet1.cell(row=jk,column=cT+1).value='2'
               
        f.save("chatPy.xlsx") #保存文件
    
    if __name__ == '__main__':
        # 写入Excel
        write_excel();
        print ('写入成功')
       
    

    5、用xlsxwriter包写入Excel文件

    5.1、简介

    于是我找到了xlsxwriter这个模块,它生成的文件后缀名为.xlsx,最大能够支持1048576行数据,16384列数据

    5.2、用法

    5.2.1、引用包

    import xlsxwriter
    

    5.2.2、创建工作簿

      workbook = xlsxwriter.Workbook('demo1.xlsx')#创建一个excel文件
    

    5.2.3、创建sheet

      worksheet = workbook.add_worksheet(u'sheet1')#在文件中创建一个名为TEST的sheet,不加名字默认为sheet1
    

    5.2.4、设置每个单元格里面的值

      worksheet.write(3,0,35.5)#第4行的第1列设置值为35.5
    

    5.2.5、关闭工作簿

      workbook.close()
    

    5.3、源码示例

    import xlsxwriter
    
    #写excel
    def write_excel(): 
      workbook = xlsxwriter.Workbook('chat.xlsx')#创建一个excel文件
      worksheet = workbook.add_worksheet(u'sheet1')#在文件中创建一个名为TEST的sheet,不加名字默认为sheet1
     
      worksheet.set_column('A:A',20)#设置第一列宽度为20像素
      bold= workbook.add_format({'bold':True})#设置一个加粗的格式对象
     
      worksheet.write('A1','HELLO')#在A1单元格写上HELLO
      worksheet.write('A2','WORLD',bold)#在A2上写上WORLD,并且设置为加粗
      worksheet.write('B2',U'中文测试',bold)#在B2上写上中文加粗
     
      worksheet.write(2,0,32)#使用行列的方式写上数字32,35,5
      worksheet.write(3,0,35.5)#使用行列的时候第一行起始为0,所以2,0代表着第三行的第一列,等价于A4
      worksheet.write(4,0,'=SUM(A3:A4)')#写上excel公式
      workbook.close()
    
    if __name__ == '__main__':
        # 写入Excel
        write_excel();
        print ('写入成功')
       
    

    6、Github源码分享

    https://github.com/ShaShiDiZhuanLan/Demo_Excel_Python

    如果觉得写得不错,帮忙给 github的这个项目 点个star呗
    在这里插入图片描述

    展开全文
  • Java 操作Excel poi读写excel

    万次阅读 2018-10-21 10:45:46
    Java 操作Excel poi读写excel,excel导入导出(精简版) 1.所需jar包 下载地址:https://download.csdn.net/download/u014646662/10734734 2.源码 写操作(excel导出) package cn.com.tengen.excel; import...

    Java 操作Excel poi读写excel,excel导入导出(精简版)

    1.所需jar包

    下载地址:https://download.csdn.net/download/u014646662/10734734

    2.源码

    写操作(excel导出)

    package cn.com.tengen.excel;
    import java.io.File;
    import java.io.FileOutputStream;
    import java.io.IOException;
    import java.io.OutputStream;
    import java.util.ArrayList;
    import java.util.HashMap;
    import java.util.List;
    import java.util.Map;
    import java.util.Map.Entry;
    import java.util.Set;
    
    import org.apache.poi.hssf.usermodel.HSSFWorkbook;
    import org.apache.poi.ss.usermodel.Cell;
    import org.apache.poi.ss.usermodel.Row;
    import org.apache.poi.ss.usermodel.Sheet;
    import org.apache.poi.ss.usermodel.Workbook;
    import org.apache.poi.xssf.usermodel.XSSFWorkbook;
    /**
     * excel写操作
     * @author lucky
     *
     */
    public class ExcelWrite {
        private static final String EXCEL_XLS = "xls";
        private static final String EXCEL_XLSX = "xlsx";
        
        public static void main(String[] args) throws IOException {
        	ExcelWrite ew = new ExcelWrite();
        	//excel数据, key是sheet的名字
        	Map<String, List<List<String>>> dataSheets = new HashMap<>();
        	//excel中一个sheet的数据
        	List<List<String>> dataSheet = new ArrayList<>();
        	//excel的一行数据
        	List<String> row = new ArrayList<>();
        	//excel中一个单元的数据
        	row.add("aaaa");
        	row.add("aaaa");
        	row.add("aaaa");
        	dataSheet.add(row);
        	row = new ArrayList<>();
        	row.add("bbbbb");
        	row.add("bbbbb");
        	row.add("bbbbb");
        	dataSheet.add(row);
        	row = new ArrayList<>();
        	row.add("ccccc");       
        	row.add("ccccc");       
        	row.add("ccccc"); 
        	dataSheet.add(row);
        	dataSheets.put("aaa", dataSheet);
        	dataSheets.put("aab", dataSheet);
        	dataSheets.put("aac", dataSheet);
        	ew.writeExcel(dataSheets,"qqqq.xlsx");
        }
    
        /**
         * 创建一个excel <br>
         * @param dataSheets
         * @param file
         * @throws IOException
         */
        public void writeExcel(Map<String, List<List<String>>> dataSheets,String path) throws IOException {
        	
        	Workbook workBook = null;
        	OutputStream out = null;
        	File file = new File(path);
        	try {
        	workBook = getWriteWorkbok(file);
        	Set<Entry<String, List<List<String>>>> entrySet = dataSheets.entrySet();
        	for (Entry<String, List<List<String>>> dataSheet : entrySet) {
        		//创建sheet
        		Sheet sheet = workBook.createSheet(dataSheet.getKey());
        		List<List<String>> list = dataSheet.getValue();
        		if(list != null) {
        			for (int i = 0; i < list.size(); i++) {
        				//创建行
        				Row row = sheet.createRow(i);
        				List<String> dataRow = list.get(i);
        				if(dataRow != null) {
        					for (int j = 0; j < dataRow.size(); j++) {
        						//创建单元格
        						Cell cell = row.createCell(j);
        						cell.setCellValue(dataRow.get(j));
        					}
        				}
        			}
        		}
        		
    		}
        	out =  new FileOutputStream(file);
            workBook.write(out);
        	}finally {
        		if(workBook != null) {
        			workBook.close();
        		}
        		if(out != null) {
        			out.close();
        		}
        	}
        }
        
        
        /**
         * 判断Excel的版本,获取Workbook
         * @param file
         * @return
         * @throws IOException
         */
        private  Workbook getWriteWorkbok(File file) throws IOException{
        	
            Workbook wb = null;
            if(file.getName().endsWith(EXCEL_XLS)){     
                wb = new HSSFWorkbook();
            }else if(file.getName().endsWith(EXCEL_XLSX)){    
                wb = new XSSFWorkbook();
            }
            return wb;
        }
    
    }

    读excel(excel导入)

    package cn.com.tengen.excel;
    
    import java.io.FileInputStream;
    import java.io.IOException;
    import java.io.InputStream;
    import java.util.ArrayList;
    import java.util.HashMap;
    import java.util.Iterator;
    import java.util.List;
    import java.util.Map;
    import java.util.Map.Entry;
    import java.util.Set;
    
    import org.apache.poi.hssf.usermodel.HSSFWorkbook;
    import org.apache.poi.ss.usermodel.Cell;
    import org.apache.poi.ss.usermodel.CellType;
    import org.apache.poi.ss.usermodel.Row;
    import org.apache.poi.ss.usermodel.Sheet;
    import org.apache.poi.ss.usermodel.Workbook;
    import org.apache.poi.xssf.usermodel.XSSFWorkbook;
    
    public class ExcelRead {
    	private static final String EXCEL_XLS = "xls";
    	private static final String EXCEL_XLSX = "xlsx";
    
    
    
    	/**
    	 * 读取Excel
    	 * @param path
    	 * @return
    	 * @throws IOException
    	 */
    	public Map<String, List<List<String>>> readExcel(String path) throws IOException {
    
    		Workbook workbook = getWriteWorkbok(path);
    		//excel数据, key是sheet的名字
        	Map<String, List<List<String>>> dataSheets = new HashMap<>();
    		// Read the Sheet
    		for (int numSheet = 0; numSheet < workbook.getNumberOfSheets(); numSheet++) {
    			Sheet sheet = workbook.getSheetAt(numSheet);
    			if (sheet == null) {
    				continue;
    			}
    			//excel中一个sheet的数据
    	    	List<List<String>> dataSheet = new ArrayList<>();
    	    	dataSheets.put(sheet.getSheetName(), dataSheet);
    			
    			for (int rowNum = 0; rowNum <= sheet.getLastRowNum(); rowNum++) {
    				Row row = sheet.getRow(rowNum);
    				if (row != null) {
    					//excel的一行数据
    			    	List<String> dataRow = new ArrayList<>();
    			    	dataSheet.add(dataRow);
    					Iterator<Cell> it = row.cellIterator();
    					while(it.hasNext()) {
    						dataRow.add(getValue(it.next()));
    					}
    				}
    			}
    		}
    		return dataSheets;
    	}
    
    	/**
    	 * 获取单元格的值
    	 * @param row
    	 * @return
    	 */
    	private String getValue(Cell row) {
    		if (row.getCellType() == CellType.BOOLEAN) {
    			return String.valueOf(row.getBooleanCellValue());
    		} else if (row.getCellType() == CellType.NUMERIC) {
    			return String.valueOf(row.getNumericCellValue());
    		} else {
    			return String.valueOf(row.getStringCellValue());
    		}
    	}
    
    	/**
    	 * 判断Excel的版本,获取Workbook
    	 * 
    	 * @param file
    	 * @return
    	 * @throws IOException
    	 */
    	private Workbook getWriteWorkbok(String path) throws IOException {
    		if (path == null) {
    			throw new IOException("找不到文件,文件路径可能是null");
    		}
    		InputStream is = new FileInputStream(path);
    
    		if (path.endsWith(EXCEL_XLS)) {
    			return new HSSFWorkbook(is);
    		}
    		if (path.endsWith(EXCEL_XLSX)) {
    			return new XSSFWorkbook(is);
    		}
    		
    		is.close();
    		throw new IOException(path + " 不是Excel文件");
    	}
    	
    	
    	public static void main(String[] args) throws IOException {
    		ExcelRead er = new ExcelRead();
    		Map<String, List<List<String>>> readExcel = er.readExcel("qqqq.xlsx");
    		Set<Entry<String, List<List<String>>>> entrySet = readExcel.entrySet();
    		for (Entry<String, List<List<String>>> sheetsMap : entrySet) {
    			System.out.println("sheet: "+sheetsMap.getKey());
    			for(List<String> sheet:sheetsMap.getValue()) {
    				for (String value : sheet) {
    					System.out.print(value);
    					System.out.print("\t\t");
    				}
    				System.out.println();
    			}
    			System.out.println("---------------------------------------------------------");
    		}
    	}
    }
    

    对人工智能感兴趣的同学,可以点击以下链接:

    现在人工智能非常火爆,很多朋友都想学,但是一般的教程都是为博硕生准备的,太难看懂了。最近发现了一个非常适合小白入门的教程,不仅通俗易懂而且还很风趣幽默。所以忍不住分享一下给大家。点这里可以跳转到教程。

    https://www.cbedai.net/u014646662

    展开全文
  • c++读写excel

    2017-09-18 14:59:40
    c++实现读写excel电子表格c++实现读写excel电子表格c++实现读写excel电子表格c++实现读写excel电子表格c++实现读写excel电子表格c++实现读写excel电子表格
  • 读写excel

    千次阅读 2005-09-26 08:55:00
    用vb.net读写excel 注:首先需添加引用,选择COM-->选择Microsoft Excel Object Library组件1、建立内存表结构 createMemoryTable2、把表结构写入excel中代码如下:Public Class Form1 Inherits System....
    用vb.net读写excel 

    注:首先需添加引用,选择COM-->选择Microsoft Excel Object Library组件

    1、建立内存表结构 createMemoryTable
    2、把表结构写入excel中

    代码如下:


    Public Class Form1
        Inherits System.Windows.Forms.Form

        Dim sqlDs As New Data.DataSet       '数据在内存中的缓存
        Dim sqlTables As New Data.DataTable("sqltables") '数据表

    #Region " Windows 窗体设计器生成的代码 "

        Public Sub New()
            MyBase.New()

            '该调用是 Windows 窗体设计器所必需的。
            InitializeComponent()

            '在 InitializeComponent() 调用之后添加任何初始化

        End Sub

        '窗体重写 dispose 以清理组件列表。
        Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
            If disposing Then
                If Not (components Is Nothing) Then
                    components.Dispose()
                End If
            End If
            MyBase.Dispose(disposing)
        End Sub

        'Windows 窗体设计器所必需的
        Private components As System.ComponentModel.IContainer

        '注意: 以下过程是 Windows 窗体设计器所必需的
        '可以使用 Windows 窗体设计器修改此过程。
        '不要使用代码编辑器修改它。
        Friend WithEvents Button1 As System.Windows.Forms.Button
        Friend WithEvents DataGrid1 As System.Windows.Forms.DataGrid
        Friend WithEvents Button2 As System.Windows.Forms.Button
        Friend WithEvents Button3 As System.Windows.Forms.Button
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
            Me.Button1 = New System.Windows.Forms.Button
            Me.DataGrid1 = New System.Windows.Forms.DataGrid
            Me.Button2 = New System.Windows.Forms.Button
            Me.Button3 = New System.Windows.Forms.Button
            CType(Me.DataGrid1, System.ComponentModel.ISupportInitialize).BeginInit()
            Me.SuspendLayout()
            '
            'Button1
            '
            Me.Button1.Location = New System.Drawing.Point(152, 224)
            Me.Button1.Name = "Button1"
            Me.Button1.Size = New System.Drawing.Size(168, 32)
            Me.Button1.TabIndex = 0
            Me.Button1.Text = "写入excel"
            '
            'DataGrid1
            '
            Me.DataGrid1.DataMember = ""
            Me.DataGrid1.HeaderForeColor = System.Drawing.SystemColors.ControlText
            Me.DataGrid1.Location = New System.Drawing.Point(0, 8)
            Me.DataGrid1.Name = "DataGrid1"
            Me.DataGrid1.Size = New System.Drawing.Size(448, 152)
            Me.DataGrid1.TabIndex = 1
            '
            'Button2
            '
            Me.Button2.Location = New System.Drawing.Point(152, 176)
            Me.Button2.Name = "Button2"
            Me.Button2.Size = New System.Drawing.Size(168, 32)
            Me.Button2.TabIndex = 2
            Me.Button2.Text = "浏览内存表"
            '
            'Button3
            '
            Me.Button3.Location = New System.Drawing.Point(16, 280)
            Me.Button3.Name = "Button3"
            Me.Button3.Size = New System.Drawing.Size(424, 32)
            Me.Button3.TabIndex = 3
            Me.Button3.Text = "在datagrid中修改数据后,再重新写入excel,利用excel显示图例,汇总"
            '
            'Form1
            '
            Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
            Me.ClientSize = New System.Drawing.Size(456, 341)
            Me.Controls.Add(Me.Button3)
            Me.Controls.Add(Me.Button2)
            Me.Controls.Add(Me.DataGrid1)
            Me.Controls.Add(Me.Button1)
            Me.MaximizeBox = False
            Me.Name = "Form1"
            Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
            Me.Text = "Form1"
            CType(Me.DataGrid1, System.ComponentModel.ISupportInitialize).EndInit()
            Me.ResumeLayout(False)

        End Sub

    #End Region

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        End Sub

        '函数功能:在内存中建立一个表
        '输入参数:
        '输出参数:
        Private Sub createMemoryTable()

            sqlTables.Clear()

            '给数据表加入行标头
            sqlTables.Columns.Add("ID", GetType(String))
            sqlTables.Columns.Add("Name", GetType(String))
            sqlTables.Columns.Add("Age", GetType(Int16))

            '加入每一行数据
            Dim rowData As Data.DataRow
            rowData = sqlTables.NewRow

            '插入数据
            rowData("ID") = "1"
            rowData("Name") = "Loken"
            rowData("Age") = 24

            sqlTables.Rows.Add(rowData)

            '插入加一条记录
            rowData = sqlTables.NewRow
            rowData("ID") = "2"
            rowData("Name") = "Amada"
            rowData("Age") = 26

            sqlTables.Rows.Add(rowData)

            '把表插入到DataSet中
            sqlDs.Tables.Add(sqlTables)

        End Sub

        '将表中的内容写到excel中
        Private Sub writeExcel()
            Dim xlApp As New Excel.Application
            Dim xlbook As Excel.Workbook
            Dim xlsheet As Excel.Worksheet

            Dim rowIndex As Int16 = 1
            Dim colIndex As Int16 = 0

            xlbook = xlApp.Workbooks.Add
            xlsheet = xlApp.Sheets.Add

            '把列标头加入excel中
            Dim row As Data.DataRow
            Dim col As DataColumn

            For Each col In sqlDs.Tables("sqltables").Columns
                colIndex = colIndex + 1
                xlApp.Cells(1, colIndex) = col.ColumnName
            Next

            '把内容加入到excel中
            For Each row In sqlDs.Tables("sqltables").Rows
                rowIndex = rowIndex + 1
                colIndex = 0
                For Each col In sqlDs.Tables("sqltables").Columns
                    colIndex = colIndex + 1
                    xlApp.Cells(rowIndex, colIndex) = row.Item(colIndex - 1)
                    '下列语句也可
                    'xlApp.Cells(rowIndex, colIndex) = row(col.ColumnName)
                Next
            Next

            Try
                '设定风格
                With xlsheet
                    '设定标题为黑体
                    .Range(.Cells(1, 1), .Cells(1, colIndex)).Font.Name = "黑体"
                    '设定标格字体为加粗
                    .Range(.Cells(1, 1), .Cells(1, colIndex)).Font.Bold = True
                    '设定边框
                    .Range(.Cells(1, 1), .Cells(rowIndex, colIndex)).Borders.LineStyle = 1
                End With

                With xlsheet.PageSetup
                    .LeftHeader = "" & Chr(10) & "&""楷体_GB2312,常规""&10公司名称:" ' & Gsmc
                    .CenterHeader = "&""楷体_GB2312,常规""公司人员情况表&""宋体,常规""" & Chr(10) & "&""楷体_GB2312,常规""&10日 期:"
                    .RightHeader = "" & Chr(10) & "&""楷体_GB2312,常规""&10单位:"
                    .LeftFooter = "&""楷体_GB2312,常规""&10制表人:"
                    .CenterFooter = "&""楷体_GB2312,常规""&10制表日期:"
                    .RightFooter = "&""楷体_GB2312,常规""&10第&P页 共&N页"
                End With
            Catch
                MessageBox.Show(Err.Description)
            End Try

            xlApp.Visible = True

        End Sub

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            writeExcel()
        End Sub

        Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            '初始化表
            createMemoryTable()

            DataGrid1.SetDataBinding(sqlDs, "sqltables")
        End Sub

        Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

            '打开excel
            Dim xlApplication As New Excel.Application
            Dim xlBook As Excel.Workbook
            Dim xlSheet As Excel.Worksheet

            Dim filePath As String
            filePath = Application.StartupPath & "/book1.xls"

            '打开一个已经建立好的模板文件
            xlBook = xlApplication.Workbooks.Open(filePath)
            '将当前工作薄的第一个工作表赋给XSHEET对象
            xlSheet = xlBook.Sheets(1)

            xlApplication.Visible = True

            '把DataGrid中的数据写入
            Dim i As Int16
            Dim j As Int16

            For i = 0 To sqlDs.Tables("sqltables").Rows.Count - 1
                For j = 0 To sqlDs.Tables("sqltables").Columns.Count - 1
                    xlApplication.Cells(i + 2, j + 1) = DataGrid1.Item(i, j)  '从第二行开始写
                Next
            Next

        End Sub

        Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
            Application.Exit()
        End Sub
    End Class

    展开全文
  • poi3.9读写EXCEL

    2020-09-26 09:06:28
    poi3.9读写EXCEL 支持2007 poi3.9读写EXCEL 支持2007 poi3.9读写EXCEL 支持2007 poi3.9读写EXCEL 支持2007
  • excel文件读写excel文件读写excel文件读写
  • python读写excel

    2017-08-18 15:06:50
    这是一个python读写excel文件的脚本文件。并通过python生成exe,通过MFC调用exe读写excel。里面配有使用视频
  • wincc读写excel

    2019-04-01 16:42:52
    运用PLC设计时,关于如何用wincc读写excel的数据。
  • perl读写excel

    2012-10-11 14:02:48
    通过perl读写excel 通过perl读写excel 通过perl读写excel 通过perl读写excel
  • ExcelDemo_Excel导出_下载_POI读excel_JXL读写excel_java读写excel_列宽_读取合并或拆分单元格内容
  • 使用Java代码(POI)读写 Excel

    万次阅读 多人点赞 2020-01-07 19:49:59
    使用Java代码(POI)读写 Excel,这篇博客给出了实现逻辑并有完整的代码实现。
  • c++ 读写 Excel 表格 附带源码
  • C++ 读写Excel

    2018-12-07 17:52:22
    该文件中包含的是C++读写excel表的.cpp类,对整个excel单元格读写以及sheel操作使用微软自带的库进行操作Excel
  • 读写excel python

    2018-09-20 12:55:33
    python3 读写Excel python3 读写Excel Python—对Excel进行读写操作 xlrd
  • Python读写Excel

    2019-10-18 09:01:41
    Python读写Excel
  • MFC读写EXCEL表格

    2017-05-22 20:02:04
    MFC读写EXCEL表格数据
  • 在日常工作中,我们常常会进行Excel文件读写操作,这篇文章主要介绍了java读写excel文件实现POI解析Excel的方法,实例分析了java读写excel的技巧,非常具有实用价值,需要的朋友可以参考下
  • C# NPOI读写Excel

    2018-08-28 14:04:55
    用C#编写NPOI读写Excel,包括有NPOI里面的DLL文件下载,在已存在的Excel表格中插入数据
  • 主要介绍了OpenXml读写Excel代码分享,大家参考使用
  • c语言读写excel文档

    2018-05-07 16:55:06
    简单的读写excel文档中内容的演示程序,使用vs2005开发的。
  • c#代码读写excel数据demo,能实现读写EXCEL表格的数据。
  • C#读写Excel2003和Excel2007 C#读写Excel2003和Excel2007 C#读写Excel2003和Excel2007 C#读写Excel2003和Excel2007 C#读写Excel2003和Excel2007
  • 主要介绍了node读写Excel操作,结合实例形式分析了node.js使用node-xlsx模块模块读写Excel的相关实现技巧与操作注意事项,需要的朋友可以参考下
  • C++ 读写Excel

    2013-11-18 22:44:54
    C++ 读写Excel Demo,有兴趣的可以看看
  • MFC读写EXCEL表格.rar

    2020-04-22 14:01:25
    MFC读写EXCEL表格.rar
  • vc读写EXCEL

    2014-01-12 12:56:01
    vc读写EXCEL的内容,用的第三方类CSpreadSheet。
  • Java读写Excel实例分享

    2020-08-31 19:07:27
    本文主要分享了Java读写Excel的实例代码。具有一定的参考价值,下面跟着小编一起来看下吧
  • 易语言 读写 excel中的 超链接 ' excel的Hyperlink对象: ' 例:Hyperlink对象=excel对象.对象型方法 (“Range”, “B1”).读对象型属性 (“Hyperlinks”, ).读对象型属性 (“Item”, 1) ' 上面的语句可以得到...
  • 主要介绍了nodejs简单读写excel内容的方法,简单分析了nodejs常见的读写Excel模块,并结合实例形式分析了nodejs读写Excel具体操作技巧,需要的朋友可以参考下

空空如也

1 2 3 4 5 ... 20
收藏数 9,443
精华内容 3,777
关键字:

读写excel