Note: The other languages of the website are Google-translated. Back to English
ログイン  \/ 
x
or
x
今すぐ登録  \/ 
x

or

Excel画像:Excelで複数の画像または画像を挿入、変更、削除します

このチュートリアルでは、セルに複数の画像を挿入してセルサイズに合わせてサイズを変更する方法、コメント、ヘッダー、またはフッターに画像を挿入する方法、URLから画像を挿入する方法などについて説明します。 また、Excelで必要に応じて複数の画像を保存、名前変更、削除する方法についても説明します。

目次:

1.コンピューター、Web、またはOneDriveからワークシートに画像または画像を挿入します

2.画像​​または画像をExcelセルにロックします

3.Excelに複数の画像または画像を挿入します

4.名前に一致する複数の画像または画像をセルに挿入します

5.URLから画像または画像を挿入または表示します

6.ファイルパスから画像または画像を挿入または表示します

7.画像または画像をコメントに挿入します

8.画像または画像をヘッダーまたはフッターに挿入します

9.同じ画像または画像を複数のワークシートに挿入します

10.セルの内容の後ろに画像または画像を挿入します

11.Excelで画像または画像形式としてセルの範囲を挿入します

12.セル値に基づいて画像または画像を動的に挿入します

13.Excelファイルからすべての画像または画像をエクスポートまたは保存します

14. Excelのセルのリストに基づいて、フォルダー内の画像名の名前を変更します

15.画像をクリックすると拡大または縮小します

16.ワークシートをスクロールするときは、常に画像をフロートさせます

17.アクティブなシート/セルの範囲から画像または画像を削除します


コンピューター、Web、またはOneDriveからワークシートに画像または画像を挿入します

すべてのExcelバージョンは、コンピューターからの画像または画像の挿入をサポートしていますが、WebまたはOneDriveから画像を挿入する場合は、Excel2013以降のバージョンが必要です。

コンピューターから画像や写真を挿入する

私たちのほとんどは、コンピューターに保存されている画像をワークシートに挿入するのは簡単です。 このようにしてください:

1。 ワークシートで、画像を挿入する場所をクリックします。

2。 次に、をクリックします。 インセット > ピクチャー > この装置、スクリーンショットを参照してください:

3。 飛び出した 画像を挿入 ウィンドウで、写真が含まれているフォルダを開き、を押し続けます Ctrlキー キーを押して、挿入する画像を選択します。スクリーンショットを参照してください。

4。 次に、をクリックします。 インセット ボタンをクリックすると、選択した画像がシートに挿入されます。 これで、必要なセルに合わせて画像を調整またはサイズ変更できます。スクリーンショットを参照してください。


WebまたはOneDriveから画像または画像を挿入します

Excel 2013以降のバージョンを使用している場合は、WebまたはOneDriveから画像を挿入できます。次のようにしてください。

1。 ワークシートで、画像を挿入する場所をクリックします。

2。 次に、をクリックします。 インセット > ピクチャー > オンライン写真、スクリーンショットを参照してください:

3。 次のウィンドウが表示されます。 の中に オンライン写真 セクションで、探しているものをテキストボックスに入力し、を押してください 入力します キー。 対応するすべての画像が一度に検索されます。スクリーンショットを参照してください。

4。 次に、必要な写真を選択して、をクリックします インセット ボタン。 写真を挿入した後、必要な位置に写真のサイズを変更または調整してください。

ヒント:

1.特定の画像を検索するには、必要に応じて、見つかった画像をサイズ、タイプ、レイアウト、または色でフィルタリングできます。

2。 Bing検索からの画像を挿入するだけでなく、OneDriveに保存されている画像を挿入することもできます。 下のウィンドウで、をクリックします OneDrive ウィンドウの左下で、挿入する画像を選択します。


画像や画像をExcelセルにロックする

通常、画像をセルに挿入した後、画像を含むセルのサイズを変更、フィルタリング、または非表示にすると、以下のデモに示すように、画像はそのセルとともにサイズ変更またはフィルタリングされません。

この場合、画像をセルにロックして、セルとともにサイズ変更、フィルタリング、または非表示にできるようにする必要があります。次の手順を実行してください。

1。 クリックしてXNUMXつの画像を選択し、を押します Ctrlキー+ A ワークシート内のすべての画像を選択します。

2。 次に、XNUMXつの画像を右クリックして、 サイズとプロパティ コンテキストメニューから、スクリーンショットを参照してください。

3。 展開された フォーマットピクチャ ペイン、下 プロパティ セクション、選択 セルで移動してサイズを変更 オプション、スクリーンショットを参照してください:

4。 次に、を閉じます フォーマットピクチャ ペイン。 これで、セルのサイズを変更、フィルタリング、または非表示にすると、画像も移動、フィルタリング、または非表示になります。


Excelに複数の画像または画像を挿入する

場合によっては、複数の画像をセルに挿入し、画像のサイズを変更したりドラッグしたりせずに、セルのサイズに合わせて自動的にサイズを変更する必要があります。 ここでは、Excelでこの仕事を解決するためのXNUMXつの方法を紹介します。

複数の画像または画像を挿入し、VBAコードでセルに合うようにサイズを変更します

次のVBAコードは、セルサイズに基づいて複数の画像をセルに挿入するのに役立ちます。 このようにしてください:

