Jiska kounye a, pafwa ak yon souri mwen sonje youn nan premye fòmasyon antrepriz jaden mwen an 10 ane de sa.
Imajine: biwo espas ouvè nan biwo reprezantan yon konpayi entènasyonal FMCG, gwo tankou yon teren foutbòl. Konsepsyon chik, ekipman biwo chè, kòd abiman, èkspatriye k ap woule nan kwen yo - se tout 🙂 Nan youn nan sal reyinyon yo, mwen kòmanse yon fòmasyon avanse de jou sou vèsyon aktyèl la nan Excel 2003 pou 15 anplwaye kle nan depatman ekonomik la. , ansanm ak lidè yo. Nou fè konesans, mwen mande yo sou travay biznis, pwoblèm, mwen mande yo montre plizyè fichye travay tipik. Yo montre longè kilomèt dechaje soti nan SAP, fèy rapò yo fè sou sa a, elatriye. Oke, li se yon bagay abitye - mwen mantalman kalkile sijè ak distribisyon, ajiste nan odyans lan. Nan kwen je m 'yo, mwen remake ki jan youn nan patisipan yo, ki montre yon moso nan rapò li a, avèk pasyans rale selil la ak fòmil la desann nan kwa nwa a nan kwen an anba dwat pou plizyè milye liy, apresa sote fen nan. tab la sou vole a, rale l 'tounen, elatriye Pa kapab kanpe li, mwen entèwonp l' boukle sourit la alantou ekran an epi montre yon doub-klike sou kwa nwa a, eksplike sou oto-konplete desann nan sispann la.
Menm lè mwen reyalize ke odyans lan sispèkman trankil epi tout moun ap gade m 'yon dwòl. Mwen insansibl gade alantou tèt mwen tout kote mwen kapab - tout bagay se OK, bra mwen ak janm yo an plas, vole mwen an bouton moute. Mwen mantalman remonte dènye mo mwen yo nan rechèch nan kèk kloz terib - pa te gen anyen kriminèl, sanble. Apre sa, chèf gwoup la leve an silans, lonje men m epi li di ak yon figi wòch: “Mèsi, Nikolai. Fòmasyon sa a ka konplete.
Oke, nan ti bout tan, li te tounen soti ke okenn nan yo te gen yon siy sou doub-klike sou yon kwa nwa ak autocomplete. Li yon jan kanmenm rive istorikman ke pa te gen okenn moun ki montre yo yon bagay ki senp men nesesè. Depatman an antye rale fòmil manyèlman pou dè milye de liy, pòv parèy. E la mwen ye. Sèn lwil oliv. Lè sa a, chèf depatman an te mande anpil pou yo pa revele non konpayi yo a bay pèsonn 🙂
Plizyè fwa pita te gen sitiyasyon ki sanble, men sèlman ak moun k ap koute - pifò kounye a, nan kou, konnen fonksyon sa a.
Kesyon an diferan. Apre premye kè kontan nan metrize yon karakteristik bèl bagay sa yo, pifò itilizatè yo vin konprann ke kopi otomatik fòmil yo lè yo double klike sou kwa nwa a (makè autocomplete) gen tout aspè pozitif ak aspè negatif yo:
- Kopi pa toujou rive nan fen tab la. Si tab la pa monolitik, sa vle di gen selil vid nan kolòn adjasan, Lè sa a, se pa yon reyalite ke autocomplete ap travay jouk nan fen tab la. Gen plis chans, pwosesis la ap sispann nan selil vid ki pi pre a anvan yo rive nan fen an. Si gen selil ki okipe pa yon bagay ki anba kolòn nan, Lè sa a, autocomplete ap sispann sou yo egzakteman.
- Lè kopye konsepsyon selilè gate, paske Pa default, se pa sèlman fòmil la kopye, men tou fòma a. Pou korije, klike sou opsyon kopi bouton an epi chwazi Valè sèlman (Ranpli san fòma).
- Pa gen okenn fason rapid tou fasilman detire fòmil la pa desann men sou bò dwat laeksepte pou rale alamen. Double klike sou kwa nwa a se jis desann.
Ann eseye ranje enpèfeksyon sa yo ak yon makro senp.
Peze rakoursi klavye gòch Alt + F11 oswa bouton Vizyèl Debaz tab pwomotè (Devlopè). Mete nouvo modil vid atravè meni Mete – Modil epi kopye tèks makro sa yo la:
Sub SmartFillDown() Dim rng As Range, n As Long Set rng = ActiveCell.Offset(0, -1).CurrentRegion Si rng.Cells.Count > 1 Lè sa a, n = rng.Cells(1).Row + rng.Rows. Konte - ActiveCell.Row ActiveCell.AutoFill Destination:=ActiveCell.Resize(n, 1), Type:=xlFillValues End If End Sub Sub SmartFillRight() Dim rng As Range, n As Long Set rng = ActiveCell.Offset(-1, 0).CurrentRegion Si rng.Cells.Count > 1 Lè sa a, n = rng.Cells(1).Column + rng.Columns.Count - ActiveCell.Column ActiveCell.AutoFill Destination:=ActiveCell.Resize(1, n), Kalite: =xlFillValues End If End Sub
Makro sa yo:
- ka ranpli pa sèlman desann (SmartFillDown), men tou sou bò dwat la (SmartFillRight)
- pa gate fòma selil ki anba yo oswa sou bò dwat la - se sèlman fòmil la (valè) kopye
- selil vid adjasan yo inyore epi kopi fèt egzakteman nan fen tab la, epi yo pa nan espas ki pi pre a nan done yo oswa premye selil la okipe.
Pou plis konvenyans, ou ka bay rakoursi klavye makro sa yo lè l sèvi avèk bouton an Makro - Opsyon (Macros — Opsyon) dwat la sou tab la. pwomotè (Devlopè). Koulye a, li pral ase yo antre nan fòmil la vle oswa valè nan premye selil la nan kolòn nan epi peze konbinezon an espesifye kle pou makro a otomatikman ranpli kolòn nan tout antye (oswa ranje):
Bote.
PS Yon pati nan pwoblèm nan ak kopye fòmil nan fen tab la te rezoud nan Excel 2007 ak avenman nan "tab entelijan". Se vre, yo pa toujou epi yo pa tout kote ki apwopriye. Ak adwat la, Excel pa janm aprann kopye poukont li.
- Ki sa ki makro, ki jan yo sèvi ak yo, ki kote yo ka resevwa kòd Visual Basic ak ki kote yo kole li.
- Tablo entelijan nan Excel 2007-2013
- Kopi fòmil san chanjman lyen