雖然這篇Shaperange fill鄉民發文沒有被收入到精華區:在Shaperange fill這個話題中,我們另外找到其它相關的精選爆讚文章
[爆卦]Shaperange fill是什麼?優點缺點精華區懶人包
你可能也想看看
搜尋相關網站
-
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#1ShapeRange.Fill 屬性(Excel) | Microsoft Docs
ShapeRange.Fill 屬性(Excel) ... 運算式。填滿. 運算式代表ShapeRange 物件的變數。 ... Fill .ForeColor.RGB = RGB(128, 0, 0) .BackColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#2Change color shape with a macro - Stack Overflow
I want change the color of a shape with a macro. ActiveSheet.Shapes.Range(Array("Rectangle 20")).Select If Selection.ShapeRange.Fill.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#3ShapeRange.Fill.ForeColor.SchemeColor - Mr. Excel
Hi All Been a while since I've had to ask a question here. The below code should change the fill colour of the shape in question but tells ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#4word添加水印,.NET执行宏 - 1024搜-程序员专属的搜索引擎
ShapeRange.TextEffect.NormalizedHeight = False Selection.ShapeRange.Line.Visible = False Selection.ShapeRange.Fill.Visible = True Selection.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#5一起幫忙解決難題,拯救IT 人的一天
Fill.ForeColor '' a.Font.Hidden = True ' If sel.ShapeRange.Fill.BackColor = 16777215 Then ' 'If sel.ShapeRange.TextFrame.Parent.Child = False Then ' tr.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#6ShapeRange.Fill Property (Excel) - VBA-content - GitHub
ShapeRange.Fill Property (Excel). Returns a FillFormat object for a specified shape or a ChartFillFormat object for a specified chart that contains fill ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#7電子報第308 期 - FreeContent : 社團法人台灣省土木技師公會
Fill.Visible = msoTrue. (97) Selection.ShapeRange.Fill.Solid. (98) Selection.ShapeRange.Fill.Transparency = 0#. (99) Selection.ShapeRange.Line.Weight = 1.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#8shape填充颜色及透明度修改-Excel VBA程序开发 - ExcelHome ...
2015-6-18 11:14. ActiveSheet.Shapes.AddShape(msoShapeOval, 20, 20, 100, 100).Select Selection.ShapeRange.Fill.ForeColor.RGB = RGB(255, 0, 0) '填充为红色.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#9ShapeRange.ApplyFountainFill-CDR插件开发手册中文版
Description. Member of ShapeRange. The ApplyFountainFill method applies a specified fountain fill to the shapes in a shape range.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#10Selection.ShapeRange.Fillとは - インストラクターのネタ帳
Excel VBAのコード「Selection.ShapeRange.Fill」について解説しています。
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#11ActiveSheet.Shapes(picture_name).Select這句之后出錯的
ShapeRange.Fill.ForeColor.RGB = color_rgb. Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = FormatPercent(picture_value)
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#12ShapeRange.Fill Problem in Excel 2007 - VBA Visual Basic ...
Hi, Does anyone know how I can set a two colour gradient fill in E2007 VBA? I output a report that has 2 rectangles as the background.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#13excelvbamsoline
Fill.Transparency = 0#. Selection.ShapeRange.Line.Weight = 0.75. Selection.ShapeRange.Line. ... Fill.Visible = msoTrue. Selection.ShapeRange.Fill.ForeColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#14修改shape的文字 - 台部落
ShapeRange (1).TextFrame2.TextRange.Characters(1, 1).Font .NameComplexScript = "+mn-cs" .NameFarEast = "+mn-ea" .Fill.Visible = msoTrue.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#15ShapeRange.Fill Property
ShapeRange.Fill Property. [This is preliminary documentation and is subject to change.] [Missing <summary> documentation for "P:Microsoft.Office.Interop ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#16グラフィックス・ライブラリのソース・プログラム ...
ShapeRange.Line.ForeColor.RGB = cLineRGB Selection.ShapeRange.Fill.Transparency = 1 gScreenX = x2 gScreenY = y2 End Sub ' 矩形を描いて内側を塗りつぶすSub ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#17Hide/Show Shapes on Worksheet??
Fill.Visible = msoTrue. Selection.ShapeRange.Fill.Solid Selection.ShapeRange.Fill.ForeColor.SchemeColor = 8. Selection.ShapeRange.Fill.Transparency = 0#
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#18Excel VBA: Fill.UserPicture - Super User
First, .shaperange isn't a property or method of comment so you can't use that. Here's an example that would work - Sub tete() Dim rng As Range Set rng ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#19delphi 呼叫office word,製作浮水印文件
ShapeRange.TextEffect.NormalizedHeight = False Selection.ShapeRange.Line.Visible = False Selection.ShapeRange.Fill.Visible = True Selection.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#20Class FillFormat (Word VBA)
The class FillFormat represents fill formatting for a shape. ... Fill and ShapeRange.Fill ... PresetGradient - Sets the specified fill to a preset gradient.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#21請問如何用VBA在Excel中畫矩形呢? - 藍色小舖
ShapeRange.Fill.Visible = msoTrue Selection.ShapeRange.Fill.Solid Selection.ShapeRange.Fill.ForeColor.SchemeColor = 10 Selection.ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#22VB 如何重複執行excel 檔案的Selection 指令
可是當我再一次執行功能選單, 打開Form2按下CommandButton的時候, 卻在. "Selection.ShapeRange.Fill.Patterned msoPatternLightDownwardDiagonal".
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#23ShapeRange.ApplyHatchFill method - Developer Area
ShapeRange.ApplyHatchFill method. Applies a preset hatch fill from a library to the shapes in the range. Syntax: Sub ApplyHatchFill(ByVal LibraryName As ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#24Group Shape By Color | Chandoo.org Excel Forums
If Selection.ShapeRange.Fill.ForeColor.SchemeColor = ActiveSheet.Range("A1").Interior.ColorIndex Then x = UBound(mArray) mArray(x) = sH.Name
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#25java操作word生成水印升級版- IT閱讀
Dispatch.call(fill, "Solid"); /** * 設定水印旋轉角度、水印大小 */ Dispatch.put(shapeRange, "Rotation", new Variant(0));//旋轉角度 ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#26[D]python扩展pywin32添加word文字水印 - CSDN社区
ShapeRange.TextEffect.NormalizedHeight = False w.Selection.ShapeRange.Line.Visible = False w.Selection.ShapeRange.Fill.Visible = True
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#27Search - Foxite
Fill.Visible = msoTrue .Selection.ShapeRange.Fill.Solid .Selection.ShapeRange.Fill.ForeColor.SchemeColor... .Selection.ShapeRange.Line.Transparency = 0 .
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#28[Lotus Script]_Word轉轉轉! - 南極貓.手扎
Fill.Solid oWord.Selection.ShapeRange.Fill.ForeColor.RGB = 30 '色彩? oWord.Selection.ShapeRange.Fill.Transparency = 0.6 '透明度
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#29Изменение цвета формы с помощью макроса - CodeRoad
Я хочу изменить цвет фигуры с помощью макроса. ActiveSheet.Shapes.Range(Array("Rectangle 20")).Select If Selection.ShapeRange.Fill.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#30Solved: VBA to select picture in a comment [Archive]
ShapeRange.Fill.BackColor.RGB = RGB(255, 255, 225) Selection.ShapeRange.Fill.UserPicture _ "C:\Users\Simon\Pictures\Building blocks2.gif"
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#31ShapeRange Property - Microsoft Publisher Visual Basic ...
ShapeRange.Fill.Patterned Pattern:=msoPattern20Percent End Sub. The following example applies shadow and fill formatting to all the shapes in the selection.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#32Hide/Show Shapes on Worksheet?? - Excel Help Forum
... I get this sub: ' Macro11 Macro ' Macro recorded 6/27/2005 by Ken Loomis ' ' Selection.ShapeRange.Fill.Visible = msoTrue.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#33想學習如何在PPT中編寫VBA代碼?谷歌搜索助你一臂之力 - 壹讀
ShapeRange.Fill.TwoColorGradient msoGradientVertical, 1 '添加雙色漸變,方向從左到右. ActiveWindow.Selection.ShapeRange.Fill.ForeColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#34Problem With Shapes In Vba -- Fill Is Visible? - hello I am trying...
This shape should have no fill, so that people can see the contents of the merged ... Fill.Visible = msoFalse Selection.ShapeRange.Fill.Solid Selection.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#35Word文檔中添加圖表、圖形對象 - 資訊咖
添加圖形後給圖形添加上紫色RGB(255, 0, 255),大家要注意添加顏色的寫法: ActiveDocument.Content.ShapeRange.Fill.ForeColor. 3) '添加圖表,圖表 ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#36MS Word, VBA, ShapeRange Transparency - AutoHotkey
ShapeRange.Fill.Transparency = 0.5 Selection.ShapeRange.Rotation = 315 Selection.ShapeRange.LockAspectRatio = True Selection.ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#37繪製中華民國國旗的VBA程式(原創) - 唐老鴨之家- udn城市
ShapeRange.Fill.ForeColor.SchemeColor = 2. Selection.ShapeRange.Line.ForeColor.SchemeColor = 2. Rem draw the blue block ActiveSheet.Shapes.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#38Adding TEXT watermak in word document through OLE - SAP ...
Fill.Visible = True Selection.ShapeRange.Fill.Solid Selection.ShapeRange. ... Fill.Transparency = 0.5. Selection.ShapeRange.Rotation = 315
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#39[VBA] 依輸入的月份自動判定季度,並會自動變色的圖案
Select'圈1的填滿顏色. With Selection.ShapeRange.Fill .Visible = msoTrue .ForeColor.RGB = RGB(247, 251, 91) '輸入你剛剛紀錄的第一季RGB的號碼.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#40Fill color in shape | Microsoft Office Forums
How can I get the shape to change fill color... ... Shapes collection, the ShapeRange collection, and the Shape object. In
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#41ShapeRange-Auflistungsobjekt | Herbers Excel-Server
VBA-Begriff: ShapeRange-Auflistungsobjekt ... Windows(1).Selection.ShapeRange.Fill.ForeColor.RGB = _ RGB(255, 0, 255). Verwenden Sie Selection.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#42How do I create a Macro that adds shapes in a particular ...
ShapeRange.Fill .Visible = msoTrue .ForeColor.ObjectThemeColor = msoThemeColorAccent6 .ForeColor.TintAndShade = 0 .ForeColor.Brightness = 0.6000000238 .
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#43autoshape to automatically change size - Excel General
Fill.Visible = msoTrue; Selection.ShapeRange.Fill. ... What do I change in the above code so that it will fill any cell width? Thanks,.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#44Excel Illustrations - VBA Code - BetterSolutions.com
Fill.Solid Selection.ShapeRange.Fill.ForeColor.SchemeColor = inumber. Selection.ShapeRange.Fill.Transparency = 0# Next inumber
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#45excel上怎麼做資料地圖,Excel如何製作資料地圖 - 第一問答網
selection.shaperange.fill. forecolor.rgb = range(range(“actregcode”)。value). interior.color. 10.最後儲存並關閉vba編輯器,返回excel ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#46PPTools -- Macro Recorder - Steve Rindsberg/RDP
Select With ActiveWindow.Selection.ShapeRange .Fill.Visible = msoTrue . ... Fill.Solid End With ActivePresentation.ExtraColors.Add RGB(Red:=255, Green:=0, ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#47Python水印字,给,Word,加水
ShapeRange.TextEffect.NormalizedHeight = False wordApp.Selection.ShapeRange.Line.Visible = False wordApp.Selection.ShapeRange.Fill.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#48批量插入圖片到單元格批註,只需一鍵 - 每日頭條
ShapeRange.Fill.UserPicture PicPath & Arr(i). '插入圖片到批註中 .Shape.Height = 150 '圖形的高度,可以根據需要自己調整 .Shape.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#49商品必备图片插入 - 豆丁网
Select True Selection.ShapeRange.Fill.UserPicture pics .ScaleWidth msoFalse,msoScaleFromTopLeft .ScaleHeight 2.09,msoFalse, msoScaleFromTopLeft End cell.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#50MS Excel 2003-处理形状时Excel VBA中的简单取消选择问题
selection.shaperange.fill.forecolor.rgb=rgb(110,110,110) selection.shaperange.fill.onecolorgradiend msogradienthorizontal, 2, 0.45 ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#51vba - Insert watermark in Word Documents - OStack Q&A ...
But I have an "out of range" error after running the Macro in another document. When I debug it, this line "Selection.ShapeRange.Name = " ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#52Adding and Formatting a Shape via Macro - Excel ribbon tips
Shapes.AddShape(msoShapeOval, 150, 150, _ 120, 60).Select Selection.ShapeRange.Fill.Visible = msoFalse With Selection.ShapeRange.Line .
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#53vba - Insert watermark in Word Documents - Vigges Developer ...
But I have an "out of range" error after running the Macro in another document. When I debug it, this line "Selection.ShapeRange.Name = " ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#54word添加水印,.NET执行宏- 启明星工作室 - 博客园
ShapeRange.TextEffect.NormalizedHeight = False. Selection.ShapeRange.Line.Visible = False. Selection.ShapeRange.Fill.Visible = True.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#55VBA学习笔记44:VBA图片与图形处理 - 知乎专栏
Top, RG.Width, RG.Height).Select 'RG单元格左边单元格填写了图片名称,填充对应图片到矩形里。 Selection.ShapeRange.Fill.UserPicture "C:\" & RG.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#56利用vba將excel中的圖片鏈接直接轉換為圖片 - 碼上快樂
Width, rg.Height).Select Rem 下面代碼,在矩形內部用圖片填充 Selection.ShapeRange.Fill.UserPicture rg.Offset(0, -1).Value Next End Sub.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#57Modifier la position des rectangles en fonction de leur valeur
ShapeRange.Fill .ForeColor.RGB = RGB(146, 208, 80) .Solid End With With Selection.ShapeRange.TextFrame2.TextRange.Font.Fill .ForeColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#58豐翊科技股份有限公司-技術論壇: Excel 2007 圖形Pattern Fill問題
ShapeRange.Fill.Patterned 與Selection.Fill.Patterned 的函數, 以index number的數值方式將圖案填入.如Selection.Fill.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#59VBA Code For Shape colour change Issue : r/excel - Reddit
ShapeRange.Fill.ForeColor.RGB = RGB(0, 176, 240) Case Is = 2 ActiveSheet.Shapes("Shape1").Select Selection.ShapeRange.Fill.ForeColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#60VBA Help with changing shape color for selected shapes only
Fill.ForeColor.SchemeColor = 10. Selection.ShapeRange.Fill.Visible = msoTrue. Selection.ShapeRange.Fill.Solid Range("A1").Select
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#61エクセルVBAでShapeRange.Fill.Solidって? - 教えて!Goo
このうちShapeRange.Fill.Solidとはどこの部分のどういう設定なのでしょうか?ここだけは意味が分かりません。 通報する. この質問への回答は締め切られました。
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#62Vba shape index
ShapeRange (index), where index is the shape name or the index number 'set ... Here, change the fill option from “Stretch” to “Stack and Scale with” and ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#63Word文档中添加图表、图形对象 - 全网搜
ShapeRange.Fill.ForeColor. 3) '添加图表,图表的第一列填上数据 ... 1 什么是Word中Range对象的Tables属性、Underline属性、ShapeRange属性的意义 ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#64Excel vba shape properties
Use the ShapeRange property of the Selection object to return all the ... with VBA by setting the appropriate cells in the shape's fill properties section.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#65如何使用Excel中的VBA對jpeg中的像素進行計數和分類?
Fill.ForeColor.SchemeColor = 10 Selection.ShapeRange.Fill.Transparency = 0.5 Selection.ShapeRange.Line.Weight = 0.75 Selection.ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#66跟我學Excel VBA (電子書): 將複雜的操作用一個按鍵就搞定!(適用2013/2010/2007)
130。300。65)Select With Selection ShapeRange Fill.ForeColorSchemeColor=15 ShapeRange Fill.Visible=msoTrue ShapeRange Fill.Solid ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#67Procedure to large - STACKOOM
ShapeRange.Fill.ForeColor.RGB = 0 End If .Select End With End If If Not Intersect(Target, Range("W2")) Is Nothing Then Me.Shapes("002").
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#68Vba shape index - Ecolux Pro
For more details, refer to the article Excel VBA, Fill Pattern Synopsis. ... Range(Index) Synopsis Returns a ShapeRange object containing a subset of shapes ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#69Wpf image transparent background - Grupo Ago
... file with a size of 1920x1080 pixels: You will notice that the ShapeRange. ... Make sure you fill image the uniformly. c# keyboard enter. png",UriKind.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#70Malicious Mobile Code: Virus Protection for Windows
Fill.ForeColor . RGB = RGB ( Int ( Rnd * 255 ) , Int ( Rni Selection . Shape Range . Fill . Visible = mso True Selection . ShapeRange . Fill .
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#71Shapes addpicture word vba - KidZine
Fill. 3. AddPicture (FileName:=imagePath, _. Red Flag Submitted. ... Note that the Shape- and ShapeRange ID were introduced in version 10. Core.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#72Excel VBA 365 Made Easy - 第 274 頁 - Google 圖書結果
SelectAll With Selection.ShapeRange.Fill .Visible = True .ForeColor.RGB = RGB(255, 255, 0) .Transparency = 0.6 .Solid End With With Selection.ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#73Excel 2013 Power Programming with VBA - 第 946 頁 - Google 圖書結果
Shapes.Range(Array(“Right Arrow 1”)).Select With Selection.ShapeRange.Fill .Visible = msoTrue .ForeColor.ObjectThemeColor = msoThemeColorAccent4 .ForeColor.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#74Line break text - CONSERGY
Fill. Without this feature, compact text like Chinese can only be written one ... ShapeRange. com Break text using the most stringent line break rule. or ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#75CorelDRAW Help | Apply fills to areas
You can apply fills to any enclosed area by using the Smart fill tool. Unlike other fill tools, which fill only objects, the Smart fill tool detects the ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#76Vba borders
Other bordered objects, such as To Add Table and fill data to the Word document using Microsoft Excel, you need to follow the steps below: Create the object ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#77Word2003 パーフェクトマスター: - 第 677 頁 - Google 圖書結果
Fill.Visible : True Selection.ShapeRange.Fill , Solid プロテイー Selection.ShapeRange. ... Fill.Transparency : 0.5 New Macros Module Selection.ShapeRange.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#78Vba powerpoint commandbars executemso - Index of
ShapeRange . としてのDIM orig_t Single excel-vba. ExecuteMso ("SlideReset") DoEvents For Each oSh … Returns a CommandBars object that represents the ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#79Using The Grid Fill Modeling Tool in Blender - YouTube
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#80How To Fill Your Objects With Spheres In C4D & Octane Render
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#81Affinity Photo : Fill shapes with designs (shapes / effects ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#82Blender Quick tip №7. Grid Fill tool - YouTube
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#83Cách tạo link hình ảnh trong Excel - ketthuc.com
ShapeRange.Item(1) If Pshp Is Nothing Then GoTo lab xCol = cell.Column + 1 Set xRg = Cells(cell.Row, xCol) With Pshp .LockAspectRatio = msoFalse If .Width ...
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#84Fill shape with color - Affinity | Forum - Serif
I drew a square with marquee tool so that I could fill with color for my background. I cannot get it filled with color.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?> -
//=++$i?>//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['title'])?>
#85shape layer 圖形層_02 - AE
Gradient Fill 漸層填色. Gradient Stroke 漸層邊框. Merge Paths 合併路徑. 合併模式. Offset Paths 位移路徑. Pucker & Bloat 縮攏與膨脹.
//="/exit/".urlencode($keyword)."/".base64url_encode($si['_source']['url'])."/".$_pttarticleid?>//=htmlentities($si['_source']['domain'])?>
shaperange 在 コバにゃんチャンネル Youtube 的最佳解答
shaperange 在 大象中醫 Youtube 的最佳貼文
shaperange 在 大象中醫 Youtube 的最讚貼文