Kiến thức cần ôn tin b nông lâm

EXCEL B

I.

Tính tốn có điều kiện
Dsum

Tính tổng có điều kiện

Sumif,

Cơng thức mảng

Đếm có điều kiện

Điều kiện khơng có hàm

Điều kiện có chứa hàm hoặc khơng

Dcount, DcountA

Lập vùng điều kiện trước khi dùng hàm

Countif, Countifs

Điều kiện khơng có hàm

Cơng thức mảng

Tìm giá trị lớn nhất, nhỏ nhất,
giá trị trung bình có điều

kiện

Lập vùng điều kiện trước khi dùng hàm

Dmax, Dmin, Daverage

Điều kiện có chứa hàm hoặc khơng

Lập vùng điều kiện trước khi dùng hàm


ÔN TẬP
1/ HÀM CƠ SỞ DỮ LIỆU:
-

DSUM, DMAX, DMIN, DCOUNT, DCOUNTA, DAVERAGE

DSUM ( VÙNG DỮ LIỆU, TIÊU ĐỀ CẦN TÍNH, ĐK )
(LƯU Ý: VÙNG DỮ LIỆU TÔ CẢ TIÊU ĐỀ VÀ CỐ ĐỊNH )
-

CƠNG THỨC MẢNG

SUM(CỘT TÍNH*(MONTH( KO CĨ TƠ TIÊU ĐỀ) )) NHỚ BẤM CTR + SHIFT + ENTER
VD: BT 1 ON EXCEL
2/ HÀM DỊ TÌM:
VLOOKUP, HLOOKUP, INDEX, MATCH
INDEX( BẢNG DỊ TÌM, MATCH( KO TƠ TIÊU ĐỀ ), MATCH…….)
CƠNG THỨC CHÍNH CỦA NĨ LÀ : INDEX ( BẢNG DỊ TÌM, DỊNG, CỘT)
CĨ 3 KIỂU DỊ TÌM:

HÀNG HAY CỘT DỊ TÌM CĨ GIÁ TRỊ TỪ
BÉ -> LỚN : DỊ TÌM LÀ 1


