摘要：
'打印过的文档自动删除在Thisworkbook中写如下代码：View Code 1 Public m As Integer 2 3 Private Sub Workbook_BeforeClose(Cancel As Boolean) 4 On Error Resume Next 5 If m = 1 Then 6 Application.DisplayAlerts = False 7 ActiveWorkbook.ChangeFileAccess xlReadOnly 8 Kill ActiveWorkbook.FullName 9 ThisWorkbook.Close False 阅读全文
摘要：
如果在一列中存入不规则的海量数据，数字和字符串混合，现在需要提取数字，总共总结出下面四中方法，依据运行速度快慢依次排列，推荐使用前三种方法：第一种：数组方法，速度最快 1 Sub y3231057_1() 2 t = Timer 3 Dim Arr, i&, j%, k&, S$, SS$, Str$ 4 Dim Arr1() As Single 5 Arr = Range("A1:A" & [a65536].End(xlUp).Row) 6 k = UBound(Arr) 7 ReDim Arr1(1 To k, 1 To 1) 8 For i = 阅读全文
摘要：
用VBA录制的查找Cells.Find(What:="想查找的数据", After:=ActiveCell,LookIn:=xlValues, LookAt:= xlPart, SearchOrder:=xlByColumns,SearchDirection:=xlNext, MatchCase:=False).ActivateFind 方法 在区域内查找特定信息，并返回Range对象，该对象代表所找到的第一个包含所查找信息的单元格。如果未发现匹配单元格，就返回 Nothing。本方法不影响选定区域或活动单元格。 关于在Visual Basic中使用Find工作表函数的详细 阅读全文
摘要：
SPFieldLookupValue对象即为查阅项的值，它有两个属性，分别是LookupId和LookupValue，LookupId为此查阅项的值在数据源List中的ItemID，LookupValue为此查阅项的值在数据源List中所对应的值，一般构造语句为SPFieldLookupValue myValue = new SPFieldLookupValue(LookupId, LookupValue)，其默认Display出来的值得格式为“LookupId,#;LookupValue” 阅读全文
摘要：
条件 明细Eq EqualsNeq Not equalGt Greater thanGeqGreater than or equalLt Lower thanLeqLower thanIsNull Is nullBeginsWith Begins withContainsContains 阅读全文
摘要：
今天碰到了在MOSS中判断一个日期是一年之中的第几周的问题，由于以前对Excel比较熟悉的缘故，开始直接想了一个函数用WeekNum（）来判断，但是写进去发现MOSS不能识别它，于是用上了最古老的方法，函数如下：=INT((A7-DATE(YEAR(A7),1,1)+(TEXT(WEEKDAY(DATE(YEAR(A7),1,1)),"d")))/7)+1使用时只需将A7改为MOSS中的字段即可。 阅读全文
摘要：
I want to add a footer to the v4.master(which is the default master page in Sharepoint server 2010).There are a few ways you could go when creating afooter that goes with v4.master. One simple method would be to add a div right before the DeveloperDashboard line in v4.master. Add the bolded line bel 阅读全文
摘要：
场景：有一台MOSS测试服务器，上面部署测试好了两个应用程序。两台MOSS生产服务器。需要把测试环境中的两个站点完整的迁移到生产环境。迁移步骤： 1）在测试服务器上运行以下命令，备份数据： "C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\12\bin\stsadm" -o backup -url http://localhost:81 -filename c:\sps-backup-81.bak"C:\Program Files\Common Files\Microsoft 阅读全文
摘要：
今天遇到了一件很奇怪的事，MOSS列表的宽度突然变的只有正常宽度的一半，并且是整个子站点的列表都这样，粗略的分析了一下原因，可能是样式的问题，拿着样式表寻找修改了半天，发现不起任何效果，遂想想可能是母板页的问题，找了一下，发现<div id="s4-leftpanel" class="s4-notdlg" style width="155px">里面有个style width="155px"，这个是控制左边快速启动栏的宽度的，可能是这个造成的问题，把这个删除，保存，刷新一下页面，OK！列表的宽度正常了。 阅读全文
摘要：
更改MOSS所有列表的标题底色需要更改两个地方： 一个是前面的全选框，找到相应的CSS文件（打开站点的页面，按F12看看用到了哪些CSS，然后找到正确的CSS），打开，然后找到.ms-vh-icon，在里面加上蓝色的部分.ms-vh-icon{vertical-align:middle;background-color:#D3D3D3;/*加这句*/} 另外一个是后面所有列的标题的底色，在刚刚打开的CSS文件中，找到.ms-vh,.ms-vh2，在里面加上蓝色的部分.ms-vh,.ms-vh2{height:21px;background-color:#D3D3D3;/*这里加一句改list标 阅读全文
摘要：
在博客园注册了快一年了，一直潜水学习，今天终于开通了博客，将以前写的博客也一块搬过来。 阅读全文
摘要：
通过下面方法就可以直接在出错页面查看错误信息。修改Web应用程序根目录上的Web.config文件中的两个地方：一、MaxControls="200" CallStack="false" 改为 MaxControls="200" CallStack="true"二、customErrors mode="On" 改为 customErrors mode="Off" 阅读全文
摘要：
一直做Moss开发，最近比较多用到Infopath，今天用VSTA在Infopath表单内写了一些代码，然后预览时报了如下的错误：InfoPath 无法打开所选表单，因为表单的代码中存在错误。策略设置阻止打开具有托管代码的 Internet 表单。若要解决此问题，请与系统管理员联系。分析了一下，肯定是权限或设置的问题，后选择高级表单选项，选择安全与信任，将安全级别设置为完全信任，确定，然后预览，OK！ 阅读全文