主题：[各位大神指教]这样如何实现？

filter="星期" & Date.Today.DayOfWeek & "=true"

首先计算出今天是星期几：

http://www.foxtable.com/help/topics/1337.htm

http://www.foxtable.com/help/topics/0229.htm

 

然后根据这个星期几的数字得到对应的列名，根据这一列筛选就行：

 

Tables("xxx").filter =“这一列 = True”

如果你用星期一、星期二这样的列名，可以直接：

 

Dim nm As String  = Format(Date.Today, "dddd") 

Tables("xxx").filter = nm & “ = True”

 

 

狐爸说的我懂了、而且把星期一到星期日七个字段加到客户信息主表里的话，现在也可以实现了，但主表现在有20个字段了、算多吗？如果另建一个星期设定表的话，filter公式该怎么写呢

没关系的，20个字段不算多的。