CHÍNH XÁC : 0
LỚN -> BÉ : -1
VD: BT 1 , 9
3/ SUBTOTAL ( DATA -> SUBTOTAL)
TRƯỚC KHI SUBTOTAL NHỚ SẮP XẾP THEO ĐIỀU KIỆN ĐỀ BÀI CHO THÀNH CÙNG 1 NHĨM
VD: BT1
4/ RÚT TRÍCH ( DATA->ADVANCED FILTER)
NHỚ ĐẶT ĐIỀU KIỆN
ĐK
=AND( MAT HANG= “X”, NGÀY> DATE
(2001,1,15),NGÀYVD: BT1
5/ PIVOT TABLE/ PIVOT CHART ( INSERT-> PIVOT TABLE)
NẾU ĐỀ BÀI YÊU CẦU LẤY THÁNG RA TA CÓ THỂ TẠO 1 CỘT THÁNG
=MONTH( NGÀY), ĐỂ LẤY THÁNG NHƯ ĐỀ BÀI YÊU CẦU HAY CÓ THỂ LÀM NHƯ SAU:


-

CHÚNG TA TẠO PIVOT TABLE NHƯ BÌNH THƯỜNG VÀ THEO ĐỀ BÀI

-

SAU ĐÓ TA MUỐN CỘT NGÀY -> THÁNG TA ĐƯA CON TRỎ TỚI Ô NGÀY VÀ BẤM CHUỘT
PHẢI NHẤP VÀO GROUP,

-

VD: BT1

BẢNG GROUP SẼ HIỆN RA NHƯ THẾ NÀY VÀ BẠN CHỈ CẦN CHỌN MONTH ĐỂ CỘT NGÀY/ THÁNG/
NĂM CỦA BẠN THÀNH CỘT CHỈ CÓ THÁNG.


6/ CONSOLIDATE ( DATA-> CONSOLIDATE)
TỔNG HỢP DỮ LIỆU TỪ NHIỀU BẢNG
Vd: bt 9


7/ SOLVER

BẤM VÀO CỬA SỔ -> EXCEL OPTIONS -> ADD IN -> GO ->SOLVER
NHỚ ĐỀ CHO GÌ THÌ LIỆT KÊ HẾT
RÙI TÍNH TỔNG DOANH THU, TỔNG CHI PHÍ, LỢI NHUẬN
VD: BT9 SHEET CÂU 2


8/ VBA (BẤM VÀO CỬA SỔ -> EXCEL OPTIONS ->POPULAR -> SHOW DEVELOPER TAB IN THE
RIBBON)

THIẾT LẬP HÀM
THƯỜNG CÁC DẠNG IF …..THEN, CASE , FOR …. EACH…… NEXT
9/ HÀM TÀI CHÍNH
KHẤU HAO: SLN, DB, DDB
LÃI SUẤT VAY: PMT, PPMT, IPMT

LÃI SUẤT GỬI: FV, PV.
VD: BT 9 SHEET CÂU 5

10/ THỐNG KÊ MÔ TẢ
BẤM VÀO CỬA SỔ -> EXCEL OPTIONS ->ADD IN -> GO -> ANALYSIS TOOLPAK
-

XONG RÙI VÀO DATA -> DATA ANALYSIS-> DESCRIPTIVE STATIES

NHỚ CHỌN SUMMARY STATISTICS, CONFIDENCE LEVEL FOR MEAN


-

DESCRIPTIVE STATIES

-

TƯƠNG QUAN : CORREL, CORRELATION

-

TRUNG BÌNH ĐỘNG: MOVING AVERAGE

-

DỰ BÁO HỒI QUY TUYẾN TÍNH: TREND, FORECAST

VD: BT 8 cau c

MỘT SỐ BÀI VBA TRONG BT ON CCB
BÀI 1
Function giamgia( soluong as double) as double
If soluong > 10 then
Giamgia= 5/100
ElseIf soluong>=5 then
Giamgia=0
End if
End function
Muốn thử lại ta bấm ctr + G rôi điền vào ô : ?giamgia(6) rùi bấm enter
BÀI 2
Function thue( ngayban as date) as double
Thang=month (ngayban)
If thang<=3 or thang>=9 then


Thue= 5/100
ElseIf thang<=6 then
thue=10/100
else
thue=0
End if
End function


Bài 3
Function trigia( soluong as double,dongia as double) as double
If soluong > 50 then
trigia= soluong*dongia*90/100

ElseIf soluong>20 then
trigia=soluong* dongia*95/100
else
trigia=soluong*dongia
End if
End function
BÀI 4
Function trigia( soluong as double,dongia as double) as double
If soluong > 50 then
trigia= soluong*dongia*90/100
ElseIf soluong>10 then
trigia=soluong* dongia*95/100
else
trigia=soluong*dongia
End if
End function


BÀI 5
Function giamgia( soluong as double, ngay as date) as double
If month(ngay) =10 and weekday(ngay) =1 then
Giamgia=10/100
ElseIf soluong>=1000 then
Giamgia=15/100
Else
Giamgia=0
End if
End function
BÀI 6
Function ghichu( soluong as double) as string

If soluong > 500 then
Ghichu=”ban rat chay”
ElseIf soluong>100 and soluong <500 then
Ghi chu=” ban chay”
End if
End function
BÀI 7
Function giamgia(loaiphong as string, songay as byte) as double
If loaiphong=”I” or ( loaiphong =”II” and songay>30) then


Giamgia= 10/100
ElseIf loaiphong=”III” and songay> 60 then
Giamgia=5/100
Else
Giamgia=0
End if
End function
BÀI 8
Function tanggia( ngay as date) as double
Dim thang as byte
Thang=month(ngay)
Select case thang
Case 1,2,7,9,11,12
Tanggia= 10/100
Case 3,4,8
Tanggia=7/100
Case 5
Tanggia=0
End select

End function
BÀI 9


Function countHNHU(vung As Range) As Double
Dim ketqua As Double
Dim odem As Range
ketqua = 0
For Each odem In vung
If left(odem.Value, 2) = "HN"or left(odem.Value, 2)="HU" Then
ketqua = ketqua + 1
End If
Next odem
countHNHU = ketqua
End Function