从自定义文档属性中的日期获取第二天

2023-12-30

我有包含日期​​的自定义文档属性(定义为日期)。

我试图从自定义文档属性(日期字段)中的日期获取第二天。

{={  DOCPROPERTY  DateFieldTest  }+1 \@"d MMMM YYYY"}
'toggle DOCPROPERTY Field
{=07/04/2016+1 \@"d MMMM YYYY"}
'toggle calculation field
1

我也尝试过:

{=DATE(YEAR({  DOCPROPERTY  DateFieldTest  }),MONTH({  DOCPROPERTY  DateFieldTest  }),DAY({  DOCPROPERTY  DateFieldTest  })+1) \@"d MMMM YYYY"}
'toggle DOCPROPERTY Field
{=DATE(YEAR(07/04/2016),MONTH(07/04/2016),DAY(07/04/2016)+1) \@"d MMMM YYYY"}
'toggle calculation field
!Syntaxe Error, (

Charles Kenyon 花了一些时间收集了许多人的作品,并将其发布在他的网站上:http://www.addbalance.com/word/datefields2.htm http://www.addbalance.com/word/datefields2.htm

计算日期的基本技巧是将它们分解为日、月和年,您正在尝试这样做,但使用的 VBA 方法在 Word 字段中不起作用。事实上,在日期计算方面,Word 没有任何“智能”——您必须自己完成这一切。那么,简单的例子:

theDate + 1 = { DocProperty theDate \@ "MMMM" } { = {DocProperty theDate \@ "dd" } + 1 }, { DocProperty theDate \@ "yyyy" }

这很好,直到您到达该月的最后一天。然后你必须考虑如果这是一年的最后一天该怎么办......


这非常复杂,所以我只是从 Charles 的网站复制信息:


这是一个令人头晕的地方!接下来的字段以常规书面英语格式提供自文档创建之日起两周的日期:

  • 创建日期:2015 年 7 月 9 日 - 所需字段结果 = 2015 年 7 月 23 日
  • 创建日期:2014 年 7 月 23 日 - 期望的字段结果 = 2014 年 8 月 6 日
  • 创建日期:2014 年 12 月 20 日 - 所需字段结果 = 1 月 3 日, 2015年
  • 创建日期:2015 年 2 月 27 日 - 期望的字段结果 = 3 月 2015年12月
  • 创建日期:2016 年 2 月 27 日 - 所需的字段日期 结果 = 2016 年 3 月 13 日

    { QUOTE "{ SET " 延迟" "14" } { SET "DaysInMonth" { IF { CreateDate \@ "MM" } 2
    { = ROUND(30.575*{ CreateDate \@ "MM" },0)- ROUND(30.575*{ = { CreateDate \@ "MM" } -1 },0) } { IF { = MOD( { CreateDate \@"yy" } , 4 ) } > 0 "28" "29" } } } { SET "下个月" { IF { CreateDate \@ "MM" } = 12 "1/97" "{ = { 创建日期 \@ "MM" } + 1 }/97 } } { IF { = { REF "延迟" } + { CreateDate \@ "dd" } } 12 { CreateDate \@ "yyyy" } { CreateDate \@ "{ = 1 + { CreateDate \@ "yyyy" } # "xxxx" }" } } } }" }

上面示例字段中的颜色(下图!)代表我尝试匹配字段分隔符并显示字段嵌套。为了清楚起见,添加了换行符,并且换行符不应成为实际字段的一部分。我添加的这些修改有助于说明该字段的外观。以绿色显示的字段不包含嵌套字段,但可能包含对其他字段设置的书签值的引用。

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

从自定义文档属性中的日期获取第二天 的相关文章

  • 如何在 MS Word 中的每个标题末尾应用宏?

    我有一个包含各种标题的文档 因此不一定是标题 1 或标题 2 而是所有类型的标题 我想做的是编写一个宏 例如 删除每个标题末尾的 2 个空格 例如 我们有 这是一个标题 在标题的最后 我会这样做 Selection Delete Unit
  • Range.End() 困惑

    我有一个关于 VBA 中 Range End 属性的一般性问题 我已经阅读了有关该房产的信息here http msdn microsoft com en us library bb221181 aspx 但我还是很困惑 例子 With w
  • IE.navigate2 因保护模式关闭而失败

    我正在从 Excel VBA 自动化 IE8 Excel 2010 Windows 7 Set IE CreateObject InternetExplorer Application IE Navigate2 URL 如果 URL 是处于
  • VBA 中的 VSTO:AddIn.Object 有时不返回任何内容 (null)

    Given VSTO 插件 An override object RequestComAddInAutomationService 它返回一个名为的类的实例Facade在我的场景中 Excel 2007 中的 VBA 宏可访问AddIn O
  • 在 VBA 中使用 getElementsByClassName

    我正在使用此代码从页面获取产品名称 页面代码是 div class product shop col sm 7 div class product name h1 Claro Glass 1 5 L Rectangular Air Tigh
  • 我需要代码在两行之间复制并粘贴到另一张表中,并给出任何值?

    例如 我有 50 行数据 第一行有学生的名字 我需要代码将数据从 RAM 复制到 RAMESH 在这之间我有 20 行 我需要代码来复制行并将其粘贴到另一张纸中 它不应该问我名字 默认情况下 它必须采用 RAM 和 RAMESH 名称 好的
  • Excel VBA 导出到文本文件。需要删除空行

    我有一个工作簿 使用以下脚本将其导出到文本文件 它工作正常 但是当我打开文本文件时 末尾总是有一个空行 这导致我在生成此文本文件后运行的另一个脚本出现问题 有关如何从导出中删除空行的任何帮助 Code Sub Rectangle1 Clic
  • OpenArgs 为空问题

    我正在使用OpenArgs使用时发送值的参数DoCmd OpenForm DoCmd OpenForm frmSetOther acNormal acFormAdd acDialog value 然后我用Me OpenArgs在打开的表格内
  • VBA根据单元格的值是否为零显示/隐藏行

    我有一个 Excel 工作表 我想根据另一个单元格中的值隐藏或取消隐藏某些行 简而言之 整个事情应该取决于单元格中的值C2 D2 E2 If C2 is blank我想rows 31 to 40被隐藏 如果是的话不为空 他们需要是visib
  • Confluence:使用 VBA 更新现有页面

    我尝试使用 VBA 更新 Confluence 页面 我的想法是使用REST API加载页面内容 修改内容然后上传修改后的版本 这是我的代码 Private Sub TestRESTApi Dim uname As String uname
  • Outlook 无法识别一个或多个姓名

    我有以下 vba 代码 它读取邮箱并向任何发送无效代码作为邮箱回复的用户发送回复 但有时会收到运行时错误 Outlook 无法识别一个或多个名称 我的问题是 创建新的 MAPI 配置文件是否可以解决该问题 或者我是否需要添加一个代码来解析地
  • VBA中的字符串是可以迭代的数组吗?

    VBA中字符串是数组吗 例如 我可以像在 C C 中那样迭代它吗 做这样的事情 char myArray 10 for int i 0 i lt length i cout lt lt myArray i VBA 中的等价物是什么 它的行为
  • 所以,我有 6 个“主”文件,然后分为 40 个单独的文件

    我将简要描述我想要的内容 我有 6 个 主 文件 每个文件包含 40 个工作表 如下所示 AG 工作簿有 HR Gp 1 到 HR Gp 40 ER 工作簿有 FB Gp 1 到 Gp 40 等 所有工作表都已 平坦 我已经成功创建了一个适
  • VBA在多个文件夹中搜索特定子文件夹并移动其中的所有文件

    你能帮助我吗 我想要一个宏vba来搜索SPECIFIC例如 所有存在并移动其文件的文件夹和子文件夹之间的子文件夹 Xfolder P Desktop Folder1 subfolder SUBFOLDER1 Xfolder 我正在使用 VB
  • Redim Preserve 给出“下标超出范围”

    我想要Redim Preserve一个数组我不断收到错误 下标超出范围 我知道只有最后一个维度的大小可以更改 这正是我正在做的事情 这里出了什么问题 数组的类型是Variant BmMatrix Sheets BENCH Range a60
  • Excel 2013 数据透视表不会更改当前页面,除非手动导航到

    我们有一小段 VBA 代码 多年来一直完美运行 本质上是 Me PivotTables APivot PivotFields AField CurrentPage Some text 这种方法一直有效 直到 Excel 2013 该行将失败
  • 通过 Excel / VBA 调用 DLL 中的 C++ 函数在传递双参数时生成异常

    我试图通过 DLL 在 Excel VBA 中使用 C C 静态函数 我在 VS17 中调试时遇到异常 我怀疑这是参数传递方式的问题 它是双精度 EXCEL EXE 中 0x00007FFA28BBA14F kernel32 dll 处抛出
  • 使用 VBA 将 Excel 电子表格中嵌入的 Word 文档保存到磁盘

    我们有一个 Excel 电子表格 当前使用存储在公司 LAN 上的 Word 模板生成报告 这对于内部用户来说效果很好 但对于没有连接到 LAN 的任何人来说就不行了 例如 笔记本电脑用户 管理层不希望将模板作为单独的文件分发给外部用户 而
  • 如何将参数从 Excel/VBA 传递到 Rstudio 中的脚本

    我正在尝试使用 Rstudio 从 VBA 打开 R 脚本 同时将参数传递给 R 脚本 然后我可以使用 commandArgs 访问该脚本 该问题与此处描述的问题非常相似 WScript Shell 用于运行路径中包含空格且来自 VBA 的
  • VBA Excel:将范围值分配给新范围

    我在将一个工作簿范围中的值分配给当前工作簿中的某个范围时遇到问题 当我使用 Range A1 C1 分配我的范围时 此代码工作正常 但是当我使用 Range Cells 1 1 Cells 1 3 定义我的范围时 该函数会失败 Sub Co

随机推荐

  • 在循环内声明变量,是好习惯还是坏习惯?

    问题 1 在循环内声明变量是好习惯还是坏习惯 我读过有关是否存在性能问题的其他线程 大多数人说不 并且您应该始终将变量声明为靠近它们将要使用的位置 我想知道是否应该避免这种情况 或者是否确实是首选 Example for int count
  • 如何填充页面网格并将内容宽度布置在单列中?

    我正在尝试为网络开发创建弹性框列 然而 我所能做的就是制作一列弹性盒 有哪些基本 CSS 代码可以验证 div 卡是否始终填充页面网格 并且宽度足够小 内容会布局在单列中 charset utf 8 CSS Code section dis
  • 为 matplotlib Slider 小部件设置刻度标签

    The slider https matplotlib org stable api widgets api html highlight slider matplotlib widgets Slidermatplotlib 中的行为随着最
  • ValueError:无法在空集合上计算 LDA(无术语)

    当尝试计算较小规模的语料库的 lda 时 在 python 中出现此错误 但在其他情况下工作正常 语料库的大小是 15 我尝试将主题数设置为 5 然后将其减少到 2 但它仍然给出相同的错误 ValueError 无法在空集合上计算 LDA
  • 计算流中的元素数并返回 Integer 而不是 long

    我需要计算流中的元素并将其分配给一个整数而不进行强制转换 count 确实返回很长 想到了 collect Collectors reducing 但无法弄清楚 我觉得有一些简单的事情我不明白 My Try Stream
  • bootstrap datepicker 设置日期格式 dd/mm/yyyy

    我必须以 dd mm yyyy 格式在日期选择器中设置日期 我想用 Javascript 做的是这样的 var year 2014 var month 5 var day 10 var realDate new Date year mont
  • 使用 Swift CFunctionPointer 将回调传递给 CoreMIDI API

    目前这可能实际上是不可能的 这将是不幸的 我正在尝试调用 CoreMIDI API 来设置 MIDI 输入 这就是我在 Swift 中尝试做的事情 var midiClient MIDIClientRef var inputPort MID
  • 使用 Ruby Enterprise Edition,gems 没有安装在我期望的位置

    我刚刚安装了 Ruby Enterprise Edition 并正在为其安装一些 gem 服务器上还安装了 Stock Ruby 1 8 6 我已经添加了 opt ruby enterprise 1 8 6 20090201 bin to
  • Rails 3:fields_for 在编辑视图上显示空白字段

    在我的 Rails 3 应用程序中 我在 form for 中使用 fields for 来创建和编辑问题和答案 但我在 fields for 上的编辑视图寻求答案时遇到问题 当我在数据库中为 1 个问题注册了 2 个答案时 编辑视图会显示
  • 在 NSTableCellView firstResponder() 中制作 NSTextField

    对于那些不想阅读 20 条评论来寻找答案的人 这对我有用 tableView 是基于视图 而不是基于单元格 属性检查器 tableView reloadData 不够快 使用 insertRow at 0 withAnimation lef
  • 离子标签徽章

    我正在尝试在选项卡中的图标上添加徽章 目前的结果是 http play ionic io app decfc14cb171 http play ionic io app decfc14cb171 有谁知道如何将它们放在每个图标的右上角 我尝
  • .htaccess 重写:子域作为 GET 参数,文件路径 afterdomain 完好无损

    我想使用 htaccess 将子域重写为 get 参数 但保持域后面的所有内容不变 将参数添加到末尾或 url 期望的结果 http mpmain example com gt index php http www example com
  • 在运行时创建 JMS 队列 [关闭]

    Closed 这个问题是基于意见的 help closed questions 目前不接受答案 我正在开发一个应用程序 应用程序用户可以在其中创建 删除队列 此外 他还能够将消息从一个队列移动到另一个队列 删除消息 根据某些过滤器重新排列队
  • 处理 UI 上未启动的触摸

    我寻求一种方法来处理不在 Unity 引擎中的 UI 元素上启动的触摸 其目的是在 地图 上进行旋转 平移和放大 以下简称 地图 但是 如果触摸事件发生在任何 UI 元素上 则应由该 UI 元素而不是地图来处理 我认为这样的例子之一就是 G
  • ruby net-sftp 逐行读取文件

    我正在使用 ruby 2 0 0 和 Rails 4 0 0 我有类似的东西 require net sftp sftp Net SFTP start ftp app com username password gt password sf
  • 如何在 gradle 中排除传递项目依赖项

    given dependencies compile project subproject transitive false 这在 gradle 1 3 中无法正常工作 即所有依赖项都包含在子项目中 这是一个错误还是有不同的语法来排除项目
  • 带有 jQ​​uery 的 JavaScript 命名空间

    如何管理依赖于 jQuery 的自定义 JavaScript 库的命名空间 你是否创建自己的命名空间 比如说foo并在那里添加你的对象 例如foo myClass foo myFunction 或者将对象添加到 jQuery 的命名空间中
  • ngOnDestroy 和 $('#element').foundation('destroy');

    我正在尝试在我的 Angular2 应用程序中实现 Sticky Magellan 一旦我离开视图 我想删除该插件 因为否则当我重新访问视图时我会遇到问题 所以我正在使用 ngOnDestroy void element foundatio
  • XQuery 正则表达式可以匹配空字符吗?

    我想从字符串中删除所有 NULL 字符 我知道正确的正则表达式匹配应该是 x00 并且我已经尝试了以下 XQuery replace message x00 它会导致错误 exerr ERROR Conversion from XPath2
  • 从自定义文档属性中的日期获取第二天

    我有包含日期 的自定义文档属性 定义为日期 我试图从自定义文档属性 日期字段 中的日期获取第二天 DOCPROPERTY DateFieldTest 1 d MMMM YYYY toggle DOCPROPERTY Field 07 04