Chia sẻ file tạo trắc nghiệm với PowerPoint (1 người xem)

[giaiphap]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.

 

[huonglien1901]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.

file Anh khi em tải về nó báo lỗi,

 

[giaiphap]

file Anh khi em tải về nó báo lỗi,
View attachment 201900

Em kiểm tra lại xem anh tải về vẫn bình thường mà, coi chừng mạng có vấn đề. Không ấy tải lại file này về và đặt chung thư mục nhé.

 

[huonglien1901]

Em kiểm tra lại xem anh tải về vẫn bình thường mà, coi chừng mạng có vấn đề. Không ấy tải lại file này về và đặt chung thư mục nhé.

Em tải về khi mở file powerpoint khi nhấn nút bắt đầu thì nó quay rồi không xảy ra điều gì cả.

 

[giaiphap]

Em tải về khi mở file powerpoint khi nhấn nút bắt đầu thì nó quay rồi không xảy ra điều gì cả.

Sao kỳ vậy ta, máy tôi vẫn chạy được bình thường mà.

 

[nghiaphuc]

file Anh khi em tải về nó báo lỗi,
View attachment 201900

Chắc máy bạn có vấn đề gì đó. Tôi vừa tải về, giải nén và sử dụng bình thường, không vấn đề gì cả.

 

[Nguyễn Duy Tuân]

Mình chạy Windows 10 64-bit, Office 32 bit nó đỡ suốt không chạy. Tác giả thử test trên môi trường Windows 10 xem thế nào?

 

[giaiphap]

Mình chạy Windows 10 64-bit, Office 32 bit nó đỡ suốt không chạy. Tác giả thử test trên môi trường Windows 10 xem thế nào?

Hiện tại em chưa rảnh cài win 10 để test, em đã thử trên Win 8.1 64bit và Office 2013 64 bit vẫn chạy được bình thường.

 

[Nguyễn Duy Tuân]

Hiện tại em chưa rảnh cài win 10 để test, em đã thử trên Win 8.1 64bit và Office 2013 64 bit vẫn chạy được bình thường.

Theo kinh nghiệm của mình thì Win 10 64-bit là một trong những loại hơi khác với các Win khác, hiện nay nó khá phổ biến.

 

[giaiphap]

Theo kinh nghiệm của mình thì Win 10 64-bit là một trong những loại hơi khác với các Win khác, hiện nay nó khá phổ biến.

Để vài hôm rảnh cài lại cái Win 10 để test thử. Sẳn tiện không ấy anh @Nguyễn Duy Tuân sửa giúp và up lên cho mọi người tham khảo luôn.

 

[Nguyễn Duy Tuân]

Để vài hôm rảnh cài lại cái Win 10 để test thử. Sẳn tiện không ấy anh @Nguyễn Duy Tuân sửa giúp và up lên cho mọi người tham khảo luôn.

Hi. Mình sẽ tìm hiểu code của bạn đã làm xem thế nào. Không biết có sửa đc không ấy

 

[nghiaphuc]

Mình chạy Windows 10 64-bit, Office 32 bit nó đỡ suốt không chạy. Tác giả thử test trên môi trường Windows 10 xem thế nào?

Em đang dùng Win 10 Home 64 bit, Office 2016 32 bit đó anh, chạy ổn, không vấn đề gì.

 

[be_09]

Theo kinh nghiệm của mình thì Win 10 64-bit là một trong những loại hơi khác với các Win khác, hiện nay nó khá phổ biến.

Anh dùng Win 10, 64 bit, Office 2016 chạy bình thường.

 

[Nguyễn Duy Tuân]

Lỗi do có một DLL (Com add-in máy mình GridHighlighter xung đột), cứ chạy slide là thông báo lỗi. Đóng MsgBox lỗi di là ok. Chắc chỉ do DLL này thôi. File bạn thiết kế hay đấy!

 

[befaint]

win 10 để test

Windows 10 64 bit, Excel 2016 64 bit chạy ngon lành anh nhé.

 

[lequocsuc3vvk]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.

Bài rất hay! Tác giả có thể nào tạo hoán vị các câu mỗi lần mở không?

 

[giaiphap]

Bài rất hay! Tác giả có thể nào tạo hoán vị các câu mỗi lần mở không?

Nó đã hoán vị rồi mà bạn.

 

