如何自动在Microsoft Excel 2010中输入平日使用VBA
在本文中，您将学习如何使用任意列中的VBA代码自动输入工作日，即星期一至星期五。
单击“开发人员”选项卡。从“代码”组中选择“ Visual Basic”
单击插入，然后单击模块
这将创建新的模块。
在模块
中输入以下代码=== Sub WeekendOut（）
昏暗开始日期，关闭日期
昏暗y％，i＃
开始= InputBox（“开始日期：”）
关= InputBox（“结束日期：”）
===
对于i =开始关闭
y = y + 1
如果Weekday（i，2）<6那么
单元格（y，2）=格式（i，“ mm-dd-yy”）
单元格（y，1）=格式（i，“ dddd”）
ElseIf Weekday（i，2）= 6然后
其他
y = y-1
如果
结束
下一个我
结束子
===
按ALT + F8快捷键打开“宏”窗口，然后选择宏。
或者，您可以按F5键在VBA屏幕中运行代码。
执行宏后，我们将得到以下输入框。我们要求以MM / DD / YYYY格式输入开始日期
然后代码将要求输入结束日期
因此，我们将在A列中获得星期几，下一个单元格将存储日期。
这样，您可以轻松输入工作日，而无需付出任何手动痛苦。