O le tele o taimi, e tulaʻi mai se tulaga pe a manaʻomia ona faʻaputuina (faʻaputu) le tele o tau faʻasolosolo faʻasolosolo i totonu o le tasi sela:
O na. afai, mo se faʻataʻitaʻiga, e te ulufale i le numera 1 i le cell A5, ona faʻaalia lea o le numera 1 ile B15. Afai e te ulufale i le numera 1 i le A7, e tatau ona aliali mai le 1 i le cell B22, ma isi. I se tulaga lautele, o le a le au tausitusi (ae le gata ia i latou) e taʻua o le aofaʻi faʻaputu.
E mafai ona e fa'atinoina se fa'aputuga cell-accumulator e fa'aaoga ai se macro faigofie. Kiliki taumatau i luga o le laupepa laupepa o loʻo i ai sela A1 ma B1 ma filifili mai le lisi o faʻamatalaga Punaoa tusitusiga (Source Code). I le faʻamalama faʻamatalaga Visual Basic e tatala, kopi ma faapipii le faʻailoga faigofie macro:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) With Target If .Address(Sese, False) = "A1" Then If IsNumeric(.Value) Then Application.EnableEvents = False Range("A2").Value = Range(" A2").Value + .Value Application.EnableEvents = Fa'ai'uga Moni Pe a Fa'ai'u I le Fa'ai'uga Sub. O tuatusi o sela A1 ma A2, ioe, e mafai ona suia i lau oe lava.
Afai e te manaʻomia le siakiina o faʻamaumauga o faʻamatalaga ma aoteleina e le o sela taʻitasi, ae o laina atoa, ona tatau lea ona sui teisi le macro:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) Afai e le Fesoʻotaʻi(Target, Range("A1:A10")) E Leai se Mea Ona Pe a IsNumeric(Target.Value) Ona Application.EnableEvents = False Target.Offset(0, 1) .Value = Target.Offset(0, 1).Value + Target.Value Application.EnableEvents = Fa'ai'uga Moni pe a Fa'ai'u pe a Fa'ai'u. E faʻapea o faʻamaumauga o loʻo tuʻuina i totonu o sela o le laina A1: A10, ma o numera na tuʻuina atu o loʻo aoteleina i le koluma lata ane i le itu taumatau. Afai i lau mataupu e le o vavalalata, ona faʻateleina lea o le suiga i le taumatau i le Offset operator - sui le 1 i se numera tele.
- O a macros, o fea e tuʻu ai le macro code i le VBA, faʻafefea ona faʻaogaina?