Clár ábhair
Uaireanta tógann sé am an-fhada chun teacht suas le roinnt rudaí. Ach nuair a bhíonn siad invented CHEANA, tar éis an bhfíric is cosúil go bhfuil siad soiléir agus fiú banal. As an tsraith "cad é, bhí sé indéanta?".
Ó na chéad leaganacha, léirigh an barra stádais ag bun na fuinneoige Microsoft Excel iomláin do chealla roghnaithe go traidisiúnta:
Más mian, bhí sé indéanta fiú cliceáil ar dheis ar na torthaí seo agus roghnaigh ón roghchlár comhthéacs go díreach na feidhmeanna ba mhaith linn a fheiceáil:
Agus díreach le déanaí, sna nuashonruithe Excel is déanaí, chuir forbróirí Microsoft gné shimplí ach intleachtúil leis - anois nuair a chliceálann tú ar na torthaí seo, déantar iad a chóipeáil chuig an ngearrthaisce!
Áilleacht.
Ach cad faoi na daoine nach bhfuil a leithéid de leagan de Excel acu fós (nó cheana féin?)? Seo nuair is féidir le macraí simplí cabhrú.
Suim na gceall roghnaithe a chóipeáil go dtí an Ghearrthaisce le macra
Oscail i gcluaisín forbróir (Forbróir) eagarthóir Visual Basic nó bain úsáid as an aicearra méarchláir seo Eile+F11. Cuir isteach modúl nua folamh tríd an roghchlár Ionsáigh – Modúl agus cóipeáil an cód seo a leanas ansin:
Fo-suim Roghnaithe() Má CineálName(Roghnú) <> "Raon" Ansin Scoir Fo Le GetObject("Nua:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(Roghnú) .PutInClipboard Tá a loighic simplí:
- Ar dtús tagann an “cosaint ón amadán” – seiceálaimid cad é go díreach atá aibhsithe. Mura roghnaítear cealla (ach, mar shampla, cairt), ansin scoir an macra.
- Ansin ag baint úsáide as an ordú Faigh réad cruthaímid réad sonraí nua ina stórálfar ár suim cealla roghnaithe níos déanaí. Is éard atá i gcód alfa-uimhriúil fada agus dothuigthe, go deimhin, nasc chuig brainse clárlainne Windows ina bhfuil an leabharlann suite Leabharlann Oibiachtaí Foirmeacha Microsoft 2.0, ar féidir leo rudaí den sórt sin a chruthú. Uaireanta tugtar an cleas seo freisin ceangailteach déanach intuigthe. Mura n-úsáideann tú é, bheadh ort nasc a dhéanamh leis an leabharlann seo sa chomhad tríd an roghchlár Uirlisí — Tagairtí.
- Meastar gur ordú suim na gceall roghnaithe Bileog OibreFunction.Sum(Roghnú), agus ansin cuirtear an méid mar thoradh air ar an gearrthaisce leis an ordú PutInClipboard
Ar mhaithe le héascaíocht, is féidir leat, ar ndóigh, an macra seo a shannadh d’aicearra méarchláir ag baint úsáide as an gcnaipe Macraí tab forbróir (Forbróir - Macraí).
Agus más mian leat a fheiceáil cad a chóipeáil go díreach tar éis duit an macra a rith, is féidir leat an painéal Ghearrthaisce a chur ar siúl ag baint úsáide as an tsaighead bheag sa chúinne íochtair ar dheis den ghrúpa comhfhreagrach ar An príomh- (Baile) tab:
Ní hamháin an méid
Más rud é, i dteannta leis an méid banal, gur mian leat rud éigin eile, ansin is féidir leat úsáid a bhaint as aon cheann de na feidhmeanna a sholáthraíonn an réad dúinn Bileog OibreFunction:
Mar shampla, tá:
- Suim – suim
- Meán – meán uimhríochtúil
- Comhair – líon na gceall le huimhreacha
- CountA – líon na gceall líonta
- CountBlank – líon na gceall folamh
- Íosmhéid – íosluach
- Uasluach – uasluach
- airmheánach – airmheánach (luach lárnach)
- … Srl.
Cad a tharlaíonn má tá sraitheanna nó colúin i bhfolach (de láimh nó le scagaire) sa raon roghnaithe? Chun nach gcuirfear san áireamh iad sna hiomláin, beidh orainn ár gcód a mhionathrú beagán trí chur leis an réad Roghnú maoin Cealla Speisialta(xlCellTypeVisible):
Fo SumVisible() Má CineálName(Roghnú) <> "Raon" Ansin Scoir Fo Le GetObject("Nua:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(Selection.SpecialCells)(xelection.SpecialCells)(xelection.SpecialCells) Cuir Deireadh le PutInClipboard Le Fo Deireadh Sa chás seo, cuirfear ríomh aon fheidhm iomlán i bhfeidhm ar chealla infheicthe amháin.
Más gá duit foirmle maireachtála
Má bhrionglóid tú, is féidir leat teacht suas le cásanna nuair is fearr a chóipeáil ní uimhir (leanúnach), ach foirmle maireachtála isteach sa maolán, a ríomhtar na hiomláin a theastaíonn uainn do na cealla roghnaithe. Sa chás seo, beidh ort an fhoirmle a ghluáil ó blúirí, ag cur leis na comharthaí dollar a bhaint agus leathstad a chur in ionad an camóg (a úsáidtear mar dheighilteoir idir seoltaí roinnt raonta roghnaithe i VBA):
Fo-Fhoirmle() Má CineálName(Roghnú) <> "Raon" Ansin Scoir Fo Le GetObject("Nua:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText "=СУММ("" & Ionadaigh (Athchuir(Selection. Seoladh, ",", ";"), "$", "") &")".PutInClipboard Deireadh Le Deireadh Fo Achoimre le coinníollacha breise
Agus, ar deireadh, le haghaidh maniacs go hiomlán, is féidir leat macra a scríobh a chuirfidh suim nach bhfuil na cealla roghnaithe go léir, ach amháin iad siúd a shásaíonn na coinníollacha a thugtar. Mar sin, mar shampla, beidh cuma macra mar sin a chuireann suim na gcealla roghnaithe isteach sa Mhaoláin, má tá a luachanna níos mó ná 5 agus ag an am céanna go bhfuil siad líonta le haon dath:
Fo CustomCalc() Dim myRange As Range If TypeName(Roghnú) <> "Raon" Ansin Scoir Fo Do Gach cill I Roghnú Má cell.Value > 5 Agus cell.Interior.ColorIndex <> xlNone Ansin Mura bhfuil MyRange Aon rud Ansin Socraigh myRange = cill Eile Socraigh myRange = Aontas(myRange, cill) Críochnaigh Má Chríochnaigh an Chéad Chill Eile Le GetObject("Nua:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(myRange).PutInClip End With EndInClipboard Mar is féidir leat a shamhlú go héasca, is féidir coinníollacha a shocrú go hiomlán ar bith - suas le formáidí cille - agus in aon chainníocht (lena n-áirítear iad a nascadh le chéile le hoibreoirí loighciúla nó nó agus). Tá go leor spáis ann le haghaidh samhlaíochta.
- Tiontaigh foirmlí go luachanna (6 bhealach)
- Cad is macraí ann, conas iad a úsáid, cá háit le cód Visual Basic a chur isteach
- Eolas úsáideach i mbarra stádais Microsoft Excel