功能:
返回或设置指定单元格区域所有列的列宽。 读/写。
语法:
rng.ColumnWidth
rng表示一个 Range 对象。
说明:
一个列宽单位等于“常规”样式中一个字符的宽度。 对于比例字体,会使用字符 0(零)的宽度。
使用 AutoFit 方法可基于单元格的内容设置列宽。
使用 Width 属性可返回以磅为单位的列宽。
如果相应范围内的所有列都具有相同的列宽,ColumnWidth 属性会返回该列宽。 如果相应范围内的列具有不同的列宽,此属性会返回 空。
示例:
以下示例将工作表 Sheet1 上 A 列的列宽变为两倍列宽。
import xlwings as xw
from xlwings import constants as con
app=xw.App()
bk=app.books.active
sht=bk.sheets.active
rng=sht.api.Columns('A')
rng.ColumnWidth=rng.ColumnWidth*2
点这里看视频课程
功能:返回或设置指定单元格区域所有列的列宽。 读/写。语法:rng.ColumnWidthrng表示一个 Range 对象。说明:一个列宽单位等于“常规”样式中一个字符的宽度。 对于比例字体,会使用字符 0(零)的宽度。使用 AutoFit 方法可基于单元格的内容设置列宽。使用 Width 属性可返回以磅为单位的列宽。如果相应范围内的所有列都具有相同的列宽,ColumnWidth 属性会返回该列宽。 如果相应范围内的列具有不同的列宽,此属性会返回 空。示例:以下示例将工作表 Sheet
UsageDependencyimplementation 'io.moyuru:timetablelayout:1.0.0-alpha01'LayoutManagerrecyclerView.layoutManager = TimetableLayoutManager(columnWidth, heightPerMin) { position ->
val period = periods[position] TimetableLayoutManager.PeriodInfo(period.startAt, period.endAt, period.stageNumber)
}ItemDecorationrecyclerView.addItemDecoration(ProgramTimeLabelDecoration(context, periods, heightPerMin))
recyclerView.addItemDecoration(StageNameDecoration(context, periods, columnCount))class ProgramTimeLabelDecoration(private val periods: List<Period>, ...) : TimeLabelDecoration(...) { private val formatter = DateTimeFormatter.ofPattern("HH:mm") override fun canDecorate(position: Int): Boolean = periods.getOrNull(position) is Program
override fun getStartUnixMillis(position: Int): Long = periods.getOrNull(position)?.startAt ?: 0
override fun formatUnixMillis(unixMillis: Long): String =
LocalDateTime.ofEpochSecond(unixMillis / 1000, 0, ZoneOffset.UTC).format(formatter)
}class StageNameDecoration(private val periods: List<Period>, ...) : ColumnNameDecoration(...) { override fun getColumnNumber(position: Int): Int { return periods.getOrNull(position)?.stageNumber ?: 0
} override fun getColumnName(columnNumber: Int): String { return when (columnNumber) { 0 -> "Melodic Hardcore"
1 -> "Metalcore"
2 -> "Hardcore"
3 -> "Deathcore"
else -> "Djent"
}SampleFeatures Vertical Scroll Horizontal Scroll Horizontal Loop Non Horizontal Loop Column Name Decoration Time Decoration Current Time Decoration Multi Column Scrollbar Pinch To Zoom
Excel = actxGetRunningServer('Excel.Application');
catch
% 创建一个Microsoft Excel服务器,返回句柄Excel
Excel = actxserver('Excel.Application');
% 设置Excel服务器为可见状态
Excel.Visible = 1; % set(Excel, 'Visible', 1);
% 若测试文件存在,打开该测试文件,否则,新建一个工作簿,并保存,文件名为测试.Excel
if exist(filespec_user,'file');
Workbook = Excel.Workbooks.Open(filespec_user);
% Workbook = invoke(Excel.Workbooks,'Open',filespec_user);
Workbook = Excel.Workbooks.Add;
% Workbook = invoke(Excel.Workbooks, 'Add');
Workbook.SaveAs(filespec_user);
% 返回当前工作表句柄
Sheets = Excel.ActiveWorkbook.Sheets; % Sheets = Workbook.Sheets;
Sheet1 = Sheets.Item(1); % 返回第1个表格句柄
Sheet1.Activate; % 激活第1个表格
% 页面设置
Sheet1.PageSetup.TopMargin = 60; % 上边距60磅
Sheet1.PageSetup.BottomMargin = 45; % 下边距45磅
Sheet1.PageSetup.LeftMargin = 45; % 左边距45磅
Sheet1.PageSetup.RightMargin = 45; % 右边距45磅
% 设置行高和列宽
% 定义行高向量RowHeight
RowHeight = [26,22,15,29,37,29,29,25,25,36,280,31,40,29,15,24]';
% 设置Range对象(从A1到A16)的行高
Sheet1.Range('A1:A16').RowHeight = RowHeight;
% 设置Range对象(从A1到H1)的列宽
Sheet1.Range('A1:H1').ColumnWidth = [9,15,9,9,9,9,9,9];
% 合并单元格
Sheet1.Range('A1:H1').MergeCells = 1;
Sheet1.Range('A2:H2').MergeCells = 1;
Sheet1.Range('A8:A9').MergeCells = 1;
Sheet1.Range('B8:D8').MergeCells = 1;
Sheet1.Range('E8:H8').MergeCells = 1;
Sheet1.Range('B9:D9').MergeCells = 1;
Sheet1.Range('E9:H9').MergeCells = 1;
Sheet1.Range('A10:H10').MergeCells = 1;
Sheet1.Range('A11:H11').MergeCells = 1;
Sheet1.Range('A12:H12').MergeCells = 1;
Sheet1.Range('A13:H13').MergeCells = 1;
Sheet1.Range('A14:H14').MergeCells = 1;
Sheet1.Range('D16:H16').MergeCells = 1;
% 设置单元格的边框
Sheet1.Range('A4:H14').Borders.Weight = 3;
Sheet1.Range('A10:H12').Borders.Item(3).Linestyle = 0;
Sheet1.Range('A10:H12').Borders.Item(4).Linestyle = 0;
Sheet1.Range('A13:H13').Borders.Item(4).Linestyle = 0;
Sheet1.Range('A14:H14').Borders.Item(3).Linestyle = 0;
% 设置单元格对齐方式
Sheet1.Range('A1:H9').HorizontalAlignment = 3;
Sheet1.Range('A4:A9').HorizontalAlignment = 6;
Sheet1.Range('C4:C7').HorizontalAlignment = 6;
Sheet1.Range('E4:E7').HorizontalAlignment = 6;
Sheet1.Range('G4:G7').HorizontalAlignment = 6;
Sheet1.Range('A10:H10').HorizontalAlignment = 6;
Sheet1.Range('A11:H11').HorizontalAlignment = 6; % -4130
Sheet1.Range('A11:H11').VerticalAlignment = 1;
Sheet1.Range('A12:H12').HorizontalAlignment = 4;
Sheet1.Range('A13:H13').VerticalAlignment = 1;
Sheet1.Range('A14:H14').HorizontalAlignment = 4;
Sheet1.Range('D16:H16').HorizontalAlignment = 4;
% 写入单元格内容
Sheet1.Range('A1').Value = '试 卷 分 析';
Sheet1.Range('A2').Value = '( 2009 — 2010 学年 第一学期)';
Sheet1.Range('A4:H4').Value = {'课程名称','','课程号',...
'','任课教师学院','','任课教师',''};
Sheet1.Range('A5:H5').Value = {'授课班级','','考试日期',...
'','应考人数','','实考人数',''};
Sheet1.Range('A6:H6').Value = {'出卷方式','','阅卷方式',...
'','选用试卷A/B','','考试时间',''};
Sheet1.Range('A7:H7').Value = {'考试方式','','平均分',...
'','不及格人数','','及格率',''};
Sheet1.Range('A8').Value = '成绩分布';
Sheet1.Range('B8').Value = '90分以上 人占 %';
Sheet1.Range('E8').Value = '80---89分 人占 %';
Sheet1.Range('B9').Value = '70---79分 人占 %';
Sheet1.Range('E9').Value = '60---69分 人占 %';
Sheet1.Range('A10').Value = ['试卷分析(含是否符合教学大纲、难度、知识覆'...
'盖面、班级分数分布分析、学生答题存在的共性问题与知识掌握情况、教学中'...
'存在的问题及改进措施等内容)'];
Sheet1.Range('A12').Value = '签字 : 年 月 日';
Sheet1.Range('A13').Value = '教研室审阅意见:';
Sheet1.Range('A14').Value = '教研室主任(签字): 年 月 日';
Sheet1.Range('D16').Value = '主管院长签字: 年 月 日';
% 设置字号
Sheet1.Range('A4:H12').Font.size = 10.5; % 设置单元格A4至H12的字号为10.5
Sheet1.Range('A1').Font.size = 16; % 设置单元格A1的字号为16
Sheet1.Range('A1').Font.bold = 2; % 单元格A1的字体加粗
% 插入图片,如果当前工作表中有图形存在,通过循环将图形全部删除
Shapes = Sheet1.Shapes; % 返回第1个工作表的Shapes接口的句柄
if Shapes.Count ~= 0;
for i = 1 : Shapes.Count;
Shapes.Item(1).Delete; % 删除第1个Shape对象
% 产生均值为75,标准差为4的正态分布随机数,画直方图,并设置图形属性
zft = figure('units','normalized','position',...
[0.280469 0.553385 0.428906 0.251302],'visible','off'); % 新建图形窗口,设为不可见
set(gca,'position',[0.1 0.2 0.85 0.75]); % 设置坐标系的位置和大小
data = normrnd(75,4,1000,1); % 产生均值为75,标准差为4的正态分布随机数
hist(data); % 绘制正态分布随机数的频数直方图
grid on; % 添加参考网格
xlabel('考试成绩'); % 为X轴加标签
ylabel('人数'); % 为Y轴加标签
hgexport(zft, '-clipboard'); % 将直方图复制到剪贴板
% 选中工作表Sheet1的A11单元格,插入由MATLAB命令作出的直方图
Sheet1.Range('A11').Select;
Sheet1.Paste % Sheet1.PasteSpecial;
delete(zft); % 删除图形句柄
Workbook.Save % 保存文档
range.NumberFormatLocal = "@"; //
设置单元格格式为文本
range = (
Range)worksheet.get_
Range("A1", "E1"); //获取Excel多个单元格区域:本例做为Excel表头
range.Merge(0); //单元格合并动作
worksheet.Cells[1, 1] = "Excel单元格赋值"; //Excel单元格赋值
range.Font.Size = 15; //
设置字体大小
range.Font.Underline=true; //
设置字体是否有下划线
range.Font.Name="黑体";
设置字体的种类
range.HorizontalAlignment=XlHAlign.xlHAlignCenter; //
设置字体在单元格内的对其方式
range.
ColumnWidth=15; //
设置单元格的宽度
range.Cells.Interior.Color=System.Drawing.Color.FromArgb(255,204,153).ToArgb(); //
设置单元格的背景色
range.Borders.LineStyle=1; //
设置单元格边框的粗细
range.BorderAround(XlLineStyle.xlContinuous,XlBorderWeight.xlThick,XlColorIndex.xlColorIndexAutomatic,System.Drawing.Color.Black.ToArgb()); //给单元格加边框
range.Borders.get_Item(Microsoft.Office.Interop.Excel.XlBordersIndex.xlEdgeTop).LineStyle = Microsoft.Office.Interop.Excel.XlLineStyle.xlLineStyleNone; //
设置单元格上边框为无边框
range.Entire
Column.AutoFit(); //自动调整
列宽
Range.HorizontalAlignment= xlCenter; // 文本水平居中方式
Range.VerticalAlignment= xlCenter //文本垂直居中方式
Range.WrapText=true; //文本自动换行
Range.Interior.ColorIndex=39; //填充颜色为淡紫色
Range.Font.Color=clBlue; //字体颜色
xlsApp.DisplayAlerts=false; //保存Excel的时候,不弹出是否保存的窗口直接进行保存
====================================================================
using System;
using System.Collections.Generic;
using System.Text;
using System.Reflection;
using System.Runtime.InteropServices;
using Microsoft.Office.Interop.Excel;
using ExcelApplication = Microsoft.Office.Interop.Excel.ApplicationClass;
using System.IO;
namespace ExcalDemo
public class ExcelFiles
public void CreateExcelFiles()
ExcelApplication excel = new ExcelApplication();
excel.Visible = false;// 不显示 Excel 文件,如果为 true 则显示 Excel 文件
excel.Workbooks.Add(Missing.Value);// 添加工作簿
Worksheet sheet = (Worksheet)excel.ActiveSheet;// 获取当前工作表
Range range = null;// 创建一个空的单元格对象
range = sheet.get_
Range("A1", Missing.Value);// 获取单个单元格
range.RowHeight = 20; //
设置行高
range.
ColumnWidth = 20; //
设置列宽
range.Borders.LineStyle = 1; //
设置单元格边框
range.Font.Bold = true; // 加粗字体
range.Font.Size = 20; //
设置字体大小
range.Font.ColorIndex = 5; //
设置字体颜色
range.Interior.ColorIndex = 6; //
设置单元格背景色
range.HorizontalAlignment = XlHAlign.xlHAlignCenter;//
设置单元格水平居中
range.VerticalAlignment = XlVAlign.xlVAlignCenter;//
设置单元格垂直居中
range.Value2 = "
设置行高和
列宽";//
设置单元格的值
range = sheet.get_
Range("B2", "D4");// 获取多个单元格
range.Merge(Missing.Value); // 合并单元格
range.
Columns.AutoFit(); //
设置列宽为自动适应
range.NumberFormatLocal = "#,##0.00";//
设置单元格格式为货币格式
//
设置单元格左边框加粗
range.Borders[XlBordersIndex.xlEdgeLeft].Weight = XlBorderWeight.xlThick;
//
设置单元格右边框加粗
range.Borders[XlBordersIndex.xlEdgeRight].Weight = XlBorderWeight.xlThick;
range.Value2 = "合并单元格";
// 页面
设置
sheet.PageSetup.PaperSize = XlPaperSize.xlPaperA4; //
设置页面大小为A4
sheet.PageSetup.Orientation = XlPageOrientation.xlPortrait; //
设置垂直版面
sheet.PageSetup.HeaderMargin = 0.0; //
设置页眉边距
sheet.PageSetup.FooterMargin = 0.0; //
设置页脚边距
sheet.PageSetup.LeftMargin = excel.InchesToPoints(0.354330708661417); //
设置左边距
sheet.PageSetup.RightMargin = excel.InchesToPoints(0.354330708661417);//
设置右边距
sheet.PageSetup.TopMargin = excel.InchesToPoints(0.393700787401575); //
设置上边距
sheet.PageSetup.BottomMargin = excel.InchesToPoints(0.393700787401575);//
设置下边距
sheet.PageSetup.CenterHorizontally = true; //
设置水平居中
// 打印文件
sheet.PrintOut(Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
// 保存文件到程序运行目录下
sheet.SaveAs(Path.Combine(System.Windows.Forms.Application.StartupPath,"demo.xls"), Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
excel.ActiveWorkbook.Close(false, null, null); // 关闭 Excel 文件且不保存
catch (Exception ex)
MessageBox.Show(ex.Message);
finally
excel.Quit(); // 退出 Excel
excel = null; // 将 Excel 实例
设置为空
生成excel的时候提示:不能设类Range的Columnwidth属性。
可能是因为设置Columnwidth的值过大或过小,本人在做程序时遇到因Query字段值设置过大,在比较DBGRID宽度与字段宽度取最大值时,发现值比较值大,就会出现这种错误。
直销系统时发生。DELPHI 5
高级控件-网格视图
Advanced controls - Grid view
GridView 跟ListView 很类似,Listview 主要以列表形式显示数据,GridView 则是以网格形式显示数据。
GridView主要通过使用自定义BaseAdapter 来适配数据,进而显示到GridView中,步骤如下:
1. 准备数据源
list = new ArrayList<Map<String, Object>>();
2.为数据源
设置适配器
MyAdapter adapter = new MyAdapter();
3. 将适配过后的数据显示在GridView 上
gridView.setAdapter(adapter);
网格视图GridView
网格视图GridView
GridView支持的XML
属性如表5所示:
高级控件-网格视图
Advanced controls - Grid view
android:
columnWidth
用于
设置列的宽度
android:gravi
For j = 1 To 9
'设置第一行的第一列、第二列、第三列、第四列的单元格宽度
If i = 1 And (j = 1 Or j = 2 Or j = 3 Or j = 4) Then
Range(rng.Offset(i - 1, j - 1), rng.Offset(i, j - 1)).ColumnWidth = 40
End If
'创建单元格
Cells(rng.Row + i - 1, rng.Column + j - 1) = i * j
Next j
Next i
End Sub