VBA - “格式化”功能未在1台计算机上识别

Posted 2021-04-15

我在VBA中编写了一些代码来帮助我的同事并且它在8台计算机上工作，但在这台计算机上，每次我尝试启动代码时，它都会给我一个错误。

对不起，我正在从法语翻译成英语，但错误是：

编译错误：找不到项目或库

实际代码是：

'           ============================================
'           === TRAITEMENT DES PRODUITS DU GROUPE 10 ===
'           ========== FOURNISSEURS STANDARDS ==========
'           ============================================
            Case 10
            Select Case var_Prix
                Case Is < 25
                    Range(COLLISTE & var_Ligne).Value = Format(99999, "#,####0.0000")
                    Range(COLPRIX2 & var_Ligne).Value = Format(var_Prix / (0.5 - TRANSPORT), "#,####0.0000")
                    Range(COLPRIX3 & var_Ligne).Value = Format(var_Prix / (0.52 - TRANSPORT), "#,####0.0000")
                    Range(COLPRIX4 & var_Ligne).Value = Format(var_Prix / (0.55 - TRANSPORT), "#,####0.0000")
                    Range(COLPRIX5 & var_Ligne).Value = Format(var_Prix / (0.6 - TRANSPORT), "#,####0.0000")
<the code continues>

它突出显示了格式。似乎没有安装“格式库”但我已经尝试了谷歌，显然“格式”安装了Windows或办公室。

答案

正如JKP所问，是否有任何标记为“遗失”的引用？缺少Ref可能会导致其他引用库中出现不可预测的行为。作为临时解决方案，请尝试通过放置VBA来强制引用。在格式之前，例如= VBA.Format（99999，“＃，#### 0.0000”）这通常有效。