Microsoft Excelにあるセルに画像を接続する方法を知っている人はいますか?
たとえば、最初の列には携帯電話のブランドをいくつか掲載し、2番目の列にはそれらの写真をいくつか掲載しました。ここで、最初の列の値をアルファベット順に並べ替えると、2番目の列の画像を維持したいと思います…
どうやってやるの?
並べ替える列と画像が含まれている列の両方を選択します(画像はセルと比較して小さい、つまりセル内にあると想定しています)。オブジェクトの配置プロパティが「セルを使用して移動するがサイズ変更しない」に設定されていることを確認してください。並べ替えを行うと、画像はリストが並べ替えられて移動します。
注-並べ替えるときは、画像が含まれる列を範囲内に含める必要があり、画像はセル内に収まる必要があります。
次のVBAスニペットは、スプレッドシート内のすべての画像に「移動とサイズ」プロパティが設定されていることを確認します。
Sub moveAndSize()
Dim s As Shape
For Each s In ActiveSheet.Shapes
If s.Type = msoPicture Or s.Type = msoLinkedPicture Or s.Type = msoPlaceholder Then
s.Placement = xlMove
End If
Next
End Sub
移動後も画像が収まるようにしたい場合は、xlMoveAndSize
の代わりにxlMove
を使用できます。