主题：求教，有关设置表格样式

是成立的，这个判断没有问题，使用messagebox.show可以得出结果。Dim Style1 As XLS.Style = Book.NewStyle
Style1.Format = "yyyy-MM-dd"
For p1 as integer = 0 to Sheet.Cols.count -1
     if Sheet(0, p).Value Like "*日期*" then
        Sheet.Cols(p).Style = Style1
     end if
Next
跟这段代码应没有问题。测试过。