主题：按用户分组加载表单不同行

老师好！我在项目 LoadUserSetting 里输入以下代码：

If User.Group = "公司领导" Then

    DataTables("计划单").LoadFilter = ""

ElseIf User.Group = "生产部" Then

    DataTables("计划单").LoadFilter = ""

ElseIf User.Group = "企管部" Then

    DataTables("计划单").LoadFilter = ""

ElseIf User.Group = "采购部" Then

    DataTables("计划单").LoadFilter = ""

ElseIf User.Group = "市场部" Then

    DataTables("计划单").LoadFilter = ""

ElseIf User.Group = "财务部" Then

    DataTables("计划单").LoadFilter = ""

Else

    DataTables("计划单").LoadFilter = "申请单位 = '" & User.Group & "'"

End If

DataTables("计划单").Load()

希望实现不同用户权限的加载分配，但出现错误提示，请问代码如何调整，谢谢老师！

此主题相关图片如下：123.png