由中国天气网提供
[不指定 2010/09/20 09:52 | by 白燕湾 ]

Office2010日历控件

[不指定 2017/07/14 14:51 | by 吕进 | Via 本站原创 ]
Office2010是不自带日历控件的,如何执行通过Office2003或Office2007编写的VB日历控件?

1、下载附件,解压后按说明执行相关操作;

2、进行VBA编辑器,附加日历控件;

3、关闭Excel文件后重新打开即可。

潘漠华:问美丽的姑娘

[不指定 2017/03/06 21:38 | by 吕进 | Via 本站原创 ]
晚天扯破了云裳,
美丽的姑娘,你告诉我,
织女将织些锦霞来补去。
夜半天星崩颓了一角,
美丽的姑娘,你告诉我,
那地上阴森的丛林下,
鬼火将飞蓬蓬的升上来补去。
假使我扯破我的网呢,
那网内是放着我一切美丽的梦,
日的梦,夜的梦,
太阳正当午时的梦;
美丽的姑娘,你告诉我,
我将采撷些什么来补呢?
点击在新窗口中浏览此图片

黄兴蓉:山果

[不指定 2016/10/06 18:04 | by 吕进 | Via 本站原创 ]
点击在新窗口中浏览此图片
我常抱怨日子过得不称心。我知道这么想没有什么可指责之处,人朝高处走,水往低处流嘛。但是怎么算过得好?应该和谁比?我不能说不模糊。前些日子我出了一趟远门,对这个问题好像有了一点感悟。
我从北京出发到云南元谋县,进入川滇边界,车窗外目之所及,都是荒山野岭。火车在沙窝站只停两分钟,窗外一群约十二三岁破衣烂衫的男孩和女孩,都背着背篓拚命朝车上挤,身上那巨大的背篓妨碍着他们。
我所在的车厢里挤上来一个女孩,很瘦,背篓里是满满一篓核桃。她好不容易地把背篓放下来,然后满巴掌擦着脸上的汗水,把散乱的头发抹到后面,露出俊俏的脸蛋儿,却带着菜色。半袖的土布小褂前后都是补丁,破裤子裤脚一长一短, 也满是补丁,显然是山里的一个穷苦女娃。
Tags: , ,

在ACCESS中用VBA设置EXCEL单元格的格式

[不指定 2016/09/25 09:29 | by 吕进 | Via 本站原创 ]
在ACCESS中用VBA更改EXCEL单格元格的格式可用以下代码:
Private Sub test5()                                                        'EXCEL单元格格式设置
Dim excelapplication As Object
Dim str As String
str = Application.CurrentProject.Path & "\book1.xls"
Set excelapplication = GetObject(str)                                      '获取指定的EXCEL文件
With excelapplication.sheets(1)
    .Range(.Cells(1, 1), .Cells(3, 4)).Borders.LineStyle = xlContinuous    '设置单元格的边框
    .Range(.Cells(1, 1), .Cells(3, 4)).Borders.ColorIndex = xlAutomatic    '设置单元格边框的颜色,可用1~56间的数字设置不同的颜色
    .Range(.Cells(1, 1), .Cells(3, 4)).NumberFormat = "0.00%"              '设置单元格的值以百分比的形式显示
    .Range(.Cells(1, 1), .Cells(3, 4)).interior.ColorIndex = 24            '设置单元格的颜色
    .Range(.Cells(1, 1), .Cells(3, 4)).Font.Bold = True                    '字体加粗
End With
End Sub
分页: 1/134 第一页 1 2 3 4 5 6 7 8 9 10 下页 最后页 [ 显示模式: 摘要 | 列表 ]