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

Conas an íomhá a mhéadú nuair a chliceálann sí uirthi in Excel?

Má ghlactar leis go bhfuil liosta pictiúr curtha isteach agat i gcolún agus na méideanna pictiúr a mheaitseáil leis na méideanna cille mar atá thíos an pictiúr a thaispeántar. Toisc go bhfuil cuma bheag ar an bpictiúr a cuireadh isteach, b’fhéidir go mbeidh ort é a mhéadú chun críocha áirithe. Taispeánfaidh an t-alt seo modh duit chun pictiúr a mhéadú nuair a chliceálann tú air in Excel, agus chun teacht ar ais go dtí an méid bunaidh faoin dara cliceáil.

Méadaigh an íomhá nuair a chliceálann sí uirthi le cód VBA


Méadaigh an íomhá nuair a chliceálann sí uirthi le cód VBA

Is féidir leis an gcód VBA seo a leanas cabhrú leat íomhá a mhéadú nuair a chliceálann tú air in Excel. Déan mar a leanas le do thoil.

1. Cliceáil ar dheis ar an bpictiúr a chaithfidh tú a mhéadú ach cliceáil air, ansin cliceáil Macra a shannadh ón roghchlár comhthéacs. Féach an pictiúr:

2. Sa Macra a shannadh bosca dialóige, cliceáil le do thoil ar an Nua cnaipe.

3. Sa popping suas Microsoft Visual Basic d’Fheidhmchláir fuinneog, cóipeáil agus greamaigh an cód VBA thíos idir an Fo agus Fo Deireadh cóid. Féach an pictiúr:

Cód VBA: Méadaigh an íomhá trí chliceáil uirthi in Excel

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

nótaí: Sa chód, is féidir leat méideanna móra an phictiúr a shannadh sa chód mór = 3.

4. Ansin brúigh an Eile + Q eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

As seo amach, nuair a chliceálann tú ar an bpictiúr, méadófar é go dtí an méid a shonraigh tú, agus cliceáil arís gheobhaidh sé ar ais go dtí an méid bunaidh mar atá thíos na scáileáin scáileáin a thaispeántar.


Earraí gaolmhara:


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (9)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Feidhm iontach iontach !!!.
Hay forma que la imagen quede en el cento de la pantalla, aonair aon uair amháin, nada mas, an macra agus muy bien
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Oibríonn an cód seo go maith
Ach nuair a osclaíonn tú an leabhar oibre an dara huair, tagann na híomhánna amach doiléir
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
nuair atá an cód curtha isteach agat agus brúigh Sábháil éiríonn na pictiúir níos lú agus níos lú ... smaoineamh iontach ach ní oibríonn sé tá eagla orm ...
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Seo é atá uaim ach ní oibreoidh sé le mo excel 2016. Faighim teachtaireacht earráide Application.caller = Earráid 2023
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, táim ag iarraidh na luachanna móra (1) agus beag (0.1) a mhodhnú ach ní oibríonn an macra i gceart. Tar éis roinnt cliceáil ní athraíonn an pictiúr :(
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Oibríonn an Macra, is í an fhadhb atá ann, nuair a dhéanann tú athrú ar an méid an pictiúr sa mhacra, má théann tú thíos 1, agus a shábháil, caillfidh an pictiúr a cháilíocht :(
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá a fhios agam go gcailleann jpg cáilíocht gach uair a shábháiltear é. Sin an fáth a moltar d'úsáideoirí sábháil chuig ainm comhaid nua. D'fhéadfadh gurb é sin an fáth go bhfuil pictiúir doiléir ag daoine a dhéanann iarracht an macra seo a úsáid. Cur chuige níos fearr a bheadh ​​ann dhá phictiúr a bheith agat - mór agus beag den ghrianghraf céanna. Cuirtear an ceann beag sa chill, an ceann mór i mbileog eile, an comhad céanna. Ansin bain úsáid as an gcód leis an bpictiúr mór a thaispeáint nuair a chliceáiltear ar an bpictiúr beag nó nuair a chliceáiltear é. Ar an mbealach seo. ní athraítear méid an phictiúir agus dá bhrí sin níor cheart go gcaillfí cáilíocht. Níl mé cinnte an bhfuil Kutools in ann é seo a dhéanamh.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ní oibríonn sé
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Saor in Aisce íoslódáil Féach ar verpixelte Bilder
Ich hatte dasselbe Fadhb mit den verpixelten Bildern. Du mustst in den Einstellungen etwas ändern und zwar:
Unter Datei/Optionen/Erweitert unter dem Punkt "Bildgröße und -Qualität" einen Hacken bei "Bilder nicht in Datei comprimieren" setzen. Dann zeigt es die Bilder nicht mehr verpixelt an. LG
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL