UDF để chỉ trích xuất số từ một ô bằng VBA trong Microsoft Excel

Trong bài viết này, chúng ta sẽ học cách sử dụng mã VBA để chỉ trích xuất số từ một ô có chức năng do người dùng xác định.

Câu hỏi): Tôi cần một macro để chỉ truy xuất số từ một ô chứa dữ liệu số alpha.

Sau đây là ảnh chụp nhanh dữ liệu trong đó cột A chứa dữ liệu chữ và số & các số dự kiến ​​nằm trong cột B

img1

Để chỉ lấy các số từ cột A; chúng ta cần làm theo các bước sau để khởi chạy trình soạn thảo VB Nhấp vào tab Nhà phát triển Từ nhóm Mã, chọn Visual Basic

img2

Sao chép đoạn mã dưới đây trong mô-đun Chuẩn

Hàm NumericOnly (mystr As Variant)

Dim myOutput As String, i As Integer

Đối với i = 1 To Len (mystr)

Nếu IsNumeric (Mid (mystr, i, 1)) Thì _

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

Tiếp theo

NumericOnly = myOutput * 1

Chức năng kết thúc

===

img3

  • Để lấy đầu ra trong ô B2, công thức là

* = NumericOnly (A2)

===

img4

===

Bằng cách này, chúng ta chỉ có thể lấy số từ một ô có chứa văn bản và số, sử dụng mã VBA.

image 4