[LÃO_PHÙNG]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.
[/QUOfile hay qúa nhưng nếu sửa màu mặc định của các shap câu trả lời là màu gì đó khác màu đen trông đỡ hơn

 

[lequocsuc3vvk]

Nó đã hoán vị rồi mà bạn.

Báo lỗi dòng màu vàng ạ

 

[giaiphap]

View attachment 226976
Báo lỗi dòng màu vàng ạView attachment 226976View attachment 226976View attachment 226976

Trên Slide 2 của bạn còn cái Cauhoi không? có khả năng lỡ tay xóa thì bị lỗi đó.

 

[HOABDBP]

Cho mk hỏi ngu phát: chuyển từ 15 về 10 câu thì làm thế nào? Tks!

 

[giaiphap]

Cho mk hỏi ngu phát: chuyển từ 15 về 10 câu thì làm thế nào? Tks!

Mở file Data.xlsx ra với mật khẩu là GPE sau đó sửa số câu hỏi tại ô E2.

 

[HOABDBP]

Cách xem lại các câu trả lời ạ?

 

[HOABDBP]

XEM LẠI KẾT QUẢ TRẮC NGHIỆM NTN Ạ?

 

[giaiphap]

XEM LẠI KẾT QUẢ TRẮC NGHIỆM NTN Ạ?

File này không có chức năng đó nhé bạn, bạn muốn vậy thì tải file về và chỉnh sửa theo ý mình.

 

[songanh2629]

File này không có chức năng đó nhé bạn, bạn muốn vậy thì tải file về và chỉnh sửa theo ý mình.

Bài này sao không thấy gán code ở sự kiện nào hết vậy ta? các nút lệnh bắt đầu và câu tiếp theo không thấy gán sự kiện nào và ở đâu. không biết lúc bắt đầu load code ra là ở tại thời điểm nào? có nhiêu đó thắc mắc. cảm ơn tác giả đã có bài viết rất ok
Thấy rồi, nó nằm trong insert action

 

[thanhduy@]

Mình thấy file chạy rất tốt, rất bổ ích khi triển khai tập huấn và tạo các trò chơi. Tuy nhiên không thấy hoán vị câu hỏi trong mỗi lần chơi. Mở bao nhiêu lần cũng chỉ ra lặp lại những câu hỏi đó. Mong các anh chị chỉ dùm.

 

[giaiphap]

Mình thấy file chạy rất tốt, rất bổ ích khi triển khai tập huấn và tạo các trò chơi. Tuy nhiên không thấy hoán vị câu hỏi trong mỗi lần chơi. Mở bao nhiêu lần cũng chỉ ra lặp lại những câu hỏi đó. Mong các anh chị chỉ dùm.

Có hoán vị mà bạn, ngoài hoán vị câu hỏi nó còn hoán vị luôn đáp án nửa đó. bạn kiểm tra kỷ lại.

 

[thanhduy@]

Bài rất hay, minh sử dụng hoán vị được rồi nhưng sao khi kết thúc nó báo lỗi (gửi kèm) nhờ tác giả giúp dùm. Xin cảm ơn.

 

[giaiphap]

Bài rất hay, minh sử dụng hoán vị được rồi nhưng sao khi kết thúc nó báo lỗi (gửi kèm) nhờ tác giả giúp dùm. Xin cảm ơn.

File này bạn có sửa gì không mà lại báo lỗi, nó báo tràng mảng thì phải.

 

[thanhduy@]

File này bạn có sửa gì không mà lại báo lỗi, nó báo tràng mảng thì phải.

Tải về mở ra thư là nó báo lỗi vậy rồi, chưa chỉnh sửa gì hết.

 

[pt92]

ai giúp e lập trình vba trong PowerPoint để lấy dữ liệu từ Excel để trình chiếu xem File giúp em ak

 

[giaiphap]

ai giúp e lập trình vba trong PowerPoint để lấy dữ liệu từ Excel để trình chiếu xem File giúp em ak

Đặt file này cùng thư mục với file Dulieu.xlsx.

 

[lequocsuc3vvk]

Nhờ Ad chỉ điểm hoặc có thể chỉnh code giùm ạ. Em tạo câu hỏi trắc nghiệm với 4 lựa chọn, với mỗi slide một câu hỏi và mỗi lần thêm slide lại phải viết thêm Code nữa. Vậy xin hỏi có cách nào viết 1 lần cho tất cả các câu hỏi không ạ?

 

[giaiphap]

Nhờ Ad chỉ điểm hoặc có thể chỉnh code giùm ạ. Em tạo câu hỏi trắc nghiệm với 4 lựa chọn, với mỗi slide một câu hỏi và mỗi lần thêm slide lại phải viết thêm Code nữa. Vậy xin hỏi có cách nào viết 1 lần cho tất cả các câu hỏi không ạ?

Trước hết cài Font SegoeMdl2Assets(Windows10).ttf vào máy tính sau đó mở file Trac nghiem lên xem thử.

 

[lequocsuc3vvk]

Trước hết cài Font SegoeMdl2Assets(Windows10).ttf vào máy tính sau đó mở file Trac nghiem lên xem thử.

Cảm ơn ad rất nhiều ạ

 

[hichicnptc]

Xin chào admin và các pro.
Tham khảo cách tạo ppt từ excel tôi có sửa thành chương trình tạo ppt từ câu hỏi trắc nghiệm trên word, nhưng vì mới học nên nó bị lỗi mong admin và các pro giúp đỡ. Vấn đề nó là thế này:
Nếu tôi dùng lệnh này để đánh dấu đáp án tự động trong đề gốc thì chạy nó báo lỗi như hình. Lệnh là:
Set ppt_shp = .Shapes("Choice_" & Answer)
Nếu tạm thay là: Set ppt_shp = .Shapes("Choice_C") chẳng hạn thì chương trình chạy được nhưng không đạt được nhu mong muốn vì đáp án chọn cố định là C, không phản ánh được thực tế của đề gốc.
Rất mong admin và các pro bớt chút thời gian sửa chữa hộ, xin chân thành cảm ơn

 

[hichicnptc]

Xin chào admin và các pro.
Tham khảo cách tạo ppt từ excel tôi có sửa thành chương trình tạo ppt từ câu hỏi trắc nghiệm trên word, nhưng vì mới học nên nó bị lỗi mong admin và các pro giúp đỡ. Vấn đề nó là thế này:
Nếu tôi dùng lệnh này để đánh dấu đáp án tự động trong đề gốc thì chạy nó báo lỗi như hình. Lệnh là:
Set ppt_shp = .Shapes("Choice_" & Answer)
Nếu tạm thay là: Set ppt_shp = .Shapes("Choice_C") chẳng hạn thì chương trình chạy được nhưng không đạt được nhu mong muốn vì đáp án chọn cố định là C, không phản ánh được thực tế của đề gốc.
Rất mong admin và các pro bớt chút thời gian sửa chữa hộ, xin chân thành cảm ơn

file ppt kèm theo

 

[giaiphap]

Xin chào admin và các pro.
Tham khảo cách tạo ppt từ excel tôi có sửa thành chương trình tạo ppt từ câu hỏi trắc nghiệm trên word, nhưng vì mới học nên nó bị lỗi mong admin và các pro giúp đỡ. Vấn đề nó là thế này:
Nếu tôi dùng lệnh này để đánh dấu đáp án tự động trong đề gốc thì chạy nó báo lỗi như hình. Lệnh là:
Set ppt_shp = .Shapes("Choice_" & Answer)
Nếu tạm thay là: Set ppt_shp = .Shapes("Choice_C") chẳng hạn thì chương trình chạy được nhưng không đạt được nhu mong muốn vì đáp án chọn cố định là C, không phản ánh được thực tế của đề gốc.
Rất mong admin và các pro bớt chút thời gian sửa chữa hộ, xin chân thành cảm ơn

Thứ nhất là lệnh.

Set ppt_shp = .Shapes("Choice_" & Answer)

dùng để gán ppt_shp bằng một cái Shape tên ("Choice_" & Answer), thì cái tên này phải có trong file PowerPoint, của bạn bị lỗi tôi đoán là do trong file PowerPoint chưa có đối tượng này. Còn lệnh

Set ppt_shp = .Shapes("Choice_C")

nó không báo lỗi là vì đối tượng shape tên "Choice_C" đã có trên Slide.
Thứ hai: Chương trình chạy đúng theo mình hay không là do mình lập trình chứ sau lại bảo là nó chạy sai, ví dụ cái đối tượng "Choice_C" trên Slide là vậy nhưng khi lập trình tôi muốn cho nó là đáp A, B hay D đêu được (Cái này do mình lập trình mà, đáp án A, B, C, D thì mình đổi vô tư), chẳng hạn trên file Word đáp án A, nhưng khi chạy Code tôi cho nó qua C là bình thường. Trên file PowerPoint mẫu tôi cũng cho nó trộn đáp án mà.
Thứ ba: Muốn giúp thì tui cần có file thực tế chứ không phải đưa dữ liệu vậy rồi kêu tôi phải tự sắp xếp cho phù hợp thì tui sẽ không giúp. Bạn muốn giúp thì bạn phải sắp xếp file dữ liệu và file cần xuất ra tươm tất, code đã áp dụng chưa được có sẳn trong file, nêu lý do áp dụng chưa được, nói rõ đã áp dụng nhưng chỏ nào chưa phù hợp, chổ nào ra kết quả chưa đúng, vậy ra đúng phải như thế nào? Mô tả càng chi tiết càng tốt.

 

[Maika8008]

Bài này viết code trong Power Point hả chủ thớt ơi?

 

[giaiphap]

Bài này viết code trong Power Point hả chủ thớt ơi?

Viết code trên PowerPoint và lấy dữ liệu từ Excel.

 

[hichicnptc]

Thứ nhất là lệnh.

Set ppt_shp = .Shapes("Choice_" & Answer)

dùng để gán ppt_shp bằng một cái Shape tên ("Choice_" & Answer), thì cái tên này phải có trong file PowerPoint, của bạn bị lỗi tôi đoán là do trong file PowerPoint chưa có đối tượng này. Còn lệnh

Set ppt_shp = .Shapes("Choice_C")

nó không báo lỗi là vì đối tượng shape tên "Choice_C" đã có trên Slide.
Thứ hai: Chương trình chạy đúng theo mình hay không là do mình lập trình chứ sau lại bảo là nó chạy sai, ví dụ cái đối tượng "Choice_C" trên Slide là vậy nhưng khi lập trình tôi muốn cho nó là đáp A, B hay D đêu được (Cái này do mình lập trình mà, đáp án A, B, C, D thì mình đổi vô tư), chẳng hạn trên file Word đáp án A, nhưng khi chạy Code tôi cho nó qua C là bình thường. Trên file PowerPoint mẫu tôi cũng cho nó trộn đáp án mà.
Thứ ba: Muốn giúp thì tui cần có file thực tế chứ không phải đưa dữ liệu vậy rồi kêu tôi phải tự sắp xếp cho phù hợp thì tui sẽ không giúp. Bạn muốn giúp thì bạn phải sắp xếp file dữ liệu và file cần xuất ra tươm tất, code đã áp dụng chưa được có sẳn trong file, nêu lý do áp dụng chưa được, nói rõ đã áp dụng nhưng chỏ nào chưa phù hợp, chổ nào ra kết quả chưa đúng, vậy ra đúng phải như thế nào? Mô tả càng chi tiết càng tốt.

cảm ơn sự tận tình của mod nhé. Cái code ở trong file .dotm rồi mà. cái ppt thì quên nên tôi bổ sung sau đó ấy.
Tôi nhờ người chỉnh giúp rồi: Cái giá trị của biến answer hình như bị kèm thêm kí tự đặc biệt kiểu xuống dòng ấy. Bỏ nó đi là được

 

[HBTuyenPQ]

Thứ nhất là lệnh.

Set ppt_shp = .Shapes("Choice_" & Answer)

dùng để gán ppt_shp bằng một cái Shape tên ("Choice_" & Answer), thì cái tên này phải có trong file PowerPoint, của bạn bị lỗi tôi đoán là do trong file PowerPoint chưa có đối tượng này. Còn lệnh

Set ppt_shp = .Shapes("Choice_C")

nó không báo lỗi là vì đối tượng shape tên "Choice_C" đã có trên Slide.
Thứ hai: Chương trình chạy đúng theo mình hay không là do mình lập trình chứ sau lại bảo là nó chạy sai, ví dụ cái đối tượng "Choice_C" trên Slide là vậy nhưng khi lập trình tôi muốn cho nó là đáp A, B hay D đêu được (Cái này do mình lập trình mà, đáp án A, B, C, D thì mình đổi vô tư), chẳng hạn trên file Word đáp án A, nhưng khi chạy Code tôi cho nó qua C là bình thường. Trên file PowerPoint mẫu tôi cũng cho nó trộn đáp án mà.
Thứ ba: Muốn giúp thì tui cần có file thực tế chứ không phải đưa dữ liệu vậy rồi kêu tôi phải tự sắp xếp cho phù hợp thì tui sẽ không giúp. Bạn muốn giúp thì bạn phải sắp xếp file dữ liệu và file cần xuất ra tươm tất, code đã áp dụng chưa được có sẳn trong file, nêu lý do áp dụng chưa được, nói rõ đã áp dụng nhưng chỏ nào chưa phù hợp, chổ nào ra kết quả chưa đúng, vậy ra đúng phải như thế nào? Mô tả càng chi tiết càng tốt.

trường hợp đáp án không phải là a, b, c mà là 1,2,3,4 thì mình đổi code sao anh. Tui đổi mà bị báo lỗi hoài á. cũng đang tập tành nên không rành lắm. xin chỉ giáo

 

[giaiphap]

trường hợp đáp án không phải là a, b, c mà là 1,2,3,4 thì mình đổi code sao anh. Tui đổi mà bị báo lỗi hoài á. cũng đang tập tành nên không rành lắm. xin chỉ giáo

Trong cái Sub NextCH sửa chổ

.Shapes("DA" & i).TextFrame.TextRange.Text = Chr(64 + i) & ". " & Arr(iCol + dArr(i), 1)

sửa lại thành

.Shapes("DA" & i).TextFrame.TextRange.Text = i & ". " & Arr(iCol + dArr(i), 1)

 

[thnghiachau]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.

Chào anh @giaiphap ,
Cho em hỏi tí ah:
e chèn thêm


dòng "Const SELECTED_COLOR As Long = RGB(255, 0, 0)"
nhưng khi run thì nó không hoạt động - nhấn "Bắt đầu" không có động tĩnh gì ...
Thêm nữa, sao mình có thể debug macro PowerPoint được ạ ?
Cám ơn anh.

 

[UltraExcel]

Có bác nào có tài liệu hay link hướng dẫn tạo macro chạy trong action của Powerpoint không share giúp với.

 

[giaiphap]

Chào anh @giaiphap ,
Cho em hỏi tí ah:
e chèn thêm

View attachment 301656
dòng "Const SELECTED_COLOR As Long = RGB(255, 0, 0)"
nhưng khi run thì nó không hoạt động - nhấn "Bắt đầu" không có động tĩnh gì ...
Thêm nữa, sao mình có thể debug macro PowerPoint được ạ ?
Cám ơn anh.

Lệnh này thì đâu có dùng được bạn, thử dùng lệnh này cho Excel nó cũng báo lỗi ngay, sửa lại thế này.

Const SELECTED_COLOR As Long = 255

Một điều mà VBA của PowerPoint hơi khó chịu là nó sẽ êm re khi code bị lỗi và sẽ ngưng chạy code phía dưới lỗi đó, tui chỉ có biết cách dùng Debug.Print ngay vị trí nghi ngời lỗi thôi.

Có bác nào có tài liệu hay link hướng dẫn tạo macro chạy trong action của Powerpoint không share giúp với.

Tui chỉ có cái này và google nếu cần thiết.

 

[UltraExcel]

Lệnh này thì đâu có dùng được bạn, thử dùng lệnh này cho Excel nó cũng báo lỗi ngay, sửa lại thế này.

Const SELECTED_COLOR As Long = 255

Một điều mà VBA của PowerPoint hơi khó chịu là nó sẽ êm re khi code bị lỗi và sẽ ngưng chạy code phía dưới lỗi đó, tui chỉ có biết cách dùng Debug.Print ngay vị trí nghi ngời lỗi thôi.

Tui chỉ có cái này và google nếu cần thiết.

Cảm ơn bác nhé. Không biết sao tìm mấy tài liệu về code cho PPT khó ghê.

 

[UltraExcel]

Có cái thủ tục này để đưa vào Action khi moveover
Sub changecol(oshp As Shape)
If oshp.Fill.ForeColor.RGB <> RGB(255, 255, 0) Then oshp.Fill.ForeColor.RGB = RGB(255, 0, 0) 'To mau nen la mau do cho dap an
End Sub

Tui không biết tài liệu nào hướng dẫn làm sao biết tạo tham số cho thủ tục đó?

 

[hadoan-pap]

Mình thấy đôi khi trình chiếu PowerPoint một số người có nhu cầu tạo câu hỏi trắc nghiệm kiểm tra kiến thức (Ở đây chỉ mang tính chất tương đối, chứ nếu tạo trắc nghiệm kiểm tra thực sự thì chẳng ai dùng đến nó). Hôm nay mình chia sẻ cách tạo câu hỏi trắc nghiệm bằng PowerPoint lấy dữ liệu câu hỏi từ file Excel và có thống kê số câu trả lời đúng khi hoàn thành bài trắc nghiệm. Các bạn tải file dưới và giải nén đặt file PowerPoint và file Excel vào chung thư mục sau đó mở file PowerPoint (Nhớ Enable macro trước khi mở file PowerPoint) và trình chiếu thử xem kết quả ra sao. Ở đây mình soạn câu hỏi trắc nghiệm trong File Excel, mật khẩu mở file là GPE.

Em chào anh.

Dạ em xin phép hỏi anh chút về đoạn code trong chương trình của anh ạ.

Trong slide , em muốn tạo thêm nút để hiện thị câu trả lời đúng trước khi next slide như ảnh đính kèm ạ.

Anh có thể hỗ trợ cho em xin đoạn code để ấn vào nút "Hiển Thị Đáp Án" thì nó sẽ ra kết quả cho mỗi câu hỏi được không ạ?

Em xin cảm ơn!