مجموعي حجره (مجموعه)

ډیری وختونه ، یو حالت رامینځته کیږي کله چې موږ اړتیا لرو څو ارزښتونه په ترتیب سره په یوه حجره کې داخل کړو (راټولو):

هغوی. که، د مثال په توګه، تاسو په A1 حجره کې 5 شمیره داخل کړئ، نو 1 شمیره باید په B15 کې ښکاره شي. که تاسو بیا په A1 کې 7 شمیره داخل کړئ، نو 1 باید په B22 حجره کې ښکاره شي، او داسې نور. په عموم کې، کوم حساب ورکوونکي (او نه یوازې دوی) د مجموعي مجموعي غوښتنه کوي.

تاسو کولی شئ د ساده میکرو په کارولو سره د داسې ذخیره کولو حجرو جمع کونکی پلي کړئ. د شیټ ټب کې ښیې کلیک وکړئ چیرې چې حجرې A1 او B1 موقعیت لري او د شرایطو مینو څخه غوره کړئ د سرچینې متن (د سرچينې کوډ). د بصری اساسی مدیر کړکۍ کې چې خلاصیږي ، ساده میکرو کوډ کاپي او پیسټ کړئ:

شخصي فرعي کاري پاڼه_بدلون (د Excel.Range په توګه) د هدف سره که .Address(False, False) = "A1" بیا که IsNumeric(.Value) نو بیا Application.EnableEvents = False Range("A2").Value = Range(" A2").Value + .Value Application.EnableEvents = ریښتیني پای که پای ته ورسیږي که د پای فرعي سره پای  

د A1 او A2 حجرو پته، البته، ستاسو د خپل سره بدلیدلی شي.

که تاسو اړتیا لرئ د معلوماتو ننوتل تعقیب کړئ او د انفرادي حجرو لنډیز ونه کړئ ، مګر ټول سلسلې ، نو میکرو باید یو څه بدل شي:

شخصي فرعي کاري پاڼه_بدلون (د Excel.Range په توګه د وال هدف له مخې) که نه متصل (هدف، حد ("A1:A10")) هیڅ شی نه وي نو بیا که د عددي (ټارګیټ. ارزښت) نو بیا Application.EnableEvents = False Target.Offset(0) ارزښت = هدف. آفسټ  

داسې انګیرل کیږي چې ډاټا د A1:A10 سلسلې حجرو کې داخل شوي، او داخل شوي شمیرې په ښي خوا کې په نږدې کالم کې خلاص شوي. که ستاسو په قضیه کې دا نږدې نه وي، نو د آفسټ آپریټر کې ښي خوا ته بدلون زیات کړئ - 1 د لوی شمیر سره بدل کړئ.

• میکرو څه دي، چیرته چې په VBA کې میکرو کوډ داخل کړئ، څنګه یې وکاروئ؟