có thể cho e xin cấu trúc câu lệnh tìm dòng đầucột đầu cột cuối được

thầy ơi! thầy có thể cho e xin cấu trúc câu lệnh tìm dòng đầu,cột đầu ,cột cuối được không ạ

1 câu trả lời

146 lượt xem

vỗ tay

Nguyễn Hoài Tiến 10:12 - Dec 06, 2021

Chào bạn thường là dòng đầu trong dữ liệu người dùng đã biết nên không cần tìm còn cột cột cuối bạn làm như sau

Option Explicit
Function Timdongcuoi(ws As Worksheet, cot As String) As Long
   Timdongcuoi = ws.Range(cot & ws.rows.Count).End(xlUp).Row
End Function
Function Timcotcuoi(ws As Worksheet, dong As Integer) As Long
   Timcotcuoi = ws.Cells(dong, ws.Columns.Count).End(xlToLeft).Column
End Function
Sub DongCuoiDL()
    Dim dc As Long
    dc = Timdongcuoi(Sheet1, "A")
    MsgBox dc
End Sub
Sub TimCotcuoiDL()
    Dim dc As Long
    dc = Timcotcuoi(Sheet1, 1)
    MsgBox dc
End Sub

vỗ tay

Câu hỏi liên quan

Xem tất cả

Gói Hội viên Gitiho: Trọn bộ khoá học theo Khung năng lực

Gói Hội viên G-Skills: 03 kỹ năng bổ trợ thiết yếu

có thể cho e xin cấu trúc câu lệnh tìm dòng đầucột đầu cột cuối được

Câu hỏi liên quan