Bạn xem file đúng ý bạn không nhé. Lần sau bạn hỏi nên đưa file lên nhéNhờ các bạn giúp giùm đoạn code hiện giá trị ô A1 trong textbox trên form, và khi sửa giá trị trong textbox đó thì sẽ gán được vào ô A1
Thanks
TD
Bạn xem file đúng ý bạn không nhé. Lần sau bạn hỏi nên đưa file lên nhé
Cám ơn bạn, mình làm đc rùi, bây giờ muốn hiển thị số 1000 là 1.000 (có dấu chấm) và % (ô hiển thị là 10%, textbox hiển thị là 0.1)
Cám ơn lần nữa nhé
Brds
TD
Cám ơn bạn
Định dạng trong excel thì biết, mình muốn là hiển thị số liệu trong text box giống y chang như trong cell (định dạng cell thế nào thì sẽ hiển thị trong textbox như vậy).
Brds
TD
Cho mình hỏi thêm:
1/ Lưu file có macro và table trong excel 2007 dưới định dạng của excel 2003 (*.xls) luôn xuất hiện thông báo compatibility, viết code như thế nào để bỏ qua thông báo này khi lưu.
2/ Trong excel 2007: khi mở file chỉ cho xuất hiện bảng tính, ẩn hết toàn bộ menu, scrollbar, formular bar...(người dùng ko mở được bằng trong option)
3/ Có thể vô hiệu hóa các lệnh của excel trừ một số lệnh cơ bản như cut, copy, paste, insert, delete trong khi công thức/VBA/Add in vẫn chạy ?
Thanks
Brds
TD
Mấy hôm rồi bận quá, chưa xem được, giờ mình test file của bạn: nút nhập lên form: khi click vào, textbox ko lên giá trị của ô mà là =0, bạn xem lại giùm mình
Mình muốn có button để đóng file hiện tại rồi mở file khác:
Private Sub BlockB_Click()
ThisWorkbook.Close
CreateObject("Shell.Application").Open "D:\RubyLand\Quan ly Nuoc\Hoa don nuoc block B-Ver1.0.xls"
End Sub
Nhưng hình như đóng file rồi thì không thể thực hiện được câu lệnh kế tiếp ??? giúp mình đoạn code này luôn nhé
Thanks
Giả sử đang ở file A, giờ mở file B lên, thì dùng lệnh nào để đóng file A (vì lúc đó thisworkbook.close sẽ đóng file B)
Xem lại giùm mình file test của bạn nhé:
nút nhập lên form: khi click vào, textbox ko lên giá trị của ô mà là =0
Thanks
Nghĩ sao vậy ta? File ở bài số 5 tôi kiểm tra nhiều lần, chẳng vấn đề gì, kể cả trên Win7 hay WinXP!
Mình xài WinXP, Excel 2007:
* nhập số 20 vào textbox, click "nhập xuống sheet", chọn OK, giá trị ô thay đổi thành 20%, text có dấu nháy, ko có giá trị trong textbox
* Click "nhập lên form", xuất hiện số 0 và dấu nháy trong textbox.
Ko biết quay lại thao tác này như thế nào để up lên cho bạn thấy.
Brds
Bạn tải file của tôi chưa? Còn file bạn gửi ban đầu, định dạng là Text đấy nhé!
Giả sử đang ở file A, giờ mở file B lên, thì dùng lệnh nào để đóng file A (vì lúc đó thisworkbook.close sẽ đóng file B)
Thanks
Bạn tải file về giải nén và mở FileNguon và bấm nút thử xem sao!
Cám ơn rất nhiều, bạn giải thích giùm mình ý nghĩa của cái này nhé:
Function FileExist(ByVal filePath As String) As Boolean
FileExist = CreateObject("Scripting.FileSystemObject").FileExists(filePath)
End Function
Brds
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2