首页
学习
活动
专区
圈层
工具
发布

VBA代码分享:将指定星期数转换成标准日期格式

标签:VBA 在forum.ozgrid.com中看到的一段代码,很有意思,特在此分享。 代码的意图是,给出某年某个星期的第几天,运行代码后,给出这天的日期。...例如下图1所示,在输入框中输入“2003.1”,即想要知道2020年第3周第1天的日期。 图1 运行代码后,结果如下图2所示。...图2 详细代码如下: '转换YYWW.DD为YYYY-MM-DD Sub WeeksToDates() '以yywk.dd格式的日期 Dim Todayf As String '输入日期所在的年份...Dim Yearf As Integer '所代表的输入日期 Dim Dayf As Integer '计算之后的某月的日期 Dim Dayf2 As Integer '输入日期的月份...Long 'Todayf = "2302.2" Todayf = InputBox("请输入周数(格式YYWW.DD,例如2302.2,表示2023年第2周的第2天)", "输入转换为对应的日期"

78310
  • 您找到你想要的搜索结果了吗?
    是的
    没有找到

    VBA自定义函数:文本转换为日期时获取正确的日期格式

    标签:VBA,自定义函数 在VBA中处理日期会有些麻烦,当试图将字符串转换为日期时,可能会遇到意想不到的结果,例如: —日期、月份和年份可能会被无意中交换或更改。...—通常认为不正确的日期格式实际上可能被VBA认为是有效的。 示例1: DateSerial函数参数总是按以下顺序排列:年、月、日,这是一件好事,因为我们不会感到困惑。...该函数返回两个值: 1.一个布尔值,用于检查输入文本是否为有效的日期输入。 2.实际日期值。如果输入有效,它会根据选择的日期格式,通过文本到日期的转换生成日期。...如何使用此函数: 需要从三种格式中选择一种:dmy、mdy或ymd,然后将其设置为函数的第一个参数(ByVal date_format as String)。...例如,假设有一个文本框(在工作表中),希望用户输入dmy格式的日期,然后按命令按钮将日期输入到单元格A1。

    3.6K11

    Word VBA技术:设置文档中表格的格式

    标签:Word VBA 在编辑Word文档时,经常会使用表格,也会设置表格格式,让表格看起来更美观。那么,在VBA中如何操作表格来设置其格式呢?...下面介绍两段简单的代码,来学习使用代码初步设置表格的格式。 代码1:设置整个表格的格式 下面的代码设置文档中第一个表格的格式,分别设置其单元格宽度、背景色、字体和字号。...wdBlue .Range.Font.Name = "微软雅黑" .Range.Font.Size = 20 End With Next cCell End Sub 代码2:设置表格中单个单元格的格式...= wdColorBrown .Range.Font.Name = "Arial" .Range.Font.Size = 10 End With End Sub 这些代码都很基础,主要是为学习和应用...Word VBA技术打开思路,有一些代码模板供参考和在此基础上进一步完善。

    2.6K21

    将 Vim 设置为 Rust IDE

    在本文中,我将说明如何为 Rust 应用开发设置 Vim。 安装 Vim Vim 是 Linux 和 Unix 中最常用的命令行文本编辑器之一。...要设置 Rust 进行开发,请下载 Rustup,这是一个方便的 Rust 安装器工具,并在你的终端上运行以下命令(如果你使用 macOS、Linux 或任何其他类 Unix 系统): $ curl -...然后,你将看到如下输出: stable installed - rustc 1.43.1 (8d69840ab 2020-05-04) Rust is installed now. Great!...编译你的应用 现在你可以使用 cargo build 编译你的第一个 Rust 应用: $ cd my_hello_world $ cargo build 你的终端输出将类似于以下内容: Compiling...你在本地的 Vim 编辑器中设置了 Rust IDE,开发了第一个 Rust 应用,并使用 Cargo 包管理器工具构建、测试和运行了它。

    3K20

    设置axios格式为form-data

    最近在参与一个项目过程中遇到一个问题,相信大部分人都遇到过: 在后端与前端约定好application/json格式传递数据时,因为后台是go强类型语言,在定义api接口时,某些字段要求是整型类型,但是对于前端来说输入框或者从...好在后端同学还支持另一种的前后端数据交互格式,即multipart/form-data。通过该格式后端取到前端传递的数据就是数字了(即使前端传递的是字符串),而不像json格式获取的是字符串。...multipart/form-data是基于post方法来传递数据的,并且其请求内容格式为Content-Type: multipart/form-data,用来指定请求内容的数据编码格式。...const instance = axios.create({ baseURL: "https://api.it120.cc", //设置axios为form-data headers

    1K30

    VBA专题10-1:使用VBA操控Excel界面之设置单元格格式

    本文主要讲解设置工作表单元格或单元格区域格式的VBA代码,包括设置字体、数字格式、文本对齐、填充单元格背景色、设置单元格边框等。...图1 代码中,字体设置可以参考Excel中字体框中的下拉列表列举的字体名,颜色设置可以查看VBA帮助,找到合适的颜色常量。...数字格式 示例代码: '将单元格中的数字格式设置为分数 Range("A1:C3").NumberFormat= "# ?/?"...图2 单元格边框线样式,颜色,宽度 示例代码: '设置单元格区域四个边框(左右上下)的边线样式为虚线 Range("A1:C3").Borders.LineStyle= xlDash '设置单元格区域中的单元格顶部边框线为双线...图3 可以在VBA帮助中查找获取代表线条样式的VBA常量值。

    8.7K20
    领券