Dim opts As ErrorCheckOptionCollection = workBook.Worksheets(0).ErrorCheckOptionsDim opt As ErrorCheckOption = opts(index)代码之上,该代码用于在Excel中禁用ErrorCheckOption,但在运行时它仍保持启用状态。一旦下载了excel表格,如果我们双击单元格,单元格显示为绿色(即文本格式),您
代码 Dim j As LonglastRow = Sheets(2).Cells(Rows.Count, "A").End(xlUp).RownumeroComboBox_numero.Value 'value of the number ID filled in the combobox Sheets(5).Cells).Value 'takes the ID number from an other