setDataFormat-methods(XLConnect)
setDataFormat-methods()所属R语言包:XLConnect
Specifying custom data formats for cell styles
指定自定义数据格式的单元格样式
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Specifies a custom data format for a cellstyle.
指定一个自定义的数据格式为一个cellstyle。
用法----------Usage----------
## S4 method for signature 'cellstyle'
setDataFormat(object,format)
参数----------Arguments----------
参数:object
The cellstyle to use
cellstyle使用
参数:format
A data format string
的数据格式字符串
Details
详细信息----------Details----------
Specifies the data format to be used by the corresponding cellstyle. Data formats are specified the standard Excel way. Refer to the Excel help or to the link below for more information.
指定的数据format将要使用对应的cellstyle。指定的数据格式标准的Excel方式。请参阅Excel帮助或下面的链接获取更多信息。
(作者)----------Author(s)----------
Martin Studer<br>
Mirai Solutions GmbH <a href="http://www.mirai-solutions.com">http://www.mirai-solutions.com</a>
参考文献----------References----------
http://www.ozgrid.com/Excel/CustomFormats.htm
参见----------See Also----------
workbook, cellstyle, setCellStyle, setStyleAction
workbook,cellstyle,setCellStyle,setStyleAction
实例----------Examples----------
# Load workbook (create if not existing)[负载工作簿(如果不存在创建)]
wb <- loadWorkbook("setDataFormat.xlsx", create = TRUE)
# Create a worksheet[创建一个工作表]
createSheet(wb, name = "cellstyles")
# Create a dummy data set with the current date/time (as POSIXct)[创建虚拟数据设置当前日期/时间(如POSIXct)]
now <- data.frame(Now = Sys.time())
# Write the value to the 'cellstyles' worksheet in the top left [将值写入工作表中的左上角“cellstyles”]
# corner (cell A1)[角(单元格A1)]
writeWorksheet(wb, now, sheet = "cellstyles", startRow = 1,
startCol = 1, header = FALSE)
# Create a custom anonymous cell style[创建一个自定义的匿名单元格样式]
cs <- createCellStyle(wb)
# Specify a custom data format[指定自定义的数据格式]
setDataFormat(cs, format = "dddd d-m-yyyy h:mm AM/PM")
# Set the cell style created above for the top left cell (A1) in [设置单元格样式在上面创建的左上角的单元格(A1)]
# the 'cellstyles' worksheet[,“cellstyles”工作纸]
setCellStyle(wb, sheet = "cellstyles", row = 1, col = 1, cellstyle = cs)
# Set column width to display whole time/date string[设置列宽,以显示整个时间/日期字符串]
setColumnWidth(wb, sheet = "cellstyles", column = 1, width = 6000)
# Save the workbook[保存工作簿]
saveWorkbook(wb)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|