ACE Pro vba cho em hỏi Phương pháp Cách lấy Tên file từ Path (3 người xem)

[cuongtokyo0240]

Hiện tại em đang viết chương trình lấy tên file từ path trên VBA áp dụng cho access
khi bấm vào nút đó sẽ lấy ra tên File ra TextBox đồng thời lấy luôn cả đường dẫn Path
Vậy Cho em hỏi Bây giờ em muốn lấy tên file từ Path thì làm thế nào vậy ace chỉ giúp em với

Dưới đây là chương Trinh lấy Path ra textbox em
Private Sub button_Click()
With Application.FileDialog(msoFileDialogOpen)
.Title = "ファイルの選択"
.Filters.Clear
.Filters.Add "すべてのファイル", "*.*"
.AllowMultiSelect = False
.InitialFileName = CurrentProject.Path
.InitialFileName = CurrentProject.Name
If .Show = -1 Then
Me!FILE_PATH = .SelectedItems(1)
Me!FILE_NAME = ?
End If
End With
End Sub

 

[be_09]

Hiện tại em đang viết chương trình lấy tên file từ path trên VBA áp dụng cho access
khi bấm vào nút đó sẽ lấy ra tên File ra TextBox đồng thời lấy luôn cả đường dẫn Path
Vậy Cho em hỏi Bây giờ em muốn lấy tên file từ Path thì làm thế nào vậy ace chỉ giúp em với

Dưới đây là chương Trinh lấy Path ra textbox em
Private Sub button_Click()
With Application.FileDialog(msoFileDialogOpen)
.Title = "ファイルの選択"
.Filters.Clear
.Filters.Add "すべてのファイル", "*.*"
.AllowMultiSelect = False
.InitialFileName = CurrentProject.Path
.InitialFileName = CurrentProject.Name
If .Show = -1 Then
Me!FILE_PATH = .SelectedItems(1)
Me!FILE_NAME = ?
End If
End With
End Sub

Bạn vi phạm nội quy tại khoản 2, mục II. Hình thức của bài viết (do đăng 2 bài có cùng nội dung), bài kia ở Link sau:
https://www.giaiphapexcel.com/diend...phương-pháp-cách-lấy-tên-file-từ-path.135636/

 

[cuongtokyo0240]

Bạn vi phạm nội quy tại khoản 2, mục II. Hình thức của bài viết (do đăng 2 bài có cùng nội dung), bài kia ở Link sau:
https://www.giaiphapexcel.com/diendan/threads/ace-pro-vba-cho-em-hỏi-phương-pháp-cách-lấy-tên-file-từ-path.135636/

vâng , chắc em đăng nhầm 2 bài ạ . A de em xoá 1 bài