16、两个条件的求和公式？[求助]
A B C
产品 原因 重量
SZJ00001 工废 10
yb3120 料费 12
SZJ00231 料费 35
YK4232 生计03873# 52
SZJ10025 料费 41
SZJ40021 工废 102
...... ...... ......
怎么重量之求和?
条件1:产品是SZJ00001至SZJ00297之间;
条件2:原因是工废.
Q1、加载“条件求和向导”宏，然后用“条件求和向导”来实现。
Q2、用数组公式{=SUM(($A$2:$A$7>="SZJ00001")*($A$2:$A$7<="SZJ00297")*($B$2:$B$7="工废")*($C$2:$C$7))}
Q3、可以用IF的嵌套公式：=IF(($A$2:$A$7>="SZJ00001"),($A$2:$A$7<="SZJ00297"),SUMIF($B$2:$B$7,"工废",$C$2:$C$7)(注：此法好像不行)
Q4、数组公式：{=SUM(IF(($A$2:$A$7<="SZJ00297")*(b2:b7="f"),c2:c7,0))}
最终解决方法：这公式把CC21-2，CC21-3，CZJ00001~CZJ00297等产品的重量都统计进去了。
用“求和向导”解决了。
(注：建议增加过渡列，把“产品”的字符部分和数值部分分开，然后再仿照上面公式做)
17、列印範圍的拍照
在新板本的 Excel 有拍照這個工能，以下編碼可將列印範圍拍照儲存成 Gif 檔。
它的方法亦很特別
Sub ScreenShot()
Dim wks As Worksheet
Dim cht As Chart
Dim intCounter As Integer
Application.ScreenUpdating = False
Set wks = ActiveSheet
wks.Range(wks.PageSetup.PrintArea).CopyPicture Appearance:=xlScreen, _
format:=xlPicture
Set cht = Charts.Add
With cht
On Error Resume Next
.Paste
On Error GoTo 0
End With
cht.Export "c:\temp\" & wks.Name & ".gif"
Application.DisplayAlerts = False
cht.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
18、有没有办法实现A1.B2,C3里分别显示当前的年份，月份和日期？
Q1、A1=Year(Now())、B2=Month(Now())、C3=Day(Now())
Q2、A1=Year(TODAY())、B2=Month(TODAY())、C3=Day(TODAY())
