用三列分别记录分别记录序号、问题和答案。假定Q列为序号，R列为问题，S列为答案。B5=IFERROR(VLOOKUP(O5,Q:S,2,FALSE),"")M16=IFERROR(VLOOKUP(O5,Q:S,3,FALSE),"")编制VBA程序：Private Sub Worksheet_SelectionChange(ByVal Target As Range)If Target.Address = "$O$5" ThenRange("M16").Font.Color = Range("M16").Interior.ColorEnd IfEnd Sub其功能是隐藏答案。 插入命令按钮，并编程：P...
|
