做一个解密按钮
For Each dr As Row In Tables("表a").rows dr("某列") = DecryptText(dr("某列"),"a23","op#") dr("某列") = DecryptText(dr("某列"),"a23","op#") dr("某列") = DecryptText(dr("某列"),"a23","op#")Next