Note: The other languages of the website are Google-translated. Back to English

Hogyan lehet képet elforgatni az Excel cellaértéke alapján?

Az Excel programban az egér húzásával elforgathatjuk a képet, de próbáltál-e már képet cellaérték alapján forgatni. Például a képet 90 fokkal elforgatják, ha a cella értéke 90 az A1 cellában, az alábbi képernyőkép szerint.
doc forgassa a képet az 1. cellánként

Kép elforgatása a makró kóddal ellátott cellaérték alapján

Az Office fül lehetővé teszi a füles szerkesztést és böngészést az Office-ban, és sokkal könnyebbé teszi a munkáját ...
A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet
  • Bármely újrafelhasználása: Adja hozzá a leggyakrabban használt vagy összetett képleteket, diagramokat és bármi mást a kedvenceihez, és a későbbiekben gyorsan használja fel újra.
  • Több mint 20 szöveges szolgáltatás: Szám kivonása a szöveges karakterláncból; Bontsa ki vagy távolítsa el a szövegek egy részét; Számok és pénznemek konvertálása angol szavakká.
  • Eszközök egyesítése: Több munkafüzet és lap egybe; Egyesítsen több cellát / sort / oszlopot adatok elvesztése nélkül; Az ismétlődő sorok és összeg összevonása.
  • Felosztott eszközök: Az adatok felosztása több lapra az érték alapján; Egy munkafüzet több Excel, PDF vagy CSV fájlhoz; Egy oszlop több oszlopra.
  • Ugrás beillesztése Rejtett / szűrt sorok; Gróf és összeg háttérszínnel; Személyre szabott e-maileket küldhet több címzettnek tömegesen.
  • Szuper szűrő: Hozzon létre speciális szűrősémákat, és alkalmazza azokat bármilyen lapra; Fajta hét, nap, gyakoriság és egyebek szerint; Szűrő félkövérrel, képletekkel, megjegyzésekkel ...
  • Több mint 300 hatékony funkció; Működik az Office 2007-2021 és 365 verziókkal; Támogatja az összes nyelvet; Könnyű üzembe helyezés a vállalkozásban vagy szervezetben.

Kép elforgatása a makró kóddal ellátott cellaérték alapján

Csak egy makrókód segíthet a kép forgatásában az Excel cellaértéke alapján.

1. Írjon be egy értéket az A1 cellába, amellyel elforgatja a képet, majd aktiválja azt a képet, amelyet el akar forgatni.

2. nyomja meg Alt + F11 gombok a Microsoft Visual Basic for Applications ablakot, és kattintson rá betétlap > Modulok egy üres újat beilleszteni Modulok. Lásd a képernyőképet:
doc forgassa a képet az 2. cellánként

3. Illessze be a kód alatt a Modulok szkriptet, majd nyomja meg a gombot F5 hogy futtassa a kódot. Lásd a képernyőképet:

VBA: Kép elforgatása cellaérték szerint

Sub RotateImage()
Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value
End Sub

doc forgassa a képet az 3. cellánként
doc forgassa a képet az 1. cellánként

Jegyzet: a kódban A1 az a cella, amely alapján el akarja forgatni a képet, szükség szerint módosíthatja.


Relatív cikkek:


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza 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!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (5)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Ezt akarom csinálni egy képpel, de azt szeretném, hogy függőleges helyzetből a cella minden egyes alkalommal elforduljon akárhány fokkal. Viszont mondjuk a cella 30-at mond, akkor 30 fokkal el fog forogni, de akkor ha a cella értéke 15-re változik, akkor a 15-as pozícióból 30-öt (45-öt függőlegesből) elforgat. Azt akarom, hogy ezúttal 15-öt forogjon a függőlegeshez képest. Van erre mód?


Köszönjük!
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia, nekem is ugyanez a követelmény. Véletlenül rájöttél, hogyan lehet a képet minden alkalommal "nulláról" elforgatni?
A weboldal moderátora ezt a megjegyzést minimalizálta
Sajnos fogalmam sincs erről a problémáról. A problémádat elhelyezheted a fórumon, esetleg valaki tud segíteni a megoldásában. https://www.extendoffice.com/forum.html
A weboldal moderátora ezt a megjegyzést minimalizálta
Vegye ki a kódot felülről:

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

És módosítsa így:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Érték
A weboldal moderátora ezt a megjegyzést minimalizálta
Vegye ki a kódot felülről:

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

És módosítsa így:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Érték
Még senki sem írt megjegyzést
Kérjük, írja meg észrevételeit angol nyelven
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi