UDF за извличане само на номер

Anonim

UDF за извличане само на номер от клетка, използвайки VBA в Microsoft Excel

В тази статия ще научим как да използваме VBA код за извличане на номер само от клетка с дефинирана от потребителя функция.

Въпрос): Имам нужда от макрос, за да извличам номер само от клетка, която съдържа буквено -цифрови данни.

Следва моментна снимка на данните, в които колона А съдържа буквено -цифрови данни, а очакваните числа са в колона В

За да получите само числата от колона А; трябва да следваме стъпките по -долу, за да стартираме VB редактор

  • Кликнете върху раздела Разработчик
  • От групата Кодове изберете Visual Basic

Копирайте кода по -долу в стандартния модул

Функция NumericOnly (mystr като вариант)

Dim myOutput As String, i As Integer

For i = 1 To Len (mystr)

Ако IsNumeric (Mid (mystr, i, 1)) Тогава _

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

Следващия

NumericOnly = myOutput * 1

Крайна функция

  • За да получите изхода в клетка В2, формулата е
  • = Само NumericOnly (A2)

По този начин можем да извлечем числа само от клетка, която съдържа текст и числа, използвайки VBA код.

Изтегляне - UDF за извличане само на номер от клетка с помощта на VBA - xlsm