Excel VBA中對形狀的選擇和操作

2022-08-28 08:36:08 字數 1175 閱讀 3347

shapes物件是指定工作表上的所有shape物件的集合。

worksheets(1).shapes.selectall

' ↑ 選定工作表一上的所有形狀。

worksheets(1).shapes(1).fill.presetgradient msogradienthorizontal, 1, msogradientbrass

' ↑ 設定工作表一上形狀一的預設陰影的填充。

worksheets(1).shapes.range(array(1, 3)).fill.patterned msopatternhorizontalbrick

' ↑ 設定工作表一上形狀一和形狀三的填充圖案。

shape物件代表繪圖層中的物件。例如自選圖形、任意多邊形、ole物件或。

worksheets(1).shapes(1).flip msofliphorizontal

' ↑ 將工作表一上的形狀一進行水平翻轉。

worksheets(1).shapes("rectangle 1").flip msofliphorizontal

' ↑ 將工作表一上的名為「rectangle 1」的形狀進行水平翻轉。

activewindow.selection.shaperange(1).fill.forecolor.rgb = rgb(255, 0, 0)

' ↑ 設定活動視窗內選定區域中的第乙個形狀的填充格式,假定至少選定了乙個形狀。

with worksheets(1).shapes.addshape(msoshaperectangle, 144, 144, 72, 72)

' ↑ 在工作表一中新增乙個矩形

.name = "red square"

' ↑ 將其命名為「red squre」

.fill.forecolor.rgb = rgb(255, 0, 0)

' ↑ 為其設定前景色

.line.dashstyle = msolinedashdot

' ↑ 為其設定線條樣式

end with

形狀對介面布局設計的影響

我們日常生活中所了解的形狀各式各樣的,對我們生活影響極其大,比如地下水井蓋為程式設計客棧何做成圓形,電線桿的外形為何是圓形,高鐵火車頭前面為何是尖尖的,而不是方形等等,那麼在產品介面設計中,形狀對它的影響也是極其大,每一種樣式所傳達的感受是不同的,矩形 平行四邊形 圓形 三角形,其他不規則圖形,我把...

CSS中的形狀斑點

我們僅介紹了svg中的形狀變形 其中形狀從一種變為另一種。讓我們看一下彼此斑點的形狀!你知道,粘糊糊的浮腫效果就像表面上的汞滴一樣。我不確定是誰首先在網上發現了這一點,但是我見過的第一處是lucas bebber的演示 請參閱codepen上的lucas bebber lbebber 撰寫的pen ...

PostgreSQL中的幾何形狀

在postgre中,會存在多種幾何型別,如點,線,多邊形,圓等,就像我們的date datetime等。每種型別都有幾種等價的輸入形式 select 1,1 point select 1,1 point 在路徑中,方括號表示閉合路徑,小括號表示開放路徑。所謂閉合路徑就是第乙個點和最後乙個點相連線。表...