Question

我的目标是保护所有工作表，并隐藏除一个之外的所有工作表。我遇到的问题是3或4个单元格未受到代码的密码保护，并且在执行以下代码后无法对其进行编辑

您知道为什么我无法在worksheet.protect方法之后编辑单元格吗？

With ThisWorkbook.Worksheets("Post")
.Range("E147:F148") = (Environ$("Username"))
End With

UniquePassword = GenerateUniqueSequence(5)

'==== Password Protect ========
For Each ws In ThisWorkbook.Worksheets

ws.Protect Password:=UniquePassword

If ws.Name = "Post" Then
GoTo Finish
End If

ws.Visible = False


Finish:
Next ws

Answer 1

尝试一下：

  promise.then(newobj => {
    // Do stuff with newobj
  });

'====密码保护========

With ThisWorkbook.Worksheets("Post")
    .Range("E147:F148") = (Environ$("Username"))
End With

UniquePassword = GenerateUniqueSequence(5)

如果这不起作用，那么我建议您更改选择“工作表”的所有单元格并重新选择“锁定”属性，以确保。

Answer 2

好，我已经找到了引起问题的原因，一些以前的开发人员向AllowEditRnage添加了一些单元格-可以在“查看”功能区下找到它-允许用户编辑范围。

从那里移走细胞解决了问题

谢谢大家

Answer 3

$(document).ready(function(){
                    $('form').on('submit', function(e){
                        //Stop the form from submitting itself to the server.
                        e.preventDefault();
                        var idPost = $('#idPost').val();
                        var title = $('#title').val();
                        var content = $('#content').val();
                        $.ajax({
                            type: "POST",
                            url: 'editpost.php',
                             data: { idPost:idPost, title:title, content:content },
                            success: function(data){
                                alert(data);
                            }
                        });
                    });
                });

很少有细胞没有得到适当的保护，为什么？

3 个答案: