[EXCEL与行政采购的问题]一、做库存报表最起码要掌握表格制作方法。Excel的基本操作要会。例如设置 行高、列宽、插入行、删除行、单元格的设置等等。这些都在工具栏中能调用。简单的库存表不需要很...+阅读
EXCEL VBA的计算
用VBA 可以实现,我弄弄看.
Public Total_data(100) As Long
Public row_i As Integer, cloumn_i As Integer
Public Sub find_data()
Dim i As Integer, flag As Long, total_i As Long
Dim myrange As Range
total_i = 0
For Each myrange In Range("M20:S30")
If myrange.Value <> "" Then
total_i = total_i + 1
Total_data(total_i) = myrange
End If
Next
row_i = 1
cloumn_i = 1
For i = 1 To total_i
flag = get_data(i, total_i, 10000 - Total_data(i))
If flag Then
Cells(row_i, cloumn_i) = Total_data(i)
row_i = row_i + 1
cloumn_i = 1
End If
Next i
End Sub
Public Function get_data(start_i As Integer, end_i As Long, find_value As Long)
get_data = 0
If start_i > end_i Then
get_data = 0
Exit Function
End If
If find_value = 0 Then
cloumn_i = cloumn_i + 1
get_data = start_i
Exit Function
Else
If get_data(start_i + 1, end_i, find_value - Total_data(start_i + 1)) Then
Cells(row_i, cloumn_i) = Total_data(start_i + 1)
cloumn_i = cloumn_i + 1
get_data = start_i + 1
End If
If get_data(start_i + 1, end_i, find_value) Then
get_data = start_i + 2
End If
End If
End Function
延伸阅读:
如何利用excel和Word批量生成公文首先我们也是先有这么个数据表: 然后我们也要有模板:然后我们也要有模板: t;注意:末尾不要有多余的回车或者分页符。邮件合并会自动给每一项创建一页。注意:末尾不要有多余的回车...
Excel如何一步到位制作学生成绩通知单编辑特别推荐: 全国计算机等级考试(等考)指定教材 全国计算机等级考试学习视频 全国计算机等级考试网上辅导招生 全国计算机等级考试时间及科目预告 考试大教育全国计算机等级...
excel两表中两列数据中的某行数据相同则显示另一列的数据=VLOOKUP(A1&B1,IF({1,0},教职工学历及任课情况花名册!$B$1:$B$999&;教职工学历及任课情况花名册!$E$1:$E$999,教职工学历及任课情况花名册!$H$1:$H$999),2,0) 按三键结束Ctrl+...
excel数值范围决定显示颜色选中成绩那几列,2003版EXCEL中 下拉菜单:格式--条件格式 1. 单元格数值--大于或等于--90--选择格式为“填充红色” 2. 选择:添加 3. 单元格数值--介于--80--90--选择格式为“填...
excel怎么取消套用表格格式1、我想以我的 Excel 表单为例, 它是一种已以表格形式格式化的窗体。 2、接着我们就开始用鼠标选中套用格式的区域。 3、然后选择的区域的格式清除, 如在 "开始" 菜单中显示的...
如何使用Excel表格制作工资条样式的成绩通知单班主任工作繁杂琐碎,每到各种考试,向学生反馈成绩就是一件必须完成的事情。现在不主张把所有学生的成绩全部打出并直接张贴,又得让学生尽快知道自己的成绩,所以选用"成绩通知单"的...
请问哪位有excel制作的管理系统请问哪位有excel制作的管理系统:没那么麻烦,你只要学会透视表,就解决了。 饭店名称 客户姓名 订房时间 A饭店 张三 25-3 c饭店 李四 25-1 A饭店 王五 25-1 c饭店 钱六 25-3 A饭...