- 博客(2)
- 资源 (2)
- 收藏
- 关注
RSS订阅原创 Excel VBA 加载图片
Sub 添加图片() On Error Resume Next Dim lujing As String For i = 1 To 11 For j = 1 To 20 lujing = ThisWorkbook.Path & "\影相\" & Sheet2.Cells(j, i).Value & ".jpg" j = j + 1 With Sheet2
2011-10-26 16:25:56
2044
原创 关于“黑仔”
近日有人和我说，最近好黑仔啊，做什么事情都不顺，照镜子镜子一打开就破裂了，家里的热水器又漏煤气，手机又坏了而且储存在手机的电话全部都没有了。一向乐天的我安慰她，镜子一照就裂了，是“靓爆镜”；发现了家里漏煤气并不是坏事，没有发现才是“大镬”；手机坏了电话号码没有了，是自己没有备份好资料的缘故。其实好多事情只在乎我们从那个角度去分析，角度不同了，得出的结论也就不同。如果我们整天沉
2006-05-27 20:58:00
1605
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人