我在Powerpoint中创建了一个由宏运行的测试。
我所做的是,我列出了具有其ID号的人。
用户扫描其ID号,然后vba弹出一条带有其名称的消息。太好了效果很好。但是,如果我创建更多测试,这将是一个问题。如果我有更多用户或有人离开..我将不得不继续更新PowerPoint。
PowerPoint是否可以打开csv文件以查找该ID号,然后在Powerpoint中弹出与其关联的名称:
这就是我所拥有的:
Sub BarcodeID()
Correct = 0
Wrong = 0
Barcode = InputBox(Prompt:="Scan Your ID:", Title:="This Test")
UserList
End Sub
Sub UserList()
If Barcode = "1000" Then UserName = "Bugs Bunny"
If Barcode = "1001" Then UserName = "Porky Pig"
If Barcode = "8675309" Then UserName = "Jenny/Tommy Tutone"
If UserName = "" Then UserName = InputBox(Prompt:="I'm Sorry, I could not you. Please enter your name below. Do not Worry, Your Name and progress has been recorded.", Title:="This Test")
Call Welcome
End Sub
Sub Welcome()
MsgBox ("Hello, " + UserName + ". You are about to start This Test. Let's Begin!"), vbApplicationModal, "This Test"
ActivePresentation.SlideShowWindow.View.Next
End Sub
所以我知道我必须打开csv文件
所以可以说我有一个名为Users.csv的文件
第一列是名称,第二列是ID号。
Sub ReadBarcode()
dim iFileNumber As Integer
dim strFile As String
strFile = "C:\whatever\Users.csv"
Open strFile
现在我很困惑..不知道该怎么办。