UDF purkaa vain numero

Anonim

UDF vain numeron poimimiseksi solusta VBA: n avulla Microsoft Excelissä

Tässä artikkelissa opimme käyttämään VBA -koodia numeron poimimiseksi vain solusta, jolla on käyttäjän määrittämä toiminto.

Kysymys): Tarvitsen makron, jotta voin noutaa numeron vain solusta, joka sisältää aakkosnumeerisia tietoja.

Seuraavassa on tilannekuva tiedoista, joissa sarake A sisältää aakkosnumeerisia tietoja ja odotetut luvut ovat sarakkeessa B

Jotta sarakkeesta A saadaan vain numerot; meidän on noudatettava alla olevia vaiheita VB -editorin käynnistämiseksi

  • Napsauta Kehittäjä -välilehteä
  • Valitse koodiryhmästä Visual Basic

Kopioi alla oleva koodi Vakiomoduulissa

Toiminto NumericOnly (mystr as Variant)

Dim myOutput merkkijonona, i kokonaislukuna

I = 1 Len (mystr)

Jos IsNumeric (Mid (mystr, i, 1)) Sitten _

myOutput = myOutput & Mid (mystr, i, 1)

Seuraava

NumericOnly = myOutput * 1

Lopeta toiminto

  • Tuloksen saamiseksi solusta B2 kaava on
  • = Vain numero (A2)

Tällä tavalla voimme hakea numeroita vain solusta, joka sisältää tekstiä ja numeroita, käyttämällä VBA -koodia.

Lataa - UDF vain numeron poimimiseksi solusta VBA: n avulla - xlsm