Sådan optages makro og derefter hvordan du ændrer koden

Anonim

I denne artikel lærer vi, hvordan man optager makro og derefter hvordan man ændrer det og gør det lettere at lære.

Sådan skriver du makro til sumformel i VBE

Vi har en Excel -data i område A1: C14, hvor kolonne A indeholder navne, kolonne B med emnets mærker 1 og kolonne C med emnets mærker 2. I kolonne D vil jeg returnere de samlede karakterer.

Følg nedenstående trin for at indsætte sumformel ved hjælp af VBA i Microsoft Excel:-

  • Åbn Excel -data.
  • Først registrerer du makroen for at returnere totalkarakterer i celle D2.
  • På fanen "Udvikler" skal du vælge "Optag makro" fra gruppen "Kode".
  • Dialogboksen med "Optag makro" vises.
  • Skriv "makronavn" -boksen navnet på makroen uden at bruge mellemrum og specialtegn.
  • Indtast den genvejstast, du ønsker.
  • Og skriv beskrivelsen om makroen i beskrivelsesboksen.
  • Optagelsen starter nu.
  • Skriv sumformlen i celle D2.
  • Indsæt formlen i område D3: D14.
  • Klik på "Stop optagelse"
  • Tryk på tasten "ALT+F11" for at se de optagede makroer.
  • Registreret kode ville være sådan:-
Sub SUM () '' SUM Makro 'Samlede karakterer opnår' 'Tastaturgenvej: Ctrl+Shift+S' Range ("D2"). Vælg ActiveCell.FormulaR1C1 = "= SUM (RC [-2]: RC [-1] ) "Selection.Copy Range (" C2 "). Vælg Selection.End (xlDown) .Vælg Range (" D14 "). Vælg Range (Selection, Selection.End (xlUp)). Vælg ActiveSheet.Paste Range (" D2 " Vælg End Sub 

Som du kan se, er den ovennævnte VBA-kode for lang til at returnere totalkarakterer, og det er heller ikke let at forstå. Således ændrer vi kodningen.

Sub SUM () Dim X As Integer X = Application.WorksheetFunction.CountA (Range ("A: A")) Range ("D2: D" & X) .Value = "= Sum (B2: C2)" End Sub 

Sådan skriver du makro for gennemsnitsformel i VBE

Vi har en Excel -data i område A1: C14, hvor kolonne A indeholder navne, kolonne B med emnets mærker 1 og kolonne C med emnets mærker 2. I kolonne D vil jeg returnere gennemsnitsmærkerne.

Følg nedenstående trin for at indsætte gennemsnitsformel ved hjælp af VBA i Microsoft Excel 2010 og 2013:-

  • Åbn Excel -data.
  • Først registrerer du makroen for at returnere gennemsnitlige karakterer i cellen D2.
  • På fanen "Udvikler" skal du vælge "Optag makro" fra gruppen "Kode".
  • Dialogboksen med "Optag makro" vises.
  • I feltet "Makronavn" skal du skrive makroens navn uden at bruge mellemrum og specialtegn.
  • Indtast genvejstasten -hvad du vil.
  • Og skriv beskrivelsen om makroen i beskrivelsesboksen.
  • Optagelsen starter nu.
  • Skriv "GENNEMSNIT" -formlen i celle D2.
  • Indsæt formlen i område D3: D14.
  • Klik på "Stop optagelse".
  • Tryk på tasten "ALT+F11" for at se de optagede makroer.
  • Registreret kode ville være sådan:-
Sub GENNEMSNIT () '' GENNEMSNIT Makro 'Samlede karakterer opnås' 'Tastaturgenvej: Ctrl+Shift+A' ActiveCell.FormulaR1C1 = "= Gennemsnit (RC [-3]: RC [-2])" Selection.Copy Range (" E2 "). Vælg Selection.Copy Range (" D2 "). Vælg Selection.End (xlDown) .Vælg Range (" E14 "). Vælg Range (Selection, Selection.End (xlUp)). Vælg ActiveSheet.Paste Range ( "E13"). Vælg Selection.End (xlUp) .Vælg End Sub 

Som du kan se, er ovennævnte VBA-kode for lang til at returnere totalkarakterer, og det er heller ikke let at forstå; derfor ændrer vi koden.

Undergennemsnit () Dim X As Integer X = Application.WorksheetFunction.CountA (Range ("A: A")) Range ("E2: E" & X) .Value = "= Average (B2: C2)" End Sub 

På denne måde kan vi lære at optage makro og derefter ændre det.

Hvis du kunne lide vores blogs, kan du dele den med dine venner på Facebook. Og også du kan følge os på Twitter og Facebook.
Vi vil meget gerne høre fra dig, lad os vide, hvordan vi kan forbedre, supplere eller innovere vores arbejde og gøre det bedre for dig. Skriv til os på e -mail -stedet