Application.Dialogs使用方法＆定数一覧

The following two tabs change content below.

• この記事を書いた人
• 最新の記事

taka

あることがキッカケでVBAを独学で勉強しました、今ではブログを通してVBAでできることを解説しつつ、VBAや他の言語の勉強、ブログ運営の勉強をしています(^^♪

最新記事 by taka (全て見る)

• 『雑記』最近の私の話～ - 2019年9月26日
• 【動画】自作パソコン構成変更！ケースをNZXT　H500に交換しました！ - 2019年6月5日
• VBA 『Array関数』指定した要素で配列を作成する - 2019年5月23日
• 「動画」初完全ワイヤレスイヤホン『Jabra Elite Active 65t』 - 2019年5月17日
• VBA　日付で令和を簡単に判定してみよう - 2019年5月7日

Application.Dialogs使用方法＆定数一覧

前回ダイアログボックスでプリンターの設定をする方法をご紹介しました。

E-VBA

プリンター選択のダイアログボックスを表示する方法

プリンター選択のダイアログボックスを表示する方法VBAで印刷処理するときにプリンターの選択をしたいときはありませんか？Worksheet("Sheet1").PrintOutこの...

ですが他にもExcel VBA（Visual Basic for Applications）では【Application.Dialogs(定数).Show】を使用することによって様々な設定が可能です。

今回はその簡単な使用方法と定数の一覧をご紹介します。

Application.Dialogs使用方法

ダイアログボックスを表示するにはApplicationオブジェクトのDialogsプロパティを使用します。

ボックスの種類を指定するDialogsの引数には(xlDialogPrinterSetup)などの【定数(下記紹介)】または【値(下記紹介)】を指定します。

 Application.Dialogs(9).Show
 Application.Dialogs(xlDialogPrinterSetup).Show

このコードの結果は同じ結果になります(プリンター一覧)

Application.Dialogs 定数一覧

Application.Dialogsの定数はかなりの数がありますのでMicrosoftヘルプより引用させてもらいました。

名前	値	説明
xlDialogActivate	103	[ウィンドウの選択] ダイアログ ボックス
xlDialogActiveCellFont	476	[セルの書式設定 (フォント)] ダイアログ ボックス
xlDialogAddChartAutoformat	390	[ユーザー設定のグラフ種類の追加] ダイアログ ボックス
xlDialogAddinManager	321	[アドイン] ダイアログ ボックス
xlDialogAlignment	43	[セルの書式設定 (配置)] ダイアログ ボックス
xlDialogApplyNames	133	[名前の引用] ダイアログ ボックス
xlDialogApplyStyle	212	[スタイル] ダイアログ ボックス
xlDialogAppMove	170	[移動 (アプリケーション)] ダイアログ ボックス
xlDialogAppSize	171	[送信] ダイアログ ボックス
xlDialogArrangeAll	12	[ウィンドウの整列] ダイアログ ボックス
xlDialogAssignToObject	213	[オブジェクトへの登録] ダイアログ ボックス
xlDialogAssignToTool	293	[ツールに割り当て] ダイアログ ボックス
xlDialogAttachText	80	[文字の追加] ダイアログ ボックス
xlDialogAttachToolbars	323	[ブックへのツールバーの登録] ダイアログ ボックス
xlDialogAutoCorrect	485	[オートコレクト (オートコレクト)] ダイアログ ボックス
xlDialogAxes	78	[軸] ダイアログ ボックス
xlDialogBorder	45	[セルの書式設定 (罫線)] ダイアログ ボックス
xlDialogCalculation	32	[計算方法の設定] ダイアログ ボックス
xlDialogCellProtection	46	[セルの書式設定 (保護)] ダイアログ ボックス
xlDialogChangeLink	166	[リンクの変更] ダイアログ ボックス
xlDialogChartAddData	392	[グラフ追加データ] ダイアログ ボックス
xlDialogChartLocation	527	[グラフの場所] ダイアログ ボックス
xlDialogChartOptionsDataLabelMultiple	724	[グラフ オプション データ ラベル複数] ダイアログ ボックス
xlDialogChartOptionsDataLabels	505	[グラフ オプション データ ラベル] ダイアログ ボックス
xlDialogChartOptionsDataTable	506	[グラフ オプション データ テーブル] ダイアログ ボックス
xlDialogChartSourceData	540	[グラフの元データ] ダイアログ ボックス
xlDialogChartTrend	350	[グラフ トレンド] ダイアログ ボックス
xlDialogChartType	526	[グラフの種類] ダイアログ ボックス
xlDialogChartWizard	288	[グラフ ウィザード] ダイアログ ボックス
xlDialogCheckboxProperties	435	[チェック ボックスのプロパティ] ダイアログ ボックス
xlDialogClear	52	[消去] ダイアログ ボックス
xlDialogColorPalette	161	[オプション (色)] ダイアログ ボックス
xlDialogColumnWidth	47	[列幅] ダイアログ ボックス
xlDialogCombination	73	[複合] ダイアログ ボックス
xlDialogConditionalFormatting	583	[条件付き書式の設定] ダイアログ ボックス
xlDialogConsolidate	191	[統合の設定] ダイアログ ボックス
xlDialogCopyChart	147	[グラフのコピー] ダイアログ ボックス
xlDialogCopyPicture	108	[図のコピー] ダイアログ ボックス
xlDialogCreateList	796	[リストの作成 ] ダイアログ ボックス
xlDialogCreateNames	62	[名前の作成] ダイアログ ボックス
xlDialogCreatePublisher	217	[発行側の作成] ダイアログ ボックス
xlDialogCreateRelationship	1272	[リレーションシップの作成] ダイアログ ボックス
xlDialogCustomizeToolbar	276	[ユーザー設定 (オプション)] ダイアログ ボックス
xlDialogCustomViews	493	[ユーザー設定のビュー] ダイアログ ボックス
xlDialogDataDelete	36	[データの削除] ダイアログ ボックス
xlDialogDataLabel	379	[データ ラベル] ダイアログ ボックス
xlDialogDataLabelMultiple	723	[データ ラベル複数] ダイアログ ボックス
xlDialogDataSeries	40	[連続データ] ダイアログ ボックス
xlDialogDataValidation	525	[データの入力規則 (設定)] ダイアログ ボックス
xlDialogDefineName	61	[名前の定義] ダイアログ ボックス
xlDialogDefineStyle	229	[スタイル] ダイアログ ボックス
xlDialogDeleteFormat	111	[セルの書式設定 (表示形式)] ダイアログ ボックス
xlDialogDeleteName	110	[名前の定義] ダイアログ ボックス
xlDialogDemote	203	[グループ化] ダイアログ ボックス
xlDialogDisplay	27	[画面設定] ダイアログ ボックス
xlDialogDocumentInspector	862	[ドキュメント検査] ダイアログ ボックス
xlDialogEditboxProperties	438	[編集ボックスのプロパティ] ダイアログ ボックス
xlDialogEditColor	223	[色の編集] ダイアログ ボックス
xlDialogEditDelete	54	[削除] ダイアログ ボックス
xlDialogEditionOptions	251	[エディション オプション] ダイアログ ボックス
xlDialogEditSeries	228	[系列の編集] ダイアログ ボックス
xlDialogErrorbarX	463	[Errorbar X] ダイアログ ボックス
xlDialogErrorbarY	464	[Errorbar Y] ダイアログ ボックス
xlDialogErrorChecking	732	[エラー チェック] ダイアログ ボックス
xlDialogEvaluateFormula	709	[数式の検証] ダイアログ ボックス
xlDialogExternalDataProperties	530	[外部データのプロパティ] ダイアログ ボックス
xlDialogExtract	35	[抽出] ダイアログ ボックス
xlDialogFileDelete	6	[ファイルの削除] ダイアログ ボックス
xlDialogFileSharing	481	[ブックの共有 (編集)] ダイアログ ボックス
xlDialogFillGroup	200	[グループの入力] ダイアログ ボックス
xlDialogFillWorkgroup	301	[ワークグループの入力] ダイアログ ボックス
xlDialogFilter	447	[オートフィルター] ダイアログ ボックス
xlDialogFilterAdvanced	370	[フィルター オプションの設定] ダイアログ ボックス
xlDialogFindFile	475	[ファイルを開く] ダイアログ ボックス
xlDialogFont	26	[フォントの設定] ダイアログ ボックス
xlDialogFontProperties	381	[セルの書式設定 (フォント)] ダイアログ ボックス
xlDialogFormatAuto	269	[オートフォーマット] ダイアログ ボックス
xlDialogFormatChart	465	[グラフの書式設定] ダイアログ ボックス
xlDialogFormatCharttype	423	[グラフの種類] ダイアログ ボックス
xlDialogFormatFont	150	[フォントの設定] ダイアログ ボックス
xlDialogFormatLegend	88	[凡例の書式設定] ダイアログ ボックス
xlDialogFormatMain	225	[メイングラフ/重ね合わせグラフ] ダイアログ ボックス
xlDialogFormatMove	128	[移動の書式設定] ダイアログ ボックス
xlDialogFormatNumber	42	[セルの書式設定 (表示形式)] ダイアログ ボックス
xlDialogFormatOverlay	226	[重ね合わせグラフの設定] ダイアログ ボックス
xlDialogFormatSize	129	[サイズの書式設定] ダイアログ ボックス
xlDialogFormatText	89	[文字書式] ダイアログ ボックス
xlDialogFormulaFind	64	[検索] ダイアログ ボックス
xlDialogFormulaGoto	63	[ジャンプ] ダイアログ ボックス
xlDialogFormulaReplace	130	[置換] ダイアログ ボックス
xlDialogFunctionWizard	450	[関数の挿入] ダイアログ ボックス
xlDialogGallery3dArea	193	[オートフォーマット (3-D 面)] ダイアログ ボックス
xlDialogGallery3dBar	272	[オートフォーマット (横棒)] ダイアログ ボックス
xlDialogGallery3dColumn	194	[オートフォーマット (3-D 縦棒)] ダイアログ ボックス
xlDialogGallery3dLine	195	[オートフォーマット (3-D 折れ線)] ダイアログ ボックス
xlDialogGallery3dPie	196	[オートフォーマット (3-D 円)] ダイアログ ボックス
xlDialogGallery3dSurface	273	[オートフォーマット (等高線)] ダイアログ ボックス
xlDialogGalleryArea	67	[オートフォーマット (面)] ダイアログ ボックス
xlDialogGalleryBar	68	[オートフォーマット (横棒)] ダイアログ ボックス
xlDialogGalleryColumn	69	[オートフォーマット (縦棒)] ダイアログ ボックス
xlDialogGalleryCustom	388	[オートフォーマット (フォーマットの種類)] ダイアログ ボックス
xlDialogGalleryDoughnut	344	[オートフォーマット (ドーナッツ)] ダイアログ ボックス
xlDialogGalleryLine	70	[オートフォーマット (折れ線)] ダイアログ ボックス
xlDialogGalleryPie	71	[オートフォーマット (円)] ダイアログ ボックス
xlDialogGalleryRadar	249	[オートフォーマット (レーダー)] ダイアログ ボックス
xlDialogGalleryScatter	72	[オートフォーマット (散布図)] ダイアログ ボックス
xlDialogGoalSeek	198	[ゴール シーク] ダイアログ ボックス
xlDialogGridlines	76	[グラフ オプション (目盛線)] ダイアログ ボックス
xlDialogImportTextFile	666	[テキスト ファイルのインポート] ダイアログ ボックス
xlDialogInsert	55	[セルの挿入] ダイアログ ボックス
xlDialogInsertHyperlink	596	[ハイパーリンクの挿入] ダイアログ ボックス
xlDialogInsertObject	259	[オブジェクトの挿入 (新規作成)] ダイアログ ボックス
xlDialogInsertPicture	342	[図の挿入] ダイアログ ボックス
xlDialogInsertTitle	380	[タイトル/軸ラベルの挿入] ダイアログ ボックス
xlDialogLabelProperties	436	[ラベルのプロパティ] ダイアログ ボックス
xlDialogListboxProperties	437	[リスト ボックスのプロパティ] ダイアログ ボックス
xlDialogMacroOptions	382	[マクロ オプション] ダイアログ ボックス
xlDialogMailEditMailer	470	[メール編集メーラー] ダイアログ ボックス
xlDialogMailLogon	339	[回覧先] ダイアログ ボックス
xlDialogMailNextLetter	378	[次の手紙の送信] ダイアログ ボックス
xlDialogMainChart	85	[メイン グラフ] ダイアログ ボックス
xlDialogMainChartType	185	[メイン グラフの種類] ダイアログ ボックス
xlDialogManageRelationships	1271	[リレーションシップの管理] ダイアログ ボックス
xlDialogMenuEditor	322	[メニュー エディター] ダイアログ ボックス
xlDialogMove	262	[移動] ダイアログ ボックス
xlDialogMyPermission	834	[アクセス許可] ダイアログ ボックス
xlDialogNameManager	977	[名前の管理] ダイアログ ボックス
xlDialogNew	119	[新規作成 (標準)] ダイアログ ボックス
xlDialogNewName	978	[新しい名前] ダイアログ ボックス
xlDialogNewWebQuery	667	[新しい Web クエリ] ダイアログ ボックス
xlDialogNote	154	[コメントの挿入] ダイアログ ボックス
xlDialogObjectProperties	207	[オブジェクトのプロパティ] ダイアログ ボックス
xlDialogObjectProtection	214	[オブジェクトの保護] ダイアログ ボックス
xlDialogOpen	1	[ファイルを開く] ダイアログ ボックス
xlDialogOpenLinks	2	[リンク元を開く] ダイアログ ボックス
xlDialogOpenMail	188	[メールを開く] ダイアログ ボックス
xlDialogOpenText	441	[テキストを開く] ダイアログ ボックス
xlDialogOptionsCalculation	318	[オプション (計算方法)] ダイアログ ボックス
xlDialogOptionsChart	325	[オプション (グラフ)] ダイアログ ボックス
xlDialogOptionsEdit	319	[オプション (編集)] ダイアログ ボックス
xlDialogOptionsGeneral	356	[オプション (全般)] ダイアログ ボックス
xlDialogOptionsListsAdd	458	[オプション (ユーザー設定リスト)] ダイアログ ボックス
xlDialogOptionsME	647	[オプション (インターナショナル)] ダイアログ ボックス
xlDialogOptionsTransition	355	[オプション (移行)] ダイアログ ボックス
xlDialogOptionsView	320	[オプション (表示)] ダイアログ ボックス
xlDialogOutline	142	[設定] ダイアログ ボックス
xlDialogOverlay	86	[重ね合わせグラフ] ダイアログ ボックス
xlDialogOverlayChartType	186	[グラフの種類の重ね合わせ] ダイアログ ボックス
xlDialogPageSetup	7	[ページ設定 (ページ)] ダイアログ ボックス
xlDialogParse	91	[区切り位置] ダイアログ ボックス
xlDialogPasteNames	58	[名前の貼り付け] ダイアログ ボックス
xlDialogPasteSpecial	53	[形式を選択して貼り付け] ダイアログ ボックス
xlDialogPatterns	84	[セルの書式設定 (パターン)] ダイアログ ボックス
xlDialogPermission	832	[アクセス許可] ダイアログ ボックス
xlDialogPhonetic	656	[ふりがなの設定 (ふりがな)] ダイアログ ボックス
xlDialogPivotCalculatedField	570	[ピボット集計フィールド] ダイアログ ボックス
xlDialogPivotCalculatedItem	572	[ピボット集計アイテム] ダイアログ ボックス
xlDialogPivotClientServerSet	689	[ピボット クライアント サーバー セット] ダイアログ ボックス
xlDialogPivotFieldGroup	433	[ピボット フィールド グループ] ダイアログ ボックス
xlDialogPivotFieldProperties	313	[ピボット フィールド プロパティ] ダイアログ ボックス
xlDialogPivotFieldUngroup	434	[ピボット フィールド グループ解除] ダイアログ ボックス
xlDialogPivotShowPages	421	[ピボット表示ページ] ダイアログ ボックス
xlDialogPivotSolveOrder	568	[ピボット解決順序] ダイアログ ボックス
xlDialogPivotTableOptions	567	[ピボットテーブル オプション] ダイアログ ボックス
xlDialogPivotTableSlicerConnections	1183	[ピボットテーブルのスライサーの接続] ダイアログ ボックス
xlDialogPivotTableWhatIfAnalysisSettings	1153	[ピボットテーブルの What-If 分析の設定] ダイアログ ボックス
xlDialogPivotTableWizard	312	[ピボットテーブル/ピボットグラフ ウィザード] ダイアログ ボックス
xlDialogPlacement	300	[表示位置] ダイアログ ボックス
xlDialogPrint	8	[印刷] ダイアログ ボックス
xlDialogPrinterSetup	9	[プリンターの設定] ダイアログ ボックス
xlDialogPrintPreview	222	[印刷プレビュー] ダイアログ ボックス
xlDialogPromote	202	[グループの解除] ダイアログ ボックス
xlDialogProperties	474	[プロパティ (ファイルの概要)] ダイアログ ボックス
xlDialogPropertyFields	754	[プロパティ フィールド] ダイアログ ボックス
xlDialogProtectDocument	28	[シートの保護] ダイアログ ボックス
xlDialogProtectSharing	620	[共有ブックの保護] ダイアログ ボックス
xlDialogPublishAsWebPage	653	[Web ページとして発行] ダイアログ ボックス
xlDialogPushbuttonProperties	445	[プッシュ ボタンのプロパティ] ダイアログ ボックス
xlDialogRecommendedPivotTables	1258	[おすすめピボットテーブル] ダイアログ ボックス
xlDialogReplaceFont	134	[フォントの設定] ダイアログ ボックス
xlDialogRoutingSlip	336	このオブジェクトまたはメンバーは使用されていませんが、以前のバージョンとの互換性を保つため、オブジェクト モデルの一部として残されています。このオブジェクトを新しいアプリケーションで使用しないでください。
xlDialogRowHeight	127	[行の高さ] ダイアログ ボックス
xlDialogRun	17	[マクロ] ダイアログ ボックス
xlDialogSaveAs	5	[名前を付けて保存] ダイアログ ボックス
xlDialogSaveCopyAs	456	[コピーを名前を付けて保存] ダイアログ ボックス
xlDialogSaveNewObject	208	「新しいオブジェクトの保存] ダイアログ ボックス
xlDialogSaveWorkbook	145	[名前を付けて保存] ダイアログ ボックス
xlDialogSaveWorkspace	285	[作業状態の保存] ダイアログ ボックス
xlDialogScale	87	[倍率] ダイアログ ボックス
xlDialogScenarioAdd	307	[シナリオの追加] ダイアログ ボックス
xlDialogScenarioCells	305	[シナリオの登録と管理] ダイアログ ボックス
xlDialogScenarioEdit	308	[シナリオの追加] ダイアログ ボックス
xlDialogScenarioMerge	473	[シナリオのコピー] ダイアログ ボックス
xlDialogScenarioSummary	311	[シナリオの情報] ダイアログ ボックス
xlDialogScrollbarProperties	420	[スクロール バーのプロパティ] ダイアログ ボックス
xlDialogSearch	731	[通常のファイル検索] ダイアログ ボックス
xlDialogSelectSpecial	132	選択オプション] ダイアログ ボックス
xlDialogSendMail	189	[メッセージ (HTML 形式)] ダイアログ ボックス
xlDialogSeriesAxes	460	[系列軸] ダイアログ ボックス
xlDialogSeriesOptions	557	[系列オプション] ダイアログ ボックス
xlDialogSeriesOrder	466	[系列の順序] ダイアログ ボックス
xlDialogSeriesShape	504	[系列の形状] ダイアログ ボックス
xlDialogSeriesX	461	[系列 X] ダイアログ ボックス
xlDialogSeriesY	462	[データ系列の書式設定 (名前/値)] ダイアログ ボックス
xlDialogSetBackgroundPicture	509	[シートの背景] ダイアログ ボックス
xlDialogSetManager	1109	[セットの管理] ダイアログ ボックス
xlDialogSetMDXEditor	1208	[MDX エディターの設定] ダイアログ ボックス
xlDialogSetPrintTitles	23	[印刷タイトルの設定] ダイアログ ボックス
xlDialogSetTupleEditorOnColumns	1108	[列での Tuple エディターの設定] ダイアログ ボックス
xlDialogSetTupleEditorOnRows	1107	[行での Tuple エディターの設定] ダイアログ ボックス
xlDialogSetUpdateStatus	159	[更新状態の設定] ダイアログ ボックス
xlDialogShowDetail	204	[詳細データの表示] ダイアログ ボックス
xlDialogShowToolbar	220	[ユーザー設定 (オプション)] ダイアログ ボックス
xlDialogSize	261	[サイズ] ダイアログ ボックス
xlDialogSlicerCreation	1182	[スライサー作成] ダイアログ ボックス
xlDialogSlicerPivotTableConnections	1184	[スライサー ピボットテーブル接続] ダイアログ ボックス
xlDialogSlicerSettings	1179	[スライサーの設定] ダイアログ ボックス
xlDialogSort	39	[並べ替え] ダイアログ ボックス
xlDialogSortSpecial	192	[並べ替え] ダイアログ ボックス
xlDialogSparklineInsertColumn	1134	[スパークラインの縦棒の挿入] ダイアログ ボックス
xlDialogSparklineInsertLine	1133	[スパークラインの折れ線の挿入] ダイアログ ボックス
xlDialogSparklineInsertWinLoss	1135	[スパークラインの勝敗の挿入] ダイアログ ボックス
xlDialogSplit	137	[列の分割、行の分割] ダイアログ ボックス
xlDialogStandardFont	190	[フォントの設定] ダイアログ ボックス
xlDialogStandardWidth	472	[標準の幅] ダイアログ ボックス
xlDialogStyle	44	[フォントの設定] ダイアログ ボックス
xlDialogSubscribeTo	218	[引用] ダイアログ ボックス
xlDialogSubtotalCreate	398	[集計の設定] ダイアログ ボックス
xlDialogSummaryInfo	474	[プロパティ (ファイルの概要)] ダイアログ ボックス
xlDialogTable	41	[テーブル] ダイアログ ボックス
xlDialogTabOrder	394	[タブ オーダーの設定] ダイアログ ボックス
xlDialogTextToColumns	422	[区切り位置] ダイアログ ボックス
xlDialogUnhide	94	[ウィンドウの再表示] ダイアログ ボックス
xlDialogUpdateLink	201	[リンクの更新] ダイアログ ボックス
xlDialogVbaInsertFile	328	[VBA 挿入ファイル] ダイアログ ボックス
xlDialogVbaMakeAddin	478	[VBA 作成アドイン] ダイアログ ボックス
xlDialogVbaProcedureDefinition	330	[VBA 手順定義] ダイアログ ボックス
xlDialogView3d	197	[3D 表示] ダイアログ ボックス
xlDialogWebOptionsBrowsers	773	[Web オプション (ブラウザー)] ダイアログ ボックス
xlDialogWebOptionsEncoding	686	[Web オプション (エンコード)] ダイアログ ボックス
xlDialogWebOptionsFiles	684	[Web オプション (ファイル)] ダイアログ ボックス
xlDialogWebOptionsFonts	687	[Web オプション (フォント)] ダイアログ ボックス
xlDialogWebOptionsGeneral	683	[Web オプション (全般)] ダイアログ ボックス
xlDialogWebOptionsPictures	685	[Web オプション (図)] ダイアログ ボックス
xlDialogWindowMove	14	[ウィンドウの移動] ダイアログ ボックス
xlDialogWindowSize	13	[ウィンドウ サイズ] ダイアログ ボックス
xlDialogWorkbookAdd	281	[シートの移動またはコピー] ダイアログ ボックス
xlDialogWorkbookCopy	283	[シートの移動またはコピー] ダイアログ ボックス
xlDialogWorkbookInsert	354	[挿入 (標準)] ダイアログ ボックス
xlDialogWorkbookMove	282	[シートの移動またはコピー] ダイアログ ボックス
xlDialogWorkbookName	386	[シート名の変更] ダイアログ ボックス
xlDialogWorkbookNew	302	[挿入 (標準)] ダイアログ ボックス
xlDialogWorkbookOptions	284	[シート名の変更] ダイアログ ボックス
xlDialogWorkbookProtect	417	[ブックの保護] ダイアログ ボックス
xlDialogWorkbookTabSplit	415	[ブックのタブ分割] ダイアログ ボックス
xlDialogWorkbookUnhide	384	[再表示] ダイアログ ボックス
xlDialogWorkgroup	199	[グループ編集] ダイアログ ボックス
xlDialogWorkspace	95	[作業状態設定] ダイアログ ボックス
xlDialogZoom	256	[ズーム] ダイアログ ボックス

※上記Microsoftヘルプより引用

フォロー・チャンネル登録お願いします

VBA以外についてのブログはこちら↓

■Twitterフォロー

■YouTubeチャンネル登録

ファイルやコードの利用、WEBサイトの利用について

Sponsored Link