卖逼视频免费看片|狼人就干网中文字慕|成人av影院导航|人妻少妇精品无码专区二区妖婧|亚洲丝袜视频玖玖|一区二区免费中文|日本高清无码一区|国产91无码小说|国产黄片子视频91sese日韩|免费高清无码成人网站入口

excel vba設置圖片高度寬度

文章格式演示例子:Excel VBA 圖片高度和寬度設置詳解Excel VBA 設置圖片大小Excel VBA、圖片大小、高度、寬度、設置辦公軟件、Excel VBA、圖像處理在Excel VBA中,

文章格式演示例子:

Excel VBA 圖片高度和寬度設置詳解

Excel VBA 設置圖片大小

Excel VBA、圖片大小、高度、寬度、設置

辦公軟件、Excel VBA、圖像處理

在Excel VBA中,我們經常需要對插入的圖片進行大小調整,以適應不同的需求。下面讓我們通過以下步驟一起學習如何設置圖片的高度和寬度。

1. 首先,我們需要確認目標圖片所在的工作表和圖片名稱。假設我們要調整的圖片位于Sheet1工作表,并且圖片的名稱為"Image1"。

2. 使用以下VBA代碼行來獲取目標圖片對象,并將其賦值給一個變量。

```VB

Dim img As Shape

Set img ("Sheet1").Shapes("Image1")

```

3. 接下來,我們可以使用`img.Height`和`img.Width`屬性來分別獲取圖片的當前高度和寬度。如果需要改變圖片的大小,我們可以直接對這兩個屬性進行賦值操作。

4. 如果我們想要固定圖片的高度為200像素,我們可以使用以下代碼行將圖片的高度設為200像素:

```VB

img.Height 200

```

5. 同樣地,如果我們想要將圖片的寬度設定為300像素,我們可以使用以下代碼行:

```VB

img.Width 300

```

6. 如果我們希望同時調整圖片的高度和寬度,我們可以通過設置`img.LockAspectRatio`屬性為False來解鎖圖片的縱橫比。這樣我們就可以分別設置圖片的高度和寬度,而不會導致圖片的比例失真。

7. 下面是一段完整的示例代碼,演示了如何通過Excel VBA代碼設置圖片的高度和寬度,并保持圖片的比例:

```VB

Dim img As Shape

Set img ("Sheet1").Shapes("Image1")

img.LockAspectRatio False

img.Height 200

img.Width 300

```

通過以上步驟,我們可以輕松地通過Excel VBA代碼設置圖片的高度和寬度。根據實際需求,我們可以靈活地調整圖片的大小,以滿足不同的要求。

總結:

本文詳細介紹了如何使用Excel VBA代碼設置圖片的高度和寬度。通過上述步驟,讀者可以輕松掌握如何調整插入的圖片的尺寸。希望本文對大家有所幫助!

標簽: