> 其他 >
帮我解释一下下面每一句的意思!谢谢!
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
求回答问题的,不要用软件翻译
人气:228 ℃ 时间:2019-10-17 03:19:02
解答
目标范围
如果目标.地址< > " $ C 2美元”然后Exit
设置错误处理
只有
------------------
路径和“\”&范围(“C2”).价值与“jpg
------------------------
程序结束
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版