当excel单元格在执行宏后丢失格式时，如何修复单元格格式

您好，我正在使用DDE将数据填充到excel工作表中。请从Oracle窗体执行命令。代码很好，但是当我使用DDE执行下面的宏格式化章节\u标题\u 2时。Execute命令会给行上色，但也会将日期更改为数字，而单元格的值显示为正确的日期，它显示为39234

Sub FORMAT_SECTION_TITLE_2()

    With Selection.Interior
        .ColorIndex = 7
        .Pattern = xlSolid
    End With
    Selection.Font.Bold = False
End Sub

我也尝试过改变很多事情，但没有任何帮助。请建议

谢谢

更新1： Siddharth我在excel工作表中添加了一个新的子项，如您所述，我的工作表名称与您所述的Sheet1相同

Sub formatColumn()
Sheets("Sheet1").Columns(1).NumberFormat = "dd-mmm-yy"
End Sub

---

两个半小时的聊天后发现，这似乎是一个XY问题：）

正如我上面提到的，上面的代码对格式更改不负责。格式已被另一段代码更改

Sub two_decimals()
    Selection.NumberFormat = "#,##0.00"
End Sub

实际的错误在于oracle代码，它在

格式部分_TITLE _2

之后调用了

两位小数

，我对oracle不太在行，但调试时我们发现了这个问题

---

顺便说一句：多亏了你，我今天在甲骨文学会了一些东西

上述代码不负责格式更改。你可以尝试两件事。在开始该过程之前或在完成导出过程之后使用此代码<代码>工作表（“工作表1”）。第（5）列。编号格式=“dd mmm yy”将工作表1更改为相关工作表名称，将第5列更改为相应的列编号。现在试试它的IDDHATH，我应该在这个过程之前或之后使用哪种代码——你提到的代码还是我在我的帖子中提到的代码。还有一个问题是，由于某些业务条件，我们需要为excel行着色，我上面的代码正在执行预期的操作，但我的代码的唯一问题是它只会干扰着色行的格式。如果我不执行此宏为行着色，我的数据在excel中状态良好…请建议使用我提到的代码。让我解释一下。如果您将我的代码放在代码之前，那么在导出之前，它将格式化相关输出的列。如果将其放在末尾，那么一旦导出完成，代码将根据需要格式化列。一个接一个地尝试。不，西德哈特，我在过程结束时尝试过。但是没有luckCan你能展示你尝试过的完整代码吗？你可以更新上面的帖子。导出后是否还有图纸的快照？