vba自定义单元格格式

Question

我需要使用简单的千位格式自定义单元格，例如1000，而不需要任何分隔符或小数。

但是，我希望在输入时删除数字以外的文本字体。

例如，我想输入120118，但是在我复制该数据的论文中，它被格式化为日期，从而12/01/18。我需要Excel在键入后将其保持为120118，删除斜杠（/）。我在访问查询中看到了类似的设置。

Answer 1

您是否尝试过简单地仅使用以下内容粘贴单元格值：

$files = scandir('/upload/');
$counts = [];
foreach ($files as $f) {
    $char1 = substr($f,0,1);
    $counts[$char1] = empty($counts[$char1]) ? 1 : $counts[$char1]+1;
}

或者只是清除单元格格式并使用所需的格式再次格式化。

Answer 2

尝试：

1. 选择范围
2. 主页＆gt;数字＆gt;数字格式（或我认为Ctrl + 1）＆gt;定制
3. 输入ddmmyy
4. 好

可以通过编程方式完成，例如

Thisworkbook.worksheets("Sheet1").range("A1:A50").numberformat = "ddmmyy"

以上只是视觉/外观变化，每个单元格的内部值仍然是一个日期（技术上是一个数字），用于计算目的。

但是，如果我误解了你想要从2018年1月21日开始到数字210118，我认为你需要获得范围的价值，格式为DDMMYY字符串，然后clng() - 或者可能（DD * 10000）+（MM * 100）+（YY）可能有效，然后格式化为＆＃34; 000000＆＃34;保留前导零。