Hogyan lehet az összes képet automatikusan mozgatni és méretezni az Excel celláival?
Normál esetben egy képet a munkalapba illesztettek az alapértelmezett Mozgás tulajdonságokkal, és ne méretezzenek cellákkal. Szükség szerint manuálisan meg kell változtatnia a tulajdonságait az Áthelyezés és méret a cellákkal funkcióra a munkalapon. Tulajdonképpen gyorsan megváltoztathatja a képet mozgatásra és méretre a cellákkal automatikusan, egy megoldás segítségével. Ez a cikk megmutatja az elérés módját.
Az összes kép automatikus módosítása mozgatáshoz és mérethez VBA kóddal ellátott cellákkal
Az összes kép automatikus módosítása mozgatáshoz és mérethez VBA kóddal ellátott cellákkal
Az alábbi VBA-kód segítségével gyorsan megváltoztathatja az összes kép tulajdonságát a mozgatáshoz és mérethez a munkalap celláival. Kérjük, tegye a következőket.
1. Nyissa meg a megváltoztatni kívánt képeket tartalmazó munkalapot mozgatással és cellákkal való méretezéssel, majd nyissa meg a Microsoft Visual Basic for Applications ablakot a más + F11 kulcsok.
2. Ban,-ben Microsoft Visual Basic for Applications ablakot, kérjük kattintson betétlap > Modulok. Ezután másolja és illessze be a VBA kódot a Kód ablakba.
VBA kód: az összes kép megváltoztatása mozgatáshoz és mérethez cellákkal
Sub MoveAndSizeWithCells()
Dim xPic As Picture
On Error Resume Next
Application.ScreenUpdating = False
For Each xPic In ActiveSheet.Pictures
xPic.Placement = xlMoveAndSize
Next
Application.ScreenUpdating = True
End Sub
3. megnyomni a F5 vagy kattintson a Futtatás gombra a kód futtatásához.
Ezután az aktív lap képei automatikusan az Áthelyezés és méret elemre módosulnak.
Kapcsolódó cikkek:
- Hogyan központosítson képet egy Excel cellába?
- Hogyan ellenőrizhető, hogy egy cella tartalmaz-e képet az Excelben?
- Hogyan illesszünk be képet vagy képet dinamikusan a cellába az Excel cellája alapján?
- Hogyan lehet nagyítani a képet, amikor rákattint az Excel-ben?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!