Kaip įterpti eilutę po kiekvienos 5 eilutės per VBA

Turinys

Šiame straipsnyje sužinosime, kaip įterpti eilutę po 5tūkst eikite per VBA „Microsoft Excel“.

Paimkime pavyzdį ir supraskime:

Turime duomenų diapazone A1: F31, kuriame A stulpelyje yra Pavadinimas, B stulpelyje yra Gatvės adresas, C stulpelyje Miestas, D stulpelyje yra regionas, E stulpelyje nurodomas šalies pavadinimas, o F stulpelyje yra telefono numeris.

Norime įterpti eilutę po kiekvienos penktos duomenų eilutės, atlikite toliau nurodytus veiksmus ir kodą:

  • Atidarykite VBE puslapį ir paspauskite klavišą Alt+F11
  • Įdėkite modulį, kad parašytumėte kodą
  • Parašykite žemiau nurodytą kodą:
Įterpimas IT () x = 2 'pradžios eilutės atlikimo diapazonas ("A" & x, "F" ir x). Įterpkite x = x + 5 kilpą, o x <50 pabaigos sub 

Kodo paaiškinimas:

Pirma, mes nustatėme eilutės numerį, iš kurio norime įterpti eilutę. Tada mes nustatėme duomenų įterpimo diapazoną. Ir tada mes nustatėme skaičių, į kurį reikia įterpti eilutę po kiek eilučių. Ir tada iki kurios eilutės eilutės bus įterptos.

Norėdami paleisti kodą, paspauskite klaviatūros klavišą F5.

  • Eilės bus įterptos iki 50tūkst duomenų eilutėje

Tokiu būdu mes galime įterpti eilutę po konkretaus skaičiaus, kurį galime apibrėžti makrokomandoje.

Jei jums patiko mūsų tinklaraščiai, pasidalykite jais su draugais „Facebook“. Taip pat galite sekti mus „Twitter“ ir „Facebook“.

Mes norėtume išgirsti jūsų nuomonę, praneškite mums, kaip galime patobulinti, papildyti ar naujovinti savo darbą ir padaryti jį geresnį. Parašykite mums el

Padėsite svetainės plėtrą, dalintis puslapį su draugais

wave wave wave wave wave