小编wan*_*dge的帖子

我读过的所有内容都表明我正确地表示了我的变量并调用了我要激活的工作表.最后一行是我得到类型不匹配的地方.那时CPIDws = CERN000006.我在某处读到,这个名字是字母和数字可能会有问题,但还没找到解决办法.

Sub Create_tab()

Dim newWS As Worksheet, CernWS As Worksheet, CPID As Variant
Dim Template As Worksheet, CPIDclm As Long, CERNdata As Range, CPIDcheck As Variant
Dim lngRow As Long, lngCol As Long, i As Integer, CPIDws As Worksheet

Set Template = Sheets("Template")
Set CernWS = Sheets("CERN ID's")
'Set lngRow = 1
'Set lngCol = 1


CernWS.Activate
Cells(1, 1).Select

Do
    ActiveCell.Offset(1, 0).Select
    Set CPID = ActiveCell

    'create a new sheet as a copy of the template
    Sheets("Template").Copy _ …