问题描述:
帮我解释一下下面每一句的意思!谢谢!
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$C$2" Then Exit Sub
On Error Resume Next
ActiveSheet.Shapes("pic").Select
Selection.ShapeRange.Fill.UserPicture _
ThisWorkbook.Path & "\" & Range("C2").Value & ".jpg"
ActiveCell.Select
End Sub
求回答问题的,不要用软件翻译
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$C$2" Then Exit Sub
On Error Resume Next
ActiveSheet.Shapes("pic").Select
Selection.ShapeRange.Fill.UserPicture _
ThisWorkbook.Path & "\" & Range("C2").Value & ".jpg"
ActiveCell.Select
End Sub
求回答问题的,不要用软件翻译
问题解答:
我来补答展开全文阅读