Mataupu
O nisi taimi e umi se taimi e fai ai ni mea. Ae ina ua uma ona latou faia, ina ua uma le mea moni latou foliga manino ma e oo lava banal. Mai le faasologa "o le a, na mafai?".
Mai ulua'i fa'aliliuga, o le tulaga o lo'o i le pito i lalo ole fa'amalama o le Microsoft Excel e masani ona fa'aalia ai le aofa'i o sela filifilia:
Afai e manaʻo ai, e mafai lava ona kiliki-i luga o nei faʻaiʻuga ma filifili mai le lisi o tala tonu po o fea galuega tatou te fia vaʻaia:
Ma talu ai nei, i faʻamatalaga lata mai o Excel, na faʻaopoopoina e le au atinaʻe a Microsoft se foliga faigofie ae faʻapitoa - o le taimi nei e te kiliki i luga o nei faʻaiʻuga, e kopiina i le laupapa kilipa!
Matagofie.
Ae faʻafefea i latou e leʻi i ai (poʻo ua uma?) O loʻo i ai sea ituaiga Excel? O iinei e mafai ai ona fesoasoani macros faigofie.
Kopi le aofa'i o sela ua filifilia i le Laupapa e fa'aaoga ai se macro
Tatala i le fa'ailoga atinae (Atiae) faʻatonu Autu vaaia po'o le fa'aoga lea o le keyboard shortcut Alt+F11. Fa'aofi le module fou gaogao e ala i le lisi Fa'aofi - Module ma kopi le code lea iina:
Sub SumFilifilia() Afai TypeIgoa(Filifiliga) <> "Vaega" Ona Aluese lea i lalo ma GetObject("Fou:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(Filifiliga) .PutInClipboard E faigofie lona manatu:
- Muamua e sau le "puipuiga mai le vale" - matou te siaki le mea tonu e faʻamaonia. Afai e le filifilia sela (ae, mo se faʻataʻitaʻiga, se siata), ona alu ese lea o le macro.
- Ona faaaoga lea o le poloaiga Getobject matou te fatuina se mea fou faʻamatalaga lea o le a teuina ai a matou aofaiga o sela filifilia mulimuli ane. O se code alphanumeric umi ma e le mafai ona malamalama i ai, o le mea moni, o se fesoʻotaʻiga i le lala resitala a Windows o loʻo i ai le faletusi Microsoft Forms 2.0 Object Library, lea e mafai ona faia ai mea faapena. O nisi taimi e ta'ua foi lea togafiti fa'amaonia tuai fa'amauina. Afai e te le faʻaaogaina, e tatau ona e faia se fesoʻotaʻiga i lenei faletusi i le faila e ala i le lisi Meafaigaluega - Faʻamatalaga.
- O le aofa'i o sela ua filifilia o se fa'atonuga Pepa GaluegaFunction.Sum(Filifiliga), ona tu'u lea o le aofa'i i luga o le laupapa kilipa ma le fa'atonuga PutInClipboard
Mo le faigofie o le faʻaoga, e mafai, ioe, tuʻuina atu lenei macro i se ala pupuu keyboard e faʻaaoga ai le ki macros tab atinae (Fa'atupu - Macros).
Ma afai e te manaʻo e vaʻai poʻo le a tonu lava le kopiina pe a uma ona faʻaogaina le macro, e mafai ona e kiina le laupapa Clipboard e faʻaaoga ai le tamaʻi aū i le pito i lalo taumatau o le vaega tutusa i luga. O le autu (Fale) tab:
E le gata i le aofaiga
Afai, e faaopoopo atu i le aofaʻi o tupe, e te manaʻo i se isi mea, ona mafai lea ona e faʻaogaina soʻo se galuega e maua mai e le mea. Galuega Pepa Galuega:
Mo se faʻataʻitaʻiga, e iai:
- Sum – sum
- Tulaga – fa'atatau fa'atatau
- Faitau – numera o sela ma numera
- CountA – numera o sela ua tumu
- CountBlank – numera o sela gaogao
- Min – tau maualalo
- Max – tau maualuga
- Median – median (tau totonugalemu)
- … Etc.
Ae fa'afefea pe a natia laina po'o koluma (ma le lima po'o se faamama) i le laina filifilia? Ina ia aua neʻi amanaia i latou i le aofaʻi, e manaʻomia ona faʻaleleia laʻititi la matou code e ala i le faʻaopopo i le mea. filifiliga meatotino Fa'apitoaCells(xlCellTypeVisible):
Sub SumVisible() Afai TypeName(Filifiliga) <> "Vaega" Ona Alu Mai lea i lalo ma GetObject("Fou:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(Selection.SpecialCell)(Filifiliga.SpecialCell) PutInClipboard Fa'ai'u ma Fa'ai'uga Sub I lenei tulaga, o le faʻatusatusaina o soʻo se galuega atoa o le a faʻaaogaina i na o sela vaaia.
Afai e te manaʻomia se fua faʻatatau ola
Afai e te moemiti, e mafai ona e faia ni faʻaaliga pe a sili atu le kopiina e le o se numera (faʻaauau), ae o se fua ola i totonu o le paʻu, lea e fuafua ai le aofaʻi tatou te manaʻomia mo sela filifilia. I lenei tulaga, e tatau ona e faʻapipiʻi le fua faʻatatau mai vaega, faʻaopoopo i ai le aveeseina o faʻailoga tala ma sui le koma (lea e faʻaaogaina e fai ma vaeluaga o tuatusi o le tele o laina filifilia i le VBA) ma se semicolon:
Sub SumFormula() Afai TypeName(Filifiliga) <> "Range" Ona Alu ese lea o Sub With GetObject("Fou:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText "=СУММ(" & Sui(Sui(Filifiliga). Tuatusi, ",", ";"), "$", "") & ")". Aotelega ma aiaiga faaopoopo
Ma, mulimuli ane, mo maniacs atoatoa, e mafai ona e tusia se macro lea o le a aoteleina e le o sela filifilia uma, ae naʻo i latou e faʻamalieina tulaga tuʻuina atu. O lea la, mo se faʻataʻitaʻiga, o le macro o le a foliga mai e tuʻu le aofaʻi o sela filifilia i totonu o le Buffer, pe afai o latou tau e sili atu nai lo le 5 ma i le taimi lava e tasi e tumu i soʻo se lanu:
Sub CustomCalc() Fa'ailo my Range As Range pe afai TypeName(Filifiliga) <> "Range" Ona Alu 'ese lea i lalo mo sela ta'itasi i le Filifiliga Afai cell.Value > 5 Ma cell.Interior.ColorIndex <> xlLeai Ona Afai la'u Range E Leai se Mea Ona Seti lea o my Range = sela Isi Seti myRange = Union(myRange, cell) Fa'ai'u pe a fa'ai'u pe a soso'o sela ma GetObject("Fou:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}") .SetText WorksheetFunction.Sum(myRange) .PutInClipboard End With End E pei ona faigofie ona e mafaufauina, e mafai ona faʻatulagaina tulaga i soʻo se mea - e oʻo atu i le cell formats - ma i soʻo se aofaʻi (e aofia ai le fesoʻotaʻi faʻatasi ma tagata faʻaoga talafeagai poʻo le ma). E tele avanoa mo mafaufauga.
- Su'e fua fa'atatau i tau (6 auala)
- O a macros, faʻafefea ona faʻaogaina, o fea e faʻapipiʻi ai le Visual Basic code
- Fa'amatalaga aoga i le tulaga o Microsoft Excel