另外问一句
兄弟有没有spss的好的视频可以借我学习一番

推荐该版块赵志东的那个视频学习
很好的视频，另外如果你是想学excel方面的知识最好是去excelhome论坛学习
比这里事半功倍，这里清谈者甚多，实际操作的少之又少

谢谢楼上的，晚上自己也小研究了一下，问题得到解决，帮我看看
Sub count()
Dim position As Integer
Dim start, copyrow, jstart As Integer
start = 1
copyrow = 2

Dim ws1 As Worksheet: Set ws1 = ThisWorkbook.Sheets("Sheet1")
Dim ws2 As Worksheet: Set ws2 = ThisWorkbook.Sheets("Sheet3")
             Dim LastRowAinsheet3 As Long
             LastRowAinsheet3 = ws2.Cells(ws2.Rows.count, "A").End(xlUp).Row
             MsgBox ("LastRowAinsheet" & "=" & LastRowAinsheet3)
      
            
              Dim LastRowA As Long
             LastRowA = ws1.Cells(ws1.Rows.count, "A").End(xlUp).Row
     
               
            For jstart = 2 To LastRowA
     
                     For start = 2 To 303
                     position = InStr(1, UCase(ws1.Cells(jstart, 1).Value), ws1.Cells(start, 17).Value)
                            If position > 0 Then
                         ws1.Range("A" & jstart, "I" & jstart).Copy ws2.Range("A" & LastRowAinsheet3 + 1, "I" & LastRowAinsheet3 + 1)
                        LastRowAinsheet3 = LastRowAinsheet3 + 1
                    '  MsgBox (ws1.Range("A" & jstart).Value)
                    ' MsgBox ("jstart" & "=" & jstart)
                     Exit For
                     End If
                     Next start
            
             Next jstart
            
        
  ws1.Range("A2", "J100").ClearContents
End Sub

不太用SPSS，用SAS比较多一点

能運行成功說明就是可以的
刚开始学习的时候只要能实现效果即可
以后再注意程序的效率
敲代码还是一步一步慢慢来吧，急不得

SAS  我以前在学校的时候貌似都是用SPSS的
SAS说实话以前还没接触过
有空了找找资料去看看

public static void copyRows(HSSFWorkbook wb, String pSourceSheetName, String pTargetSheetName, int pStartRow,
int pEndRow, int pPosition) {
HSSFRow sourceRow = null;
HSSFRow targetRow = null;
HSSFCell sourceCell = null;
HSSFCell targetCell = null;
HSSFSheet sourceSheet = null;
HSSFSheet targetSheet = null;
int cType;
int i;
int j;
int targetRowFrom;
int targetRowTo;

if ((pStartRow == -1) || (pEndRow == -1)) {
return;
}
sourceSheet = wb.getSheet(pSourceSheetName);
targetSheet = wb.getSheet(pTargetSheetName);
List oldRanges = new ArrayList();
for (i = 0; i < sourceSheet.getNumMergedRegions(); i++) {
oldRanges.add(sourceSheet.getMergedRegion(i));
}
// 拷贝合并的单元格。原理：复制当前合并单元格后，原位置的格式会移动到新位置，需在原位置生成旧格式
for (int k = 0; k < oldRanges.size(); k++) {
CellRangeAddress oldRange=  oldRanges.get(k);
CellRangeAddress newRange = new CellRangeAddress(oldRange.getFirstRow(), oldRange.getLastRow(),
oldRange.getFirstColumn(), oldRange.getLastColumn());

if (oldRange.getFirstRow() >= pStartRow && oldRange.getLastRow() <= pEndRow) {
targetRowFrom = oldRange.getFirstRow() - pStartRow + pPosition;
targetRowTo = oldRange.getLastRow() - pStartRow + pPosition;
oldRange.setFirstRow(targetRowFrom);
oldRange.setLastRow(targetRowTo);
targetSheet.addMergedRegion(oldRange);
sourceSheet.addMergedRegion(newRange);
}
}
// 设置列宽
for (i = pStartRow; i <= pEndRow; i++) {
sourceRow = sourceSheet.getRow(i);
if (sourceRow != null) {
for (j = sourceRow.getLastCellNum(); j > sourceRow.getFirstCellNum(); j--) {
targetSheet.setColumnWidth(j, sourceSheet.getColumnWidth(j));
targetSheet.setColumnHidden(j, false);
}
break;
}
}
// 拷贝行并填充数据
for (; i <= pEndRow; i++) {
sourceRow = sourceSheet.getRow(i);
if (sourceRow == null) {
continue;
}
targetRow = targetSheet.createRow(i - pStartRow + pPosition);
targetRow.setHeight(sourceRow.getHeight());
for (j = sourceRow.getFirstCellNum(); j < sourceRow.getPhysicalNumberOfCells(); j++) {
sourceCell = sourceRow.getCell(j);
if (sourceCell == null) {
continue;
}
targetCell = targetRow.createCell(j);
// targetCell.setEncoding(((Object) sourceCell).getEncoding());
targetCell.setCellStyle(sourceCell.getCellStyle());
cType = sourceCell.getCellType();
targetCell.setCellType(cType);
switch (cType) {
case HSSFCell.CELL_TYPE_BOOLEAN:
targetCell.setCellValue(sourceCell.getBooleanCellValue());
// System.out.println("--------TYPE_BOOLEAN:" +
// targetCell.getBooleanCellValue());
break;
case HSSFCell.CELL_TYPE_ERROR:
targetCell.setCellErrorValue(sourceCell.getErrorCellValue());
// System.out.println("--------TYPE_ERROR:" +
// targetCell.getErrorCellValue());
break;
case HSSFCell.CELL_TYPE_FORMULA:
// parseFormula这个函数的用途在后面说明
targetCell.setCellFormula(parseFormula(sourceCell.getCellFormula()));
// System.out.println("--------TYPE_FORMULA:" +
// targetCell.getCellFormula());
break;
case HSSFCell.CELL_TYPE_NUMERIC:
targetCell.setCellValue(sourceCell.getNumericCellValue());
// System.out.println("--------TYPE_NUMERIC:" +
// targetCell.getNumericCellValue());
break;
case HSSFCell.CELL_TYPE_STRING:
targetCell.setCellValue(sourceCell.getRichStringCellValue());
// System.out.println("--------TYPE_STRING:" + i +
// targetCell.getRichStringCellValue());
break;
}

}

}

}

private static String parseFormula(String pPOIFormula) {
final String cstReplaceString = "ATTR(semiVolatile)"; //$NON-NLS-1$
StringBuffer result = null;
int index;

result = new StringBuffer();
index = pPOIFormula.indexOf(cstReplaceString);
if (index >= 0) {
result.append(pPOIFormula.substring(0, index));
result.append(pPOIFormula.substring(index + cstReplaceString.length()));
} else {
result.append(pPOIFormula);
}

return result.toString();
}