KĨ THU T T NG TÁCẬ ƯƠ
TRONG POWERPOINT
-Ch ng trình t p hu n cho giáo viên ng d ng công nghươ ậ ấ ứ ụ ệ
thông tin trong gi ng d yả ạ
-Ch ng trình giúp giáo viên làm quen v i nh ng kĩ thu tươ ớ ữ ậ
nâng cao trong ph n m m Microsoft powerpoint 2007ầ ề
Trang 1
BÀI 01: T NG QUANỔ
M c tiêu ụSau bài này b n có th :ạ ể
•Kh i t o môi tr ng làm vi c v i Visual Basic trong Powerpointở ạ ườ ệ ớ
•Trình bày đ c các b c c b n làm vi c trong môi tr ng Visual Basic.ượ ướ ơ ả ệ ườ
Gi i thi u ớ ệ Trong th i gian g n đây vi c thi t k bài gi ng t ng tác v i s h tr c a máy tính đang làờ ầ ệ ế ế ả ươ ớ ự ỗ ợ ủ
v n đ quan tâm c a nhi u giáo viên. Có r t nhi u ph n m m máy tính h tr thi t k t ng tác chuyênấ ề ủ ề ấ ề ầ ề ỗ ợ ế ế ươ
nghi p nh Director, Flash. Tuy nhiên đa s các giao viên a thích dùng Powerpoint h n vì h đã quenệ ư ố ư ơ ọ
thu c v i ph n m m này t tr c.ộ ớ ầ ề ừ ướ
V i Powerpoint truy n th ng giáo viên th ng s d ng các hi u ng (effect), ho t c nh (animation) cùngớ ề ố ườ ử ụ ệ ứ ạ ả
các thành ph n multimedia nh hình nh, âm thanh, siêu liên k t (Hyperlink), video nhúng tr c ti p vàoầ ư ả ế ự ế
Powerpoint. Nh ng bài trình chi u này ch mang tính minh h a (ng i xem ch nghe và ti p nh n) chữ ế ỉ ọ ườ ỉ ế ậ ứ
không t ng tác v i ng i dùng (ng i nghe tác đ ng lên bài trình chi u và bài trình chi u tr v k quươ ớ ườ ườ ộ ế ế ả ề ế ả
t ng ng).ươ ứ
B ng cách s d ng ngôn ng VBA (Visual Basic for Application) tích h p s n trong Powerpoint ta có thằ ử ụ ữ ợ ẵ ể
t o ra t ng tác trong các bài trình chi u. Nh ng bài vi t trong ph n này s h ng d n t ng b c xâyạ ươ ế ữ ế ầ ẽ ướ ẫ ừ ướ
d ng các t ng tác c b n di n ra trong l p h c (Tr c nghi m ph n h i, mô ph ng, đi u khi n video,ự ươ ơ ả ễ ớ ọ ắ ệ ả ồ ỏ ề ể
hình nh, Shockwave flash, thu th p ý ki n, xây d ng bài ki m tra…vv).ả ậ ế ự ể
Thi t l p ban đ uế ậ ầ
Thi t l p ch đ b o m tế ậ ế ộ ả ậ
M c đ nh Powerpoint không cho phép ch y các macro vì các lý do v b o m t. Đ thu n ti n trong quáặ ị ạ ề ả ậ ể ậ ệ
trình s d ng VBA hãy th c hi n các b c sau đ thi t l p l i ch đ b o m t cho Powerpoint.ử ụ ự ệ ướ ể ế ậ ạ ế ộ ả ậ
Đ i v i Microsoft Powerpoint 2003, T menu ố ớ ừ Tools, ch n ọMacro, ch n ọSecurity. Trong tab Security
Level ch n m c ọ ứ Medium ho c ặLow (tôi th ng ch n Low đ cho phép t t c các Macro).ườ ọ ể ấ ả
Trang 2
Đ i v i Microsoft Powerpoint 2007, Click nút ố ớ Microsoft Office (nút tròn góc trái trên màn hình), ch nở ọ
Powerpoint Options, ch n ngăn ọTrust Center, click nút Trust Center Settings, ch n tab ọMacro Settings,
và ch n ọEnable all Macros.
B t thanh công c VBAậ ụ
M t đ nh thì b công c h tr làm vi c trên VBA không đ c b t. Hãy làm các b c sau đ hi n thặ ị ộ ụ ỗ ợ ệ ượ ậ ướ ể ể ị
thanh công c này:ụ
Đ i v i Microsoft Powerpoint 2003, Click ph i vào v trí b t kỳ trên Toolbar, ch n ố ớ ả ị ấ ọ Control Toolbox.
Đ i v i Microsoft Powerpoint 2007, Click nút ố ớ Microsoft Office, ch n ọPowerpoint Options, ch n ngănọ
Popular, nh p ch n m c ấ ọ ụ Show Developer Tab in Ribbon. Khi đó s có thêm 1 ngăn Developer trênẽ
thanh Toolbar c a Powerpoint 2007.ủ
Trang 3
Cách s d ng chungử ụ
M i thành ph n trên thanh Toolbox đ c g i là m t đ i t ng, m i đ i t ng này s có m t nhómỗ ầ ượ ọ ộ ố ượ ỗ ố ượ ẽ ộ
thu c tínhộ và ph ng th cươ ứ t ng ng. Có th đ n gi n hi u thu c tính là nh ng đ c đi m c a đ iươ ứ ể ơ ả ể ộ ữ ặ ể ủ ố
t ng nh chi u cao (Height), chi u r ng (Width), màu n n (BackColor), font ch (Font), n hi nượ ư ề ề ộ ề ữ ẩ ệ
(Visible), n i dung (Caption/Text), ki u đ ng vi n (Border Style)…vv. Ph ng th c là nh ng ho tộ ể ườ ề ươ ứ ữ ạ
đ ng s di n ra c a đ i t ng khi b tác đ ng ch ng h n nh khi click chu t vào s xu t hi n thông báoộ ẽ ễ ủ ố ượ ị ộ ẳ ạ ư ộ ẽ ấ ệ
(ta s t o ra t ng tác b ng ch c năng này). Nh ng tác đ ng vào đ i t ng nh click chu t, rê chu tẽ ạ ươ ằ ứ ữ ộ ố ượ ư ộ ộ
qua..vv g i là các ọs ki nự ệ (Event).
Ví dụ: hãy ch n đ i t ng label (hình ch A) và v lên slide. T ng t cho các đ i t ng khác.ọ ố ượ ữ ẽ ươ ự ố ượ
Đ xem thu c tính hãy ể ộ click ph i vào labelả v a v , ch n ừ ẽ ọ Properties, khi đó b ng thu c tính c a đ iả ộ ủ ố
t ng này s xu t hi n. Ta có th thay đ i giá tr các thu c tính này. ượ ẽ ấ ệ ể ổ ị ộ
Ví dụ: Đ t tên cho label này b ng cách gán thu c tính ặ ằ ộ Name b ng ằlblA, ch n thu c tính ọ ộ Font là Vni-Avo,
thay đ i n i dung hi n th trên label b ng cách đ i thu c tính ổ ộ ể ị ằ ổ ộ Caption thành “Ví dụ”, gán thu c tínhộ
TextAlign thành 2-frmTextAlignCenter đ canh gi a text trong label. T o vi n b ng cách gán thu c tínhể ữ ạ ề ằ ộ
BorderStyle giá tr ị1-fmBorderStyleSingle.
Trang 4
Đ t o ho t đ ng cho 1 đ i t ng hãy click đúp vào đ i t ng đó. Khi đó c a s Microsoft Visual Basicể ạ ạ ộ ố ượ ố ượ ử ổ
s xu t hi n và cho phép ta vi t các ho t đ ng cho ẽ ấ ệ ế ạ ộ s ki n m c đ nhự ệ ặ ị c a đ i t ng.ủ ố ượ
Ví dụ: click đúp vào label trên, ởđ i v i nhãn s ki n m c đ nh là click chu tố ớ ự ệ ặ ị ộ chính vì v y ta có c a sậ ử ổ
VBA nh sau:ư
Hãy vi t th đo n l nh sau:ế ử ạ ệ
Private Sub lblA_Click()
'Xuat hien hop thoai thong bao
MsgBox "Welcome to onceclick blog", , "Hello"
End Sub
Đo n l nh trên nh m m c đích s xu t h p tho i v i l i chào ạ ệ ằ ụ ẽ ấ ộ ạ ớ ờ "Welcome to onceclick blog" ( tiêu đ h pề ộ
tho i có chạ ữ "Hello") khi ng i dùng click vào label ườ lblA. Hãy trình chi u t p tin Powerpoint đang thi tế ậ ế
k và click vào lable trên slide 1 ta s có k t qu nh hình bên.ế ẽ ế ả ư
Nh ng đi m c n chú ý:ữ ể ầ
•Ngoài cách click đúp vào đ i t ng đ m c a s Visual Basic có th dùng t h p phím ố ượ ể ở ủ ổ ể ổ ợ ALT +
F11.
•Có th thay đ i đ i t ng và s ki n x y ra trên đ i t ng thông qua 2 combobox trong c a sể ổ ố ượ ự ệ ả ố ượ ử ổ
Visual Basic.
Tóm t t các b c s d ng VBA trong Powerpointắ ướ ử ụ
•Ch n và v m t đ i t ng lên slide.ọ ẽ ộ ố ượ
•Thay đ i thu c tính c a đ i t ng thông qua h p tho i Properties (Click ph i vào đ i t ng vàổ ộ ủ ố ượ ộ ạ ả ố ượ
ch n Properties)ọ
•Vi t ho t đ ng cho các s ki n x y ra trên đ i t ng b ng cách click đúp vào đ i t ng. ế ạ ộ ự ệ ả ố ượ ằ ố ượ
•Có th vi t ho t đ ng cho nhi u s ki n x y ra trên cùng m t đ i t ng b ng cách ch n s ki nể ế ạ ộ ề ự ệ ả ộ ố ượ ằ ọ ự ệ
combox trong c a s Visual Basic. (Ví d có th cùng vi t ho t đ ng cho s ki n click, clickở ủ ổ ụ ể ế ạ ộ ự ệ
đúp,…)
Tóm t tắ
Trang 5