Pievienojiet skaitļus esošajam šūnu saturam, izmantojot VBA makro

Satura rādītājs

Izmantojot makro, nolasiet visus skaitļus no vēlamā šūnu diapazona un pievienojiet saturam skaitli

Bieži vien saraksta šūnām ir jāpievieno atzīme. Lai to izdarītu, visām šūnu diapazona konstantēm ir jāpievieno fiksēta vērtība.

Formulas nevajadzētu mainīt. Makro atrisina šo uzdevumu un visām atzīmēm pievienotajā datu apgabalā pievieno virkni jūsu izvēles.

Tādā veidā jūs varat, piemēram, ātri un efektīvi pielāgot cenas un tamlīdzīgi jauniem apstākļiem.

Nākamajā attēlā parādīta tabula, kas jāmaina. Šūnās B1 un B2 ir konstantes, bet šūnās B3 un B4 - formulas. Abas formulas šūnas attiecas uz šūnām ar nemainīgām vērtībām.

Lai pievienotu skaitli 10 visām šī saraksta konstantēm, vispirms atzīmējiet datu apgabalu B1: B4 un pēc tam izsauciet šādu makro:

Pievienot apakškonstanti ()
Dim šūna kā diapazons
Dim faktors tik ilgi
Papildu summa = 10
Katrai atlasītajai šūnai
Ar šūnu
Ja nē (.HasFormula) Tad .Value = .Vērtība + papildu summa
Beigt ar
Nākamā šūna
Beigt apakš

Pēc makro palaišanas papildu summa 10 tiek pievienota visām konstantajām šūnām atzīmētajā šūnu apgabalā. Sekojošais attēls parāda rezultātu:

Makro izmanto koeficientu, ko definējāt mainīgajam lielumam “Papildu summa”.

Lai ievadītu makro, programmā Excel nospiediet ALT F11, lai atvērtu VBA redaktoru. Izmantojiet komandu INSERT - MODULE, lai ievietotu tukšu moduļa lapu. Lai makro sāktu tieši no programmas Excel, izmantojiet taustiņu kombināciju ALT F8.

Jums palīdzēs attīstību vietā, daloties lapu ar draugiem

wave wave wave wave wave