麻辣家族討論版版 » Excel程式區 » 如何改VBA?

返回列表下一主題上一主題發帖

如何改VBA?

中學生 Rank: 2

帖子: 287
主題: 65
精華: 0
積分: 357
點名: 0
作業系統: xp
軟體版本: OFFIC 2007
閱讀權限: 20
註冊時間: 2010-6-4
最後登錄: 2015-8-19

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2010-6-27 15:47 | 只看該作者

如何改VBA?

Sheet2.Shapes.AddPicture Sheet1.Range("B" & Ass).Value, True, True, [A1].Left, [A1].Top, 9.47 / 0.035, 8 / 0.035
要如可才可以改成
Sheet2.Shapes.AddPicture Sheet1.Range("B" & Ass).Value, True, True, Sheet2.Range(cells(1,GG)).Left, Sheet2.Range(cells(1,GG)).Top, 9.47 / 0.035, 8 / 0.035
但這句有錯.

因為[A1] 會改變 [B1] [C1]
請大大門指導

樓主熱帖

收藏

50 字節以內
不支持自定義 Discuz! 代碼

中學生 Rank: 2

帖子: 287
主題: 65
精華: 0
積分: 357
點名: 0
作業系統: xp
軟體版本: OFFIC 2007
閱讀權限: 20
註冊時間: 2010-6-4
最後登錄: 2015-8-19

3^#

發表於 2010-6-27 21:53 | 只看該作者

回復 2# Min

thx.
原來是寫多了個 Range ><

50 字節以內
不支持自定義 Discuz! 代碼

　暱稱: 閔

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 172
主題: 39
精華: 20
積分: 177
點名: 0
作業系統: Microsoft Windows XP
軟體版本: Microsoft Office 2003
閱讀權限: 100
性別: 男
來自: 高雄
註冊時間: 2010-5-1
最後登錄: 2023-3-19

論壇貢獻勳章帥哥勳章

2^#

發表於 2010-6-27 21:40 | 只看該作者

您是指這樣嗎?

Sheet2.Shapes.AddPicture Sheet1.Range("B" Ass).Value, True, True, Sheet2.Cells(1,1).Left, Sheet2.Cells(1,1).Top, 9.47 / 0.035, 8 / 0.035

若是我回答，使您滿意，請您讓我知道！
若是我的回覆，您仍有其他見解，也請您不嗇指教！

靜思自在 : 小事不做、大事難成。

返回列表下一主題上一主題