excel替换单元格内容

excel替换单元格内容 =DATE(MID(J2,7,4), MID(J2,11,2),MID(J2,13,2) ) 1、功能:在C列查找A列中的内容 并 将A列对应的值赋给C 列 2、ALT+F11打开宏面板，选择SHEET1，输入以下代码: Sub test() Dim v1 Dim v2 For i = 1 To 10179 v1 = Cells(i, 3).Value For j = 1 To 4045 v2 = Cells(j, 1).Value If v1 = v2 Then Cells(i, 4).Value = Cells(j, 2).Value End If Next j Next i End Sub …………………… 保存后F5执行宏 说明:5 A列数据的行数 10 C列数据的行数 Dim v2 定义变量v2 v1 = Cells(i, 3).Value 将单元格(i,3)的值赋给v1变量 3、结果: