在Excel中編個多項選擇題打分程式

時間 2022-06-12 17:45:05

1樓:學古箏

'主體函式

sub defen()

dim a as string, b as stringfor n = 1 to 3 '需要改下這裡,這是行數a = fenzu(cells(n, 1))paixu a

b = fenzu(cells(n, 2))paixu b

if a = b then

cells(n, 3) = 2

else

if instr(1, a, b) thencells(n, 3) = 1

else

cells(n, 3) = 0

end if

end if

next

end sub

'防止答案或者標準答案順序不對,按字母順序排序sub paixu(shu as string)dim a, c

dim i as integer, tempa = split(shu, ",")

for i = 0 to ubound(a) - 1if (a(i) > a(i + 1)) then '若是遞減,改為a(i)

temp = a(i)

a(i) = a(i + 1)

a(i + 1) = temp

end if

next

shu = join(a, "")

end sub

'為了排序,每個字母之間插入逗號

function fenzu(t as range) as string

dim a as string, b as stringa = ""

b = ucase(t)

for m = 1 to len(b)

a = a & mid(b, m, 1) & ","

next

fenzu = mid(a, 1, len(a) - 1)end function

2樓:匿名使用者

不需要使用 vba的

標準答案存在 c2 單元格,考生答案在 d2單元格:

=if(d2=c2,2,if(iserror(find(d2,c2,1)),0,1))

修改一下:

上面的公式漏掉了 d2等於 空白的情況,下面為修改後的公式=if(d2=c2,2,if(or(iserror(find(d2,c2,1)),d2=""),0,1))

多項選擇題第四題4按照,社工多項選擇題,正確答案如有4個,選對了3個不得分嗎

這是管理學的問題啊,abcd 都選,領導方式的 目標 途徑理論 是權變理論的一種,由多倫多大學的組織行為學教授豪斯最先提出,後來華盛頓大學的管理學教授米切爾也參與了這一理論的完善和補充。從權變思想出發,豪斯把領導方式分成以下四種型別。1 指導型領導 directive leadership 領導者對...

EXCEL中如何統計每個選擇題每個選項的所有學生的姓名?

這個應該是需要輸入資料的,沒有原始的資料顯示不出來。要從轉去每個選擇題的機會,學生的名字名字名字名字,他沒在個 而已。在電子 中,如果想統計那個選擇題每個學校的所有學生的姓名,你可以再提前設定好做題的時候,他們的答案跟聯絡一下一直。excel可以直接開啟,之後就能夠利用裡面的sum函式進行統計學生的...

多項選擇題13 關於事業單位折舊論述正確的是A一般應當按月計提固定資產折舊B當月增加的固定

熾月軍團 一 本科目核算事業單位固定資產計提的累計折舊。二 本科目應當按照所對應固定資產的類別 專案等進行明細核算。三 事業單位應當對除下列各項資產以外的其他固定資產計提折舊 一 文物和陳列品 二 動植物 三 圖書 檔案 四 以名義金額計量的固定資產。四 折舊是指在固定資產使用壽命內,按照確定的方法...