swfcsunboy

容摘要：使用Excel按人头制作工资条，网上有两个解决方案，一个是利用Word的“邮件合并”功能，另一个是利用VBA来实现。 　　使用Excel按人头制作工资条，网上有两个解决方案，一个是利用Word的“邮件合并”功能，另一个是利用VBA来实现。　　用“邮件合并” 功能操作虽说不难，但数据过多时也很麻烦；用VBA处理起来倒是很方便，但几十行的程序也够初学者忙活的。经过一番试验，笔者找出了一个比

Private Sub CommandButton1_Click()Sub CommandButton1_Click()    Call Macro1End SubPrivate Sub CommandButton2_Click()Sub CommandButton2_Click()根据项目名称 获取部门名A8    显示在B8中     c3--c40Dim xDis As Integ

学了一个不错的查找函数，vlookup，可以在数组中找到匹配值，而且可以选择数组中的返回列贴个公式帮助记忆：　　=VLOOKUP(B3,Sheet2!$B$6:$C$9,2)*C3　　意思是在b6：c9的数组中查找一个与b3匹配的值，返回对应的第二列的数值

<br />Sub Rename()<br />    Dim i As Integer<br />    Dim FileNames As Variant<br />    Dim FileCount As Integer<br />    Dim SourceFileName As String<br />    Dim DistFileName As String<br />    Dim CurrentDir As String<br />    FileNames = Application.Ge