Jak vytvořit funkci definovanou uživatelem prostřednictvím VBA

Anonim

V tomto článku se naučíme, jak vytvořit uživatelsky definovanou funkci pro extrahování textu pouze z řetězce prostřednictvím VBA.

Uživatelem definovaná funkce: Microsoft Excel vám umožňuje vytvořit si vlastní funkci podle požadavku, říkáme tomu funkce definované uživatelem. A můžeme použít funkce definované uživatelem, jako jiné funkce fungující v aplikaci Excel.

Pojďme to pochopit na velmi jednoduchém příkladu:
Máme řadu řetězců, ze kterých chceme načíst pouze textovou hodnotu.

Chcete -li načíst pouze text, vytvoříme kód VBA. Prostřednictvím tohoto kódu můžeme získat text z libovolného místa buňky. Podívejte se na níže uvedený postup a kód, abyste pochopili, jak snadné je to:

  • Otevřete stránku VBA stisknutím klávesy Alt+F11
  • Vložte modul
  • Napište níže uvedený kód:
 Funkce TextVba (záznam) Pro I = 1 To Len (záznam) ThisChar = Střední (záznam, I, 1) Vyberte případ Asc (ThisChar) Případ 48, 49, 50, 51, 52, 53, 54, 55, 56, 57 , 58 Case Else TextVba = TextVba & ThisChar Konec Vyberte Další i Ukončit funkci 

Vysvětlení kódu: Nejprve jsme dali název funkce (TextVba). A pak jsme zadali délku řetězce, pak jsme použili funkci Asc (toto je kódová funkce). Potom jsme definovali případ. Nyní jsme definovali podmínku TextVba a poté Zavřít funkci Vybrat.

  • Nyní použijeme funkci v listu Excelu
  • Přejít na list aplikace Excel
  • Do buňky B2 zadejte vzorec
  • = TextVba (A2), stiskněte Enter
  • Funkce vrátí pouze text

Tímto způsobem můžeme vytvářet funkce definované uživatelem a šetřit náš čas pravidelnými aktivitami.

Pokud se vám naše blogy líbily, sdílejte je se svými přáteli na Facebooku. A také nás můžete sledovat na Twitteru a Facebooku.

Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit, doplnit nebo inovovat naši práci a zlepšit ji pro vás. Napište nám na e -mail