1。 画像を配置するセルサイズを調整してから、セルを選択します。

2。 次に、 Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

3に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:セルサイズに基づいて複数の画像を挿入します

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4。 次に、 F5 このコードを実行するためのキー。 の中に 開いた ウィンドウで、画像が含まれているフォルダを選択し、挿入する画像を選択して、をクリックしてください 開いた ボタンをクリックすると、選択したすべての画像がセルサイズに基づいて選択範囲に挿入されます。 スクリーンショットを参照してください:


複数の画像や画像を挿入し、強力な機能を備えたセルに合うようにサイズを変更します

VBAコードに慣れていない場合は、ここで電源機能を使用できます– 写真をインポートする of Kutools for Excel。 この便利な機能を使用すると、複数の画像をセルにすばやく簡単にインポートできます。

インストールした後 Kutools for Excel、次の手順で実行してください。

1に設定します。 OK をクリックします。 クツールズプラス > インポート・エクスポート > 写真をインポートする、スクリーンショットを参照してください:

2。 飛び出した 写真をインポートする ダイアログで、次の操作を行ってください。

  • [インポート順序]ドロップダウンリストから画像の順序を指定します。選択できます セルの後にセルを垂直に塗りつぶす or セルの後にセルを水平方向に塗りつぶす;
  • 次に、をクリックします。 追加 ボタンをクリックして画像ファイルまたはフォルダを選択し、画像をに追加します 写真リスト;
  • ストリーミングを停止する場合は上部の インポートサイズ ボタン、で 画像サイズのインポート ダイアログボックスで 一致するセルサイズ オプションを選択します。

3。 設定終了後、をクリックしてください インポート ボタン、そして今、別の 写真をインポートする がポップアウトされたら、画像をインポートする宛先セルを指定します。スクリーンショットを参照してください。

4。 次に、をクリックします。 OK ボタンをクリックすると、以下のスクリーンショットに示すように、選択したすべての画像が特定のセルのサイズに一致するように挿入されています。


名前に一致する複数の画像または画像をセルに挿入します

XNUMXつの列に製品名のリストがあり、次に示すスクリーンショットのように、対応する画像を別の列に挿入する必要があります。 画像を挿入してから、各位置にXNUMXつずつドラッグすると、多くの時間が無駄になります。このセクションでは、いくつかの簡単な方法について説明します。

名前とVBAコードが一致する複数の画像または画像を挿入します

次のVBAコードは、名前に一致する複数の画像をすばやく挿入するのに役立ちます。次のようにしてください。

1。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インサt> モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:名前に一致する複数の画像を挿入します

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

注意:上記のコードでは、スクリプト内で画像の高さと幅を変更できます。.ShapeRange.Height = 60"、".ShapeRange.Width = 60」を必要に応じて。

3。 次に、 F5 このコードを実行するためのキーを押し、開いたウィンドウで、挿入する画像を含むフォルダーを選択してください。スクリーンショットを参照してください。

4。 次に、をクリックします OK ボタンをクリックすると、プロンプトボックスが表示されます。画像名を含むセルを選択してください。スクリーンショットを参照してください。

5。 クリックしてください OK ボタンをクリックし、別のプロンプトボックスが表示されたら、画像を出力するセルを選択してください。スクリーンショットを参照してください。

6。 最後に、 OK、および画像は名前に基づいてセルに一度に挿入されています。スクリーンショットを参照してください。


便利な機能を使用して、名前に一致する複数の画像または画像を挿入します

あなたが持っている場合 Kutools for Excelそのと インポート画像を一致させる この機能を使用すると、画像名に基づいて画像をすばやく簡単に挿入できます。

インストールした後 Kutools for Excel、次のようにしてください。

1に設定します。 OK をクリックします。 クツールズプラス > インポート・エクスポート > インポート画像を一致させる、スクリーンショットを参照してください:

2。 飛び出した インポート画像に一致 ダイアログボックスで、次の操作を行ってください。

  • [インポート順序]ドロップダウンリストから画像の順序を指定します。選択できます セルの後にセルを垂直に塗りつぶす or セルの後にセルを水平方向に塗りつぶす;
  • 次に、から 一致範囲 テキストボックスで、画像を挿入する画像名を選択します。
  • 次に、をクリックします 追加 ボタンをクリックして画像ファイルまたはフォルダを選択し、画像をに追加します 写真リスト;
  • 次に、画像サイズを指定する必要があります。 クリックしてください インポートサイズ ボタン、で 画像サイズのインポート ダイアログボックスで、必要に応じてXNUMXつの画像サイズを選択します。

3。 設定終了後、をクリックしてください インポート ボタンをクリックして、XNUMXつのセルまたはセルのリストを選択し、ポップアウトされた画像から画像を見つけます インポート画像を一致させる ダイアログ、スクリーンショットを参照してください:

4。 次に、をクリックします。 OK、およびセルの値と一致する名前のすべての画像が挿入されています。スクリーンショットを参照してください。


URLから画像や画像を挿入または表示する

URLのリストから画像を表示または挿入しようとしたことがありますか? Excelに画像を直接挿入するための他の良い方法はないかもしれませんが、それを処理するためのコードまたはサードパーティのツールを適用することができます。

VBAコードを使用してURLから画像または画像を挿入または表示する

次のVBAコードを適用して、URLのリストに基づいて画像を挿入してください。

1。 まず、画像を配置する隣接セルサイズを調整します。

2。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

3に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:URLのリストから画像を挿入します

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.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 > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

ノート:上記のコードでは、 A2:A5 画像を抽出するURLアドレスを含むセルの範囲です。必要に応じて、セル参照を変更する必要があります。

4。 次に、 F5 このコードを実行するためのキーを押すと、一致する画像がURLから隣接する列に抽出され、セルの中央に配置されます。スクリーンショットを参照してください。


すばらしい機能を備えたURLから画像や画像を挿入または表示する

Kutools for Excel 驚くべき機能があります– パスから画像を挿入(URL)。 このユーティリティを使用すると、対応する画像がURLからすばやく簡単に抽出されます。

インストールした後 Kutools for Excel、次の手順で実行してください。

1に設定します。 OK をクリックします。 クツール > インセット > パス(URL)から画像を挿入、スクリーンショットを参照してください:

2。 飛び出した パス(URL)から画像を挿入 ダイアログボックスで、次の操作を設定してください。

  • URLセルのリストと、画像を配置するセルの範囲を選択します。
  • から必要に応じて画像のサイズを指定します 画像サイズ の項目を検索します。

3。 次に、をクリックします Ok ボタンをクリックすると、すべての画像がURLから抽出されます。スクリーンショットを参照してください。


ファイルパスから画像または画像を挿入または表示する

ファイルパスから画像を挿入する必要がある場合は、ここでも解決策を提供します。

VBAコードを使用してファイルパスから画像または画像を挿入または表示する

次のVBAコードを適用して、画像ファイルのパスに基づいて画像を挿入できます。

1。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、次に次のコードをに貼り付けます モジュール 窓。

VBAコード:さまざまなファイルパスから画像を挿入します

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3。 上記のコードを挿入した後、を押します F5 このコードを実行するためのキーを押すと、プロンプトボックスが表示されます。ファイルパスのセルを選択してください。スクリーンショットを参照してください。

4。 次に、をクリックします OK ボタンをクリックすると、ファイルパスに基づくすべての画像が次のスクリーンショットのように次の列に表示されます。


驚くべき機能を備えたファイルパスから画像や写真を挿入または表示する

Kutools for Excelさん パス(URL)から画像を挿入 この機能は、ファイルパスからの相対画像を表示するのにも役立ちます。

インストールした後 Kutools for Excel、次のようにしてください。

1に設定します。 OK をクリックします。 クツール > インセット > パス(URL)から画像を挿入、ポップアウトされたダイアログボックスで、ファイルパスの範囲、画像を出力する範囲、必要に応じて画像のサイズを指定してください。スクリーンショットを参照してください。

2。 オプションを設定したら、をクリックします Ok ボタンをクリックすると、画像が選択したセルに一度に挿入されます。スクリーンショットを参照してください。


コメントに画像または画像を挿入する

セルに画像を挿入するのは簡単かもしれませんが、コメントボックスに画像を挿入したい場合もありますが、このタスクをどのように処理しますか?

1。 コメントを挿入するセルを選択して右クリックし、[ コメントを挿入、スクリーンショットを参照してください:

ヒント:コメントを挿入した場合は、この手順を無視してください。

2。 次に、カーソルがXNUMXつの矢印アイコンに変わるまで、コメントボックスの端にカーソルを置きます。 次に、右クリックして選択します フォーマットコメント オプション、スクリーンショットを参照してください:

3。 飛び出した フォーマットコメント ダイアログボックスで、をクリックします。 色と線 タブ、[選択 塗りつぶし効果 から ドロップダウンリスト、スクリーンショットを参照してください:

4。 次に、以下で 塗りつぶし効果 ダイアログボックスで、をクリックします。 画像 タブをクリックして 画像を選択 挿入する画像をXNUMXつ選択するには、ボタンをクリックします。スクリーンショットを参照してください。

5。 次に、をクリックします OK > OK、画像がコメントボックスに挿入されました。スクリーンショットを参照してください。


画像または画像をヘッダーまたはフッターに挿入します

Excelワークシートのヘッダーまたはフッターに画像を挿入する場合は、このセクションの手順が役立ちます。次のようにしてください。

1。 画像をヘッダーまたはフッターに挿入するワークシートをアクティブにします。

2。 次に、をクリックします。 インセット > ヘッダーとフッター、そしてあなたはに行きます ヘッダーとフッターのツール タブ。 スクリーンショットを参照してください:

3。 ヘッダーまたはフッターに画像を挿入するには、必要に応じて左、右、または中央のヘッダーまたはフッターボックスをクリックしてから、をクリックしてください。 画像デザイン タブ、スクリーンショットを参照してください:

4。 次に、 写真を挿入する ウィンドウがポップアップします。追加する画像を選択して、[挿入]をクリックしてください。 さて、 &[画像] プレースホルダーはヘッダーまたはフッターボックスに表示されます。 ヘッダーボックスまたはフッターボックスの外側をクリックすると、挿入された画像が次のスクリーンショットのように表示されます。

ヒント:以下のスクリーンショットに示すように、画像がワークシートのデータ領域と重なっている場合があります。 これは、画像が大きすぎて、ヘッダーまたはフッターのセクションボックスに自動的に収まるようにサイズ変更されないために発生します。

この問題を解決するには、ヘッダーまたはフッターの画像のサイズを変更する必要があります。次の手順を実行してください。

1。 画像が配置されているヘッダーまたはフッターセクションをクリックしてから、 フォーマットピクチャデザイン タブ、スクリーンショットを参照してください:

2。 の中に フォーマットピクチャ ダイアログボックス、下 寸法 タブで、ヘッダーまたはフッターのセクションボックスに合うように画像のサイズを調整してください。スクリーンショットを参照してください。

3。 次に、をクリックします OK、必要に応じて結果が得られます。


同じ画像または画像を複数のワークシートに挿入します

ワークブックのすべてのワークシートにロゴ画像を挿入したい場合があります。通常は、挿入機能を適用して、あるシートから別のシートにXNUMX枚ずつ画像を挿入できます。 この時間のかかる機能を除いて、次のVBAコードは、すべてのシートの特定のセルに同じ画像を一度に挿入するのに役立ちます。 以下の手順で実行してください。

1。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュール 窓。

VBAコード:すべてのワークシートに同じ画像を挿入します。

Sub InsertImagetoallsheets()
'Updateby Extendoffice
    Dim I As Long
    Dim xPath As String
    Dim xShape As Shape
    Dim xRg As Range
    xPath = "C:\Users\AddinTestWin10\Desktop\my images\logo.png"
    If Dir(xPath) = "" Then
        MsgBox "Picture file was not found in path!", vbInformation, "KuTools for Excel"
        Exit Sub
    End If
    For I = 1 To ActiveWorkbook.Sheets.Count
        Set xRg = Sheets(I).Range("A1")
        Set xShape = Sheets(I).Shapes.AddPicture(xPath, True, True, xRg.Left, xRg.Top, xRg.Width, xRg.Height)
    Next
End Sub

注意:上記のコードでは、 C:\ Users \ AddinTestWin10 \ Desktop \ my images \ login.png 画像のパスと名前、および A1 in Range( "A1") 画像を挿入したいセルですので、必要に応じて変更してください。

3。 次に、 F5 このコードを実行するためのキーを押すと、特定の画像が各ワークシートのセルA1にすぐに挿入されます。 以下のデモを参照してください。


セルの内容の後ろに画像または画像を挿入します

ワークシートのデータをより美しく魅力的にするために、画像を背景として使用できます。 セルの内容の後ろに画像を挿入するために、ここにあなたに有利ないくつかの方法があります。

背景機能を使用して、セルのコンテンツの後ろに画像または画像を挿入します

1。 背景画像を挿入するワークシートを開きます。

2。 次に、をクリックします。 ページレイアウト > 背景、スクリーンショットを参照してください:

3。 飛び出した 写真を挿入する ウィンドウでは、必要に応じてコンピューター、Webサイト、またはOneDriveからXNUMXつの画像を選択してください。スクリーンショットを参照してください。

4。 これで、下のスクリーンショットに示すように、画像が背景としてワークシートに挿入されました。

ヒント:背景画像を削除するには、クリックするだけです ページレイアウト > 背景を削除。 スクリーンショットを参照してください:


セルの内容の後ろに透明な画像または画像を挿入します

上記の方法では、挿入した背景画像の透明度を変更できないため、背景画像の色が濃い場合、ワークシートのデータを読み取るのに不便です。 このセクションでは、セルの後ろに透明な画像を挿入する方法について説明します。

1に設定します。 OK をクリックします。 インセット > 形状、および長方形の形状を選択します。スクリーンショットを参照してください。

2。 次に、アクティブなワークシートに必要な大きさの図形を描画します。

3。 形を描いた後、 描画ツール リボンにタブが表示されたら、 フォーマット > 形状の概要 > アウトラインなし、スクリーンショットを参照してください:

4。 次に、形状を右クリックして、 書式の書式 コンテキストメニューから、スクリーンショットを参照してください。

5。 展開された 書式の書式 ペイン、下 塗りつぶしと線 タブで、次の操作を実行します。

  • 埋める セクション、選択 画像またはテクスチャの塗りつぶし オプション;
  • ナビゲーションヘッダーの インセット ボタンを 画像ソース、挿入する画像をXNUMXつ選択します。
  • 次に、画像の透明度を必要に応じて調整します。 透明度yセクション。

6。 次に、上のスクリーンショットに示すように、画像で埋められた形状が背景画像のように見えることがわかります。

注意:このタイプの背景画像を挿入した後は、画像範囲内にテキストを入力することはできません。


透かしとしてセルの内容の後ろに透明な画像または画像を挿入します

上記の両方の方法には独自の制限があります。最初の方法では画像の透明度を変更できません。XNUMX番目の方法では画像領域内のセルにテキストを入力できません。 これらの問題を解決するには、 Kutools for Excelさん 透かしを挿入 機能はあなたに有利に働くことができます。

インストールした後 Kutools for Excel、次のようにしてください。

1に設定します。 OK をクリックします。 クツール > インセット > 透かしを挿入、スクリーンショットを参照してください:

2。 飛び出した 透かしを挿入 ダイアログボックスで 画像透かし、[OK]をクリックします 画像を選択 ボタンをクリックして、挿入する画像をXNUMXつ選択し、画像のスケールを指定して、[ウォッシュアウト]オプションをオンにします。スクリーンショットを参照してください。

3。 次に、をクリックします。 Ok ボタンをクリックすると、画像が背景画像としてワークシートに挿入されます。


Excelで画像または画像形式としてセルの範囲を挿入します

セルの範囲をコピーしてExcelに画像として挿入しようとしたことがありますか? このセクションでは、Excelでこのジョブを処理するための簡単な方法をいくつか紹介します。

[画像としてコピー]機能を使用して、セルの範囲を画像または画像形式として挿入します

Excelでは、 写真としてコピー セルの範囲を画像としてコピーして挿入する機能。

1。 コピーして画像として挿入するセルの範囲を選択します。

2。 次に、をクリックします。 ホーム > コピー > 写真としてコピー、スクリーンショットを参照してください:

3。 飛び出した 写真をコピーする ダイアログ、選択 画像 から フォーマット セクション、スクリーンショットを参照してください:

4。 次に、をクリックします。 OK ボタン、今、あなたはただ押す必要があります Ctrlキー+ V 画像をブックの任意の場所に貼り付けます。


カメラツールを使用して、セルの範囲を画像または画像形式で挿入します

Excelには、 カメラ 選択したデータの写真を撮って、それを画像として貼り付けることができるツール。 元のデータが変更されると、コピーされた画像が動的に変更されます。

まず、を表示する必要があります カメラ リボンに貼ってから塗ってください。

1に設定します。 OK をクリックします。 クイックアクセスツールバーをカスタマイズする アイコンをクリックし、 その他のコマンド オプション、スクリーンショットを参照してください:

2。 オープンで Excelのオプション ダイアログボックスで、次の操作を行ってください。

  • 次の項目を選択します。: すべてのコマンド から からのコマンドを選択 落ちる;
  • 次に、スクロールして選択します カメラ リストボックスから;
  • 次に、をクリックします 追加 このツールをに追加するボタン クイックアクセスツールバーをカスタマイズする;
  • 最後に、 OK このダイアログボックスを閉じます。

3。 そしてその カメラ ツールがリボンに表示されています。スクリーンショットを参照してください。

4。 次に、画像が必要なセルの範囲を選択します。

5。 次に、をクリックします カメラ ツールをクリックし、ワークシートに移動して任意の場所をクリックすると、以下のデモに示すように、データ範囲が画像として挿入されます。


便利な機能を備えた画像または画像形式としてセルの範囲を挿入します

あなたが持っている場合 Kutools for Excelそのと リソースライブラリ 機能、あなたは選択したデータをに保存することができます リソースライブラリ、そしてあなたが好きなように将来のための画像やテキストとしてそれを使用してください。

インストールした後 Kutools for Excel、次のようにしてください。

1。 画像として挿入するデータ範囲を選択します。

2。 次に、をクリックします。 クツール > ナビゲーション、スクリーンショットを参照してください:

3。 展開された ナビゲーション ペインをクリック リソースライブラリ アイコンをクリックし、 選択したコンテンツをリソースライブラリに追加します アイコン、スクリーンショットを参照してください:

4。 の中に 新しいリソースライブラリエントリ ダイアログボックスで、このアイテムの名前を指定してから、追加するグループを選択します。 スクリーンショットを参照してください:

5。 次に、をクリックします。 追加 追加するボタン リソースライブラリ ペイン。 この範囲を画像として挿入する場合は、セルをクリックして画像を見つけ、保存されたアイテムを リソースライブラリ ペインをクリックし、 として挿入 > 写真(EMF) アイテムのドロップダウンリストから。 また、データ範囲は画像としてシートに挿入されます。スクリーンショットを参照してください。


セル値に基づいて画像または画像を動的に挿入する

このセクションでは、セル値に基づいて特定の画像を表示する方法を説明します。 たとえば、ドロップダウンセルから特定のアイテムを選択したときに対応する画像を表示したいのですが、別のアイテムを選択すると、以下のデモのように画像が動的に変更されます。

名前付き範囲機能を使用して、セル値に基づいて画像または画像を動的に挿入します

通常、Excelでは、動的な名前付き範囲を作成し、リンクされた画像を使用してExcelでこのタスクを解決できます。

1。 まず、製品名と相対画像を含むXNUMXつの列を作成する必要があります。スクリーンショットを参照してください。

2。 次に、セル値のドロップダウンリストを作成してください。 セルをクリックしてドロップダウンリストを出力し、[ 且つ > データ検証 > データ検証、スクリーンショットを参照してください:

3。 飛び出した データ検証 ダイアログボックス、下 設定 タブを選択 リスト から 許可する ドロップダウンして、ドロップダウンリストを作成するセルを ソース テキストボックス、スクリーンショットを参照:

4に設定します。 OK をクリックします。 OK、セル値を含むドロップダウンリストが作成されたら、ドロップダウンリストからXNUMXつのアイテムを選択します。スクリーンショットを参照してください。

5。 次に、をクリックします。 > 名前を定義する、スクリーンショットを参照してください:

6。 の中に 新しい名前 ダイアログボックスで、次の操作を行ってください。

  • myimageという名前をに入力します お名前 テキストボックス;
  • 次に、次の数式をコピーして貼り付けます。 =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) [参照先]テキストボックスに入力します。

注意:上記の式では:

  • Sheet11!$ A $ 2:$ B $ 6:使用する値と画像を含むワークシートと範囲です。
  • Sheet11!$ E $ 2:ドロップダウンリストを作成したワークシート内のセルです。
  • Sheet11!$ A $ 2:$ A $ 6:は、ドロップダウンリストに基づいて作成されたセルのリストです。
  • 可変数 2 画像を含む列番号です。 画像が列Cにある場合は、3を入力する必要があります。

7。 次に、をクリックします OK ボタンをクリックし、E2のセル値に基づいて、元の範囲からセルF2に対応する画像をコピーして貼り付けてください。スクリーンショットを参照してください。

8。 次に、セルF2で画像を選択し、この数式を入力してください = myimage (マイイメージ 手順6)で数式バーに作成した範囲名です。スクリーンショットを参照してください。

9。 数式を入力したら、を押します 入力します キーを押すと、ドロップダウンリストからXNUMXつのアイテムを選択すると、その相対的な画像がすぐに表示されます。 スクリーンショットを参照してください:


便利な機能を使用して、セル値に基づいて画像または画像を動的に挿入します

上記の方法は私たちのほとんどにとって難しいかもしれません、ここでは、便利な機能を紹介します– 画像のドロップダウンリスト of Kutools for Excel、この便利なツールを使用すると、数回クリックするだけで、相対的な画像を含む複数のドロップダウンリストを作成できます。

インストールした後 Kutools for Excel、次の手順で実行してください。

1。 まず、ワークシートに製品名と相対画像を含むXNUMXつの列を作成する必要があります。

2。 次に、をクリックします クツール > ドロップダウンリスト > 画像のドロップダウンリスト、スクリーンショットを参照してください:

3。 の中に 画像のドロップダウンリスト ダイアログボックスで、セルの値と画像の列を作成した場合は、手順1を無視してから、元のデータと画像の範囲、および出力範囲を選択してください。スクリーンショットを参照してください。

4。 次に、をクリックします Ok ボタンをクリックすると、選択したセルに画像付きのドロップダウンリストが作成され、ドロップダウンセルからアイテムを選択すると、対応する画像がすぐに表示されます。以下のデモを参照してください。


Excelファイルからすべての画像または画像をエクスポートまたは保存します

ワークブックに複数の画像があり、今度は、Excelファイルからすべての画像を抽出してフォルダーに保存する必要があります。 このタスクをExcelでどのように解決できますか?

名前を付けて保存機能を使用して、Excelからすべての画像または画像をエクスポートまたは保存します

通常は、 名前を付けて保存 ブックからすべての画像を保存する機能は、次のようにしてください。

1に設定します。 OK をクリックします。 フィレット > 名前を付けて保存、で 名前を付けて保存 ウィンドウで、エクスポートされたファイルを配置するフォルダを指定して、 Webページ(*。htm; *。html) から 名前を付けて保存 ドロップダウンリストを入力します。スクリーンショットを参照してください。

2。 そして、 セールで節約 ボタンをクリックして特定のフォルダーに移動すると、XNUMXつのファイルが表示されます。XNUMXつはHTML形式のファイルで、もうXNUMXつはブックの画像、グラフ、またはその他のオブジェクトを含むフォルダーです。 スクリーンショットを参照してください:

3。 次に、必要に応じて画像のみを別のフォルダにドラッグできます。

注意:これを使って 名前を付けて保存 この機能では、各画像をXNUMX回取得し、XNUMXつは小さく、もうXNUMXつは大きくなるため、必要に応じて高解像度の画像を保存できます。


ファイル拡張子を変更して、Excelからすべての画像または画像をエクスポートまたは保存します

Excelファイルからすべての画像を保存するには、ファイル拡張子をRARに変更することもできます。 このようにしてください:

1。 ファイル拡張子を変更する XLSX 〜へ RAR 以下のスクリーンショットのように:

2。 次に、ファイルを解凍すると、フォルダー内に3つのフォルダーと1つのファイルが表示されます。スクリーンショットを参照してください。

3。 次に、をクリックして開きます xl フォルダを開き、 メディア フォルダ、すべての画像が重複せずにここに保存されていることがわかります。スクリーンショットを参照してください。


強力な機能を備えたExcelからすべての画像または画像をエクスポートまたは保存する

あなたが持っている場合 Kutools for Excelそのと グラフィックのエクスポート この機能を使用すると、必要に応じて、画像、グラフ、図形などの特定のオブジェクトを画像形式にすばやくエクスポートできます。

インストールした後 Kutools for Excel、次の手順で実行してください。

1に設定します。 OK をクリックします。 クツールズプラス > インポート・エクスポート > グラフィックのエクスポート、スクリーンショットを参照してください:

2。 の中に グラフィックのエクスポート ダイアログボックスで、次の操作を実行します。

  • 選択する ピクチャー オプションから タイプ ドロップダウンリスト;
  • エクスポートする画像を保存するフォルダーを指定します。
  • 次に、からドロップダウンリストをクリックします エクスポート形式 写真のフォーマットをXNUMXつ選択します。

3。 最後に、 Ok ボタンをクリックすると、現在のワークブックのすべての画像が指定したフォルダーに保存されます。スクリーンショットを参照してください。


Excelのセルのリストに基づいて、フォルダー内の画像名の名前を変更します

フォルダ内にたくさんの写真があり、今、これらすべての画像の名前を変更したい場合、Excelで簡単な方法でこの仕事をどのように解決できますか?

Excelでは、最初にすべての古い画像名を列にリストし、次に新しい名前を入力し、最後にVBAコードを適用して、古い名前を新しい名前に一度に置き換える必要があります。 以下の手順で実行してください。

1。 すべての画像名をセルのリストにリストするか、以下のコードを適用して、手動でXNUMXつずつ入力せずに、特定のフォルダー内のすべての画像名をリストできます。

2。 押さえつける Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

3に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:フォルダからすべての画像名を一覧表示します

Sub MainList()
'Updateby Extendoffice
On Error Resume Next
Set xRg = Application.InputBox("Please select a cell to put the filenames:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRg = xRg(1)
Set Folder = Application.FileDialog(msoFileDialogFolderPicker)
If Folder.Show <> -1 Then Exit Sub
xDir = Folder.SelectedItems(1)
Call ListFilesInFolder(xRg, xDir, True)
End Sub
Sub ListFilesInFolder(ByVal xRg As Range, ByVal xFolderName As String, ByVal xIsSubfolders As Boolean)
Dim xFileSystemObject As Object
Dim xFolder As Object
Dim xSubFolder As Object
Dim xFile As Object
Dim rowIndex As Long
Set xFileSystemObject = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFileSystemObject.GetFolder(xFolderName)
rowIndex = 1
For Each xFile In xFolder.Files
xRg.Formula = xFile.Name
Set xRg = xRg.Offset(rowIndex)
rowIndex = 1
Next xFile
If xIsSubfolders Then
For Each xSubFolder In xFolder.SubFolders
ListFilesInFolder xRg, xSubFolder.Path, True
Next xSubFolder
End If
Set xFile = Nothing
Set xFolder = Nothing
Set xFileSystemObject = Nothing
End Sub

4。 次に、 F5 このコードを実行するためのキーを押すと、プロンプトボックスが表示されます。画像名を出力するセルをクリックしてください。スクリーンショットを参照してください。

5。 次に、をクリックします。 OKブラウズ ダイアログが表示されます。すべての画像名を一覧表示する画像が含まれているフォルダを選択してください。スクリーンショットを参照してください。

6に設定します。 OK をクリックします。 OK、特定のフォルダ内のすべての画像名がセルに一覧表示されています。スクリーンショットを参照してください。

7。 次に、以下のスクリーンショットに示すように、必要な新しい名前を別の列に入力します。

8。 次に、以下のコードを適用して画像の名前を変更し、を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

9に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:フォルダー内の複数のファイルの名前を変更します

Sub RenameFiles()
'Updateby Extendoffice
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

注意:上記のコードでは、 A:A 名前を変更する古いイメージ名リストを示し、 B 使用する新しい画像名が含まれているので、必要に応じて変更できます。

10。 次に、 F5 このコードを実行するためのキー、およびポップアウトされた ブラウズ ウィンドウで、名前を変更する画像が含まれているフォルダを選択します。スクリーンショットを参照してください。

11。 次に、をクリックします OK ボタンをクリックすると、以下のスクリーンショットに示すように、すべての画像名が新しい名前に置き換えられました。


画像をクリックすると拡大または縮小します

ワークシートに小さな画像を挿入したとします。次に、下のデモに示すように、画像をクリックすると拡大し、もう一度クリックすると縮小します。 このタスクをExcelでどのように解決できますか?

クリックしたときに画像サイズを拡大または縮小するには、次のコードを使用すると便利です。 以下の手順で実行してください。

1。 画像を右クリックして、 マクロの割り当て、スクリーンショットを参照してください:

2。 次に、飛び出した マクロの割り当て ダイアログボックスで New ボタン、スクリーンショットを参照してください:

3。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウの間に、以下のコードをコピーして貼り付けてください サブ 影響により End Subの コード。 スクリーンショットを参照してください:

Dim shp As Shape
    Dim big As Single, small As Single
    Dim shpDouH As Double, shpDouOriH As Double
    big = 3  
    small = 1
    On Error Resume Next
    Set shp = ActiveSheet.Shapes(Application.Caller)
    With shp
        shpDouH = .Height
        .ScaleHeight 1, msoTrue, msoScaleFromTopLeft
        shpDouOriH = .Height
     
        If Round(shpDouH / shpDouOriH, 2) = big Then
            .ScaleHeight small, msoTrue, msoScaleFromTopLeft
            .ScaleWidth small, msoTrue, msoScaleFromTopLeft
            .ZOrder msoSendToBack
        Else
            .ScaleHeight big, msoTrue, msoScaleFromTopLeft
            .ScaleWidth big, msoTrue, msoScaleFromTopLeft
            .ZOrder msoBringToFront
        End If
    End With

4。 次に、 Alt + Q を閉じるためのキー アプリケーション向け Microsoft Visual Basic 窓。 これで、画像をクリックすると、指定したサイズに拡大され、もう一度クリックすると、以下のデモに示すように元のサイズに縮小されます。


ワークシートをスクロールするときは常に画像をフロートさせます

ワークシートを上下にスクロールしても、画像を常に表示できるように、ワークシート画面に画像をフロートさせたい場合があります。 このセクションでは、Excelでこのジョブを処理するための簡単なトリックを紹介します。 次の手順で実行してください。

1。 まず、使用したい画像を挿入します。

2。 次に、常に表示したい画像が含まれているシートタブを右クリックし、[ コードを表示 コンテキストメニューから。 オープンで アプリケーション用のMicrosoftVisual Basic ウィンドウで、以下のコードをコピーして空のモジュールに貼り付けます。

VBAコード:常にワークシートに画像をフロートさせます

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

注意:このコードでは、 画像1 挿入した画像名ですので、必要に応じて変更してください。

3。 次に、コードウィンドウを保存して閉じます。これで、ワークシートをスクロールしてセルをクリックすると、画像は常にワークシートの右上隅に保持されます。 スクリーンショットを参照してください:


アクティブなシート/セルの範囲から画像または画像を削除します

ワークシート、セルの範囲、または現在のワークブックからすべての画像を削除する簡単な方法はありますか? このセクションでは、Excelでこのジョブを解決するためのいくつかの方法を紹介します。

VBAコードを使用してアクティブシートから画像または画像を削除する

現在のワークシートから画像を削除するには、以下のVBAコードが役立ちます。次のようにしてください。

1。 削除する画像を含むワークシートをアクティブにします。

2。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

3に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:現在のワークシートからすべての画像を削除します

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4。 次に、 F5 このコードを実行するためのキーを押すと、アクティブなワークシート内のすべての画像が一度に削除されます。


VBAコードを使用してセルの範囲から画像または画像を削除します

ある範囲のセルからのみ画像を削除する必要がある場合は、別の簡単なコードが役立ちます。

1。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:セルの範囲から画像を削除します

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

注意:上記のコードでは、 B4:C6 画像を削除する範囲です。

3。 次に、 F5 このコードを実行するためのキーを押すと、選択した範囲の画像がすぐに削除されます。スクリーンショットを参照してください。


アクティブなシート、選択したシート、便利な機能を備えたすべてのシートから画像や写真を削除します

あなたが持っている場合 Kutools for Excelそのと イラストとオブジェクトを削除する この機能を使用すると、ワークシート、選択したシート、またはワークブック全体から画像をすばやく削除できます。

インストールした後 Kutools for Excel、次の手順で実行してください。

1に設定します。 OK をクリックします。 クツール > 削除 > イラストとオブジェクトを削除する、スクリーンショットを参照してください:

2。 オープンで イラストとオブジェクトを削除する ダイアログボックス、チェック ピクチャー から 削除 セクションをクリックし、下から画像を削除するスコープを指定します 覗く セクション、スクリーンショットを参照してください:

3。 次に、をクリックします Ok ボタンをクリックすると、指定したとおりにすべての画像がワークシート、選択したワークシート、またはワークブック全体から削除されます。



  • スーパーフォーミュラバー (複数行のテキストと数式を簡単に編集できます); 読書レイアウト (多数のセルを簡単に読み取って編集する); フィルター範囲に貼り付け...
  • セル/行/列をマージする およびデータの保持。 分割セルコンテンツ; 重複する行と合計/平均を組み合わせる...重複セルを防止します。 範囲を比較する...
  • [複製]または[一意]を選択します 行; 空白行を選択 (すべてのセルは空です); スーパーファインドとファジーファインド 多くのワークブックで; ランダム選択...
  • 正確なコピー 数式参照を変更せずに複数のセル。 参照の自動作成 複数のシートに; 箇条書きを挿入、チェックボックスなど...
  • お気に入りの数式をすばやく挿入する、範囲、チャート、写真; セルを暗号化する パスワード付き。 メーリングリストを作成する そしてメールを送る...
  • テキストを抽出、テキストの追加、位置による削除、 スペースを削除する; ページング小計の作成と印刷。 セルの内容とコメントを変換する...
  • スーパーフィルター (フィルタースキームを保存して他のシートに適用します); 高度な並べ替え 月/週/日、頻度など。 特殊フィルター 太字、斜体...
  • ワークブックとワークシートを組み合わせる; キー列に基づいてテーブルをマージします。 データを複数のシートに分割; xls、xlsx、PDFをバッチ変換...
  • ピボットテーブルのグループ化 週番号、曜日など... ロック解除された、ロックされたセルを表示する さまざまな色で; 式/名前を持つセルを強調表示する...
kteタブ201905
  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性が50%向上し、毎日何百ものマウスクリックが減ります。
officetab下部
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    janick1980. · 1 months ago
    Good afternoon,

    Very nice page.

    Only I tried the VBA of "Insert Multiple Images Or Images That Match Their Names With VBA Code" but unfortunately it doesn't work.

    I can finish everything but unfortunately I can't get with pictures in the excel.

    Any idea what the problem could be here?
    • To post as a guest, your comment is unpublished.
      skyyang · 1 months ago
      Hello, janick,
      The code works well in my workbook, do you select the correct folder contains the images? Please check it?

      Thank you!
  • To post as a guest, your comment is unpublished.
    DikshMishra · 1 months ago
    Hey, it was an amazing article thanks for sharing.
    Keep up the good work.

    source: https://tractorguru.in/tractor/new-holland-9010
  • To post as a guest, your comment is unpublished.
    saundersmarshall · 2 months ago
    This is a great article! I really like how you presented it so easy to understand