小编E R*_*E R的帖子

我正在使用visual studio 2013,visual basic,windows Forms处理excel文件.

• 我将新工作表添加到名为sheetReport的excel中

如何将widthb 的列更改为30？

我不需要使用autofit,因为它使文本变小以适应单元格的默认宽度.

xlApp = CreateObject("Excel.Application")
xlApp.Visible = False
xlBook = xlApp.Workbooks.Open(FileName)
SheetReport = CType(xlBook.Sheets.Add(), Excel.Worksheet)
SheetReport.Name = "Report"
SheetReport.Range("B2").Value = "Agent Name"
' need resize column b

我使用下面的代码减去两个日期

Dim OpenDate, ClosedDate As DateTime
dim Result as String
OpenDate = Convert.ToDateTime(some string contain date and time)
ClosedDate = Convert.ToDateTime(some string contain date and time)
Result = ClosedDate.Subtract(OpenDate).ToString

它的格式正确,结果正常(day.hour:minute:second)

我需要的是什么

如果关闭和开放日期之间的期间包含星期五或星期六从结果中减去

防爆.如果结果9.03:02:10包含2周六和周五,则必须是6.03:02:10,依此类推