In một trang nào đó của một sheet (3 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

Đang trực tuyến: 1 (Thành viên: 0, Khách: 1)
chothadiem

chothadiem

Thành viên hoạt động
Tham gia
29/10/18
Bài viết
188
Được thích
50
Xin chào các bạn!
Mình xin được sự giúp đỡ của các bạn :
Khi mình dùng code để in một sheet thì sẽ in tất cả các trang của sheet đó.
Mã: 
Private Sub CommandButton1_Click()
Dim sobatdau As Integer
Dim soketthuc As Integer
sobatdau = txtsobatdau.Text
soketthuc = txtsoketthuc.Text

Dim i As Integer

For i = sobatdau To soketthuc Step 1
Sheet1.Range("A14").Value = i
Sheet20.PrintOut

Next

End Sub

Private Sub UserForm_Click()

End Sub
Gió mình muốn in một hay hai hoặc in các trang bất kỳ nào đó của sheet, mong các bạn giúp mình.
Xin cảm ơn, mong sự hồi âm.
 

File đính kèm

tranchautrungduong đã viết:
bạn muốn sao nói rõ hơn xem, nhìn file k hiểu
Nhấp chuột vào đây để mở rộng...
Dạ! Em in tự động các số thứ tự ở cột A, khi in thì đều in 2 trang, giờ em muốn in chỉ trang thứ nhất hoặc trang thứ hai thôi thì chỉnh đoạn code trên thế nào ạ?
tranchautrungduong đã viết:
bạn muốn sao nói rõ hơn xem, nhìn file k hiểu
Nhấp chuột vào đây để mở rộng...
Dạ! Em chạy code thì in theo số thứ tự “ từ số .... đến số....”
Khi chạy để in mỗi số thứ tự thì đều in 2 trang, trang số 01 và số 02.
Giờ em muốn chỉ in ra trang số 01 hoặc trang số 02 mà không in cả 02 trang như khi chạy code trên. Thì phải chỉnh sửa đoạn code như thế nào ạ?
 
chothadiem đã viết:
Dạ! Em in tự động các số thứ tự ở cột A, khi in thì đều in 2 trang, giờ em muốn in chỉ trang thứ nhất hoặc trang thứ hai thôi thì chỉnh đoạn code trên thế nào ạ?

Dạ! Em chạy code thì in theo số thứ tự “ từ số .... đến số....”
Khi chạy để in mỗi số thứ tự thì đều in 2 trang, trang số 01 và số 02.
Giờ em muốn chỉ in ra trang số 01 hoặc trang số 02 mà không in cả 02 trang như khi chạy code trên. Thì phải chỉnh sửa đoạn code như thế nào ạ?
Nhấp chuột vào đây để mở rộng...
Sửa lại Code của Bạn 1 tẹo thôi
PHP: 
Private Sub CommandButton1_Click()
    Dim sobatdau As Integer
    Dim soketthuc As Integer
    Dim i As Integer
sobatdau = Val(txtsobatdau.Text)
soketthuc = Val(txtsobatdau.Text)
If Val(txtsoketthuc) <> Empty And Val(txtsoketthuc) <> Empty Then
    If Val(txtsoketthuc) >= Val(txtsoketthuc) Then
        For i = sobatdau To soketthuc Step 1
            Sheet1.Range("A14").Value = i
            Sheet20.PrintOut
        Next
    End If
Else
    MsgBox "No No ti Ca"
End If
End Sub
Nếu muốn in 1 trang thì nhập txtsobatdau, txtsobatdau bằng trang đó
1545920840964.png​
Bài đã được tự động gộp:

PacificPR đã viết:
Sửa lại Code của Bạn 1 tẹo thôi
PHP: 
Private Sub CommandButton1_Click()
    Dim sobatdau As Integer
    Dim soketthuc As Integer
    Dim i As Integer
sobatdau = Val(txtsobatdau.Text)
soketthuc = Val(txtsobatdau.Text)
If Val(txtsoketthuc) <> Empty And Val(txtsoketthuc) <> Empty Then
    If Val(txtsoketthuc) >= Val(txtsoketthuc) Then
        For i = sobatdau To soketthuc Step 1
            Sheet1.Range("A14").Value = i
            Sheet20.PrintOut
        Next
    End If
Else
    MsgBox "No No ti Ca"
End If
End Sub
Nếu muốn in 1 trang thì nhập txtsobatdau, txtsobatdau bằng trang đó
1545920840964.png​
Nhấp chuột vào đây để mở rộng...
Í Nhầm rồi. Để lát nữa mình tìm Link của Anh @befaint bạn thử xem nha
Đấy rồi. Tìm mãi mới thấy: https://www.giaiphapexcel.com/diendan/threads/add-ins-cho-phép-chọn-in-nhiều-sheets-một-lúc.112451/
Bạn tự sào nấu thêm nha
 
Lần chỉnh sửa cuối:
PacificPR đã viết:
Sửa lại Code của Bạn 1 tẹo thôi
PHP: 
Private Sub CommandButton1_Click()
    Dim sobatdau As Integer
    Dim soketthuc As Integer
    Dim i As Integer
sobatdau = Val(txtsobatdau.Text)
soketthuc = Val(txtsobatdau.Text)
If Val(txtsoketthuc) <> Empty And Val(txtsoketthuc) <> Empty Then
    If Val(txtsoketthuc) >= Val(txtsoketthuc) Then
        For i = sobatdau To soketthuc Step 1
            Sheet1.Range("A14").Value = i
            Sheet20.PrintOut
        Next
    End If
Else
    MsgBox "No No ti Ca"
End If
End Sub
Nếu muốn in 1 trang thì nhập txtsobatdau, txtsobatdau bằng trang đó
Bài đã được tự động gộp:


Í Nhầm rồi. Để lát nữa mình tìm Link của Anh @befaint bạn thử xem nha
Đấy rồi. Tìm mãi mới thấy: https://www.giaiphapexcel.com/diendan/threads/add-ins-cho-phép-chọn-in-nhiều-sheets-một-lúc.112451/
Bạn tự sào nấu thêm nha
Nhấp chuột vào đây để mở rộng...
Thanks chị xinh gái!
Bài đã được tự động gộp:

PacificPR đã viết:
Sửa lại Code của Bạn 1 tẹo thôi
PHP: 
Private Sub CommandButton1_Click()
    Dim sobatdau As Integer
    Dim soketthuc As Integer
    Dim i As Integer
sobatdau = Val(txtsobatdau.Text)
soketthuc = Val(txtsobatdau.Text)
If Val(txtsoketthuc) <> Empty And Val(txtsoketthuc) <> Empty Then
    If Val(txtsoketthuc) >= Val(txtsoketthuc) Then
        For i = sobatdau To soketthuc Step 1
            Sheet1.Range("A14").Value = i
            Sheet20.PrintOut
        Next
    End If
Else
    MsgBox "No No ti Ca"
End If
End Sub
Nếu muốn in 1 trang thì nhập txtsobatdau, txtsobatdau bằng trang đó
Bài đã được tự động gộp:


Í Nhầm rồi. Để lát nữa mình tìm Link của Anh @befaint bạn thử xem nha
Đấy rồi. Tìm mãi mới thấy: https://www.giaiphapexcel.com/diendan/threads/add-ins-cho-phép-chọn-in-nhiều-sheets-một-lúc.112451/
Bạn tự sào nấu thêm nha
Nhấp chuột vào đây để mở rộng...
Ồ nhưng mà chị ơi cái của em in theo số thứ tự nên hình như là không hợp lý khi sử dụng https://www.giaiphapexcel.com/diendan/threads/add-ins-cho-phép-chọn-in-nhiều-sheets-một-lúc.112451/
Chị sửa lại dùm em một chút nữa nhé! để code ở bài #7 chị đang sửa gần được là ok mà!
Cám ơn chị!
 
Lần chỉnh sửa cuối:
chothadiem đã viết:
Cảm ơn chị xinh gái!
Bài đã được tự động gộp:


Ồ nhưng mà chị ơi cái của em in theo số thứ tự nên hình như là không hợp lý khi sử dụng https://www.giaiphapexcel.com/diendan/threads/add-ins-cho-phép-chọn-in-nhiều-sheets-một-lúc.112451/
Chị sửa lại dùm em một chút nữa nhé! để code ở bài #7 chị đang sửa gần được là ok mà!
Cám ơn chị!
Nhấp chuột vào đây để mở rộng...
Mình làm banh ta nông cái Add In của Anh @befaint mất rồi. Bạn xem thử
 

File đính kèm

Lần chỉnh sửa cuối:
PacificPR đã viết:
Mình làm banh ta nông cái Add In của Anh @befaint mất rồi. Bạn xem thử
Nhấp chuột vào đây để mở rộng...
Mình test trên Excel 64bit bị lỗi như hình đính kèm:

1571996651560.png

Báo lỗi
---------------------------
Microsoft Visual Basic for Applications
---------------------------
Compile error:

Type mismatch
---------------------------
OK Help
---------------------------
Nhấp chuột vào đây để mở rộng...

tại dòng:
Mã: 
AddressOf MouseProc, _
 
quick87 đã viết:
Mình test trên Excel 64bit bị lỗi như hình đính kèm:
Báo lỗi
tại dòng:
Mã: 
AddressOf MouseProc, _
Nhấp chuột vào đây để mở rộng...
Khai báo
Mã: 
#If VBA7 Then
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#Else
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#End If
là sai.

Thử thay xem sao bằng
Mã: 
#If VBA7 Then
    Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As LongPtr, ByVal hmod As LongPtr, ByVal dwThreadId As Long) As LongPtr
#Else
    Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
#End If
-----------
Khai báo
#If VBA7 Then
Private Declare PtrSafe Function FindWindow Lib "user32" _
Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
#Else
Private Declare Function FindWindow Lib "user32" _
Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
#End If
Nhấp chuột vào đây để mở rộng...

cũng sai. Phải là LongPtr.
-------------
Khai báo
#If VBA7 Then
Private Declare PtrSafe Function GetWindowLong Lib "user32.dll" _
Alias "GetWindowLongA" ( _
ByVal hwnd As Long,
ByVal nIndex As Long) As Long
#Else
Private Declare Function GetWindowLong Lib "user32.dll" _
Alias "GetWindowLongA" ( _
ByVal hwnd As Long, _
ByVal nIndex As Long) As Long
#End If
Nhấp chuột vào đây để mở rộng...
cũng sai. Phải là LongPtr
-------------
Khai báo
#If VBA7 Then
Private Declare PtrSafe Function CallNextHookEx Lib "user32" ( _
ByVal hHook As Long, _
ByVal nCode As Long, _
ByVal wParam As Long, _
ByRef lParam As Any) As Long
#Else
Private Declare Function CallNextHookEx Lib "user32" ( _
ByVal hHook As Long, _
ByVal nCode As Long, _
ByVal wParam As Long, _
ByRef lParam As Any) As Long
#End If
Nhấp chuột vào đây để mở rộng...
cũng sai. Phải là LongPtr
-----------
Khai báo
#If VBA7 Then
Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" ( _
ByVal hHook As Long) As Long
#Else
Private Declare Function UnhookWindowsHookEx Lib "user32" ( _
ByVal hHook As Long) As Long
#End If
Nhấp chuột vào đây để mở rộng...
cũng sai. Phải là LongPtr
-----------
Khai báo
#If VBA7 Then
Private Declare PtrSafe Function WindowFromPoint Lib "user32" ( _
ByVal xPoint As Long, _
ByVal yPoint As Long) As Long
#Else
Private Declare Function WindowFromPoint Lib "user32" ( _
ByVal xPoint As Long, _
ByVal yPoint As Long) As Long
#End If
Nhấp chuột vào đây để mở rộng...
cũng sai. Phải là LongPtr
-------------
Thay
Mã: 
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
bằng
Mã: 
#If VBA7 Then
    Private mLngMouseHook As LongPtr
    Private mControlHwnd As LongPtr
#Else
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
#End If

Thay
Mã: 
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long

bằng

Mã: 
#If VBA7 Then
    Dim lngAppInst As LongPtr
    Dim hwndUnderCursor As LongPtr
#Else
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long
#End If

Hi vọng đã sửa hết.
 
batman1 đã viết:
Khai báo
Mã: 
#If VBA7 Then
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#Else
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#End If
là sai.

Thử thay xem sao bằng
Mã: 
#If VBA7 Then
    Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As LongPtr, ByVal hmod As LongPtr, ByVal dwThreadId As Long) As LongPtr
#Else
    Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
#End If
-----------
Khai báo


cũng sai. Phải là LongPtr.
-------------
Khai báo

cũng sai. Phải là LongPtr
-------------
Khai báo

cũng sai. Phải là LongPtr
-----------
Khai báo

cũng sai. Phải là LongPtr
-----------
Khai báo

cũng sai. Phải là LongPtr
-------------
Thay
Mã: 
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
bằng
Mã: 
#If VBA7 Then
    Private mLngMouseHook As LongPtr
    Private mControlHwnd As LongPtr
#Else
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
#End If

Thay
Mã: 
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long

bằng

Mã: 
#If VBA7 Then
    Dim lngAppInst As LongPtr
    Dim hwndUnderCursor As LongPtr
#Else
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long
#End If

Hi vọng đã sửa hết.
Nhấp chuột vào đây để mở rộng...
Cảm ơn bác @batman1 thật nhiều.
Mặc dù, đã sửa theo hướng dẫn của bác nhưng vẫn còn lỗi:

1572004852956.png

Lỗi:
---------------------------
Microsoft Visual Basic for Applications
---------------------------
Compile error:

Type mismatch
---------------------------
OK Help
---------------------------
Nhấp chuột vào đây để mở rộng...

Tại dòng:
Mã: 
Sub UnhookControlScroll()
....
        UnhookWindowsHookEx mLngMouseHook

Nhờ bác và mọi người xem giúp ạ !
 

File đính kèm

quick87 đã viết:
Mặc dù, đã sửa theo hướng dẫn của bác nhưng vẫn còn lỗi:
Tại dòng:
Mã: 
Sub UnhookControlScroll()
....
        UnhookWindowsHookEx mLngMouseHook

Nhờ bác và mọi người xem giúp ạ !
Nhấp chuột vào đây để mở rộng...
Bạn làm không đúng tôi hướng dẫn.
Theo tôi hướng dẫn phải là
Mã: 
Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" ( _
                ByVal hHook As LongPtr) As Long
Bạn có ngược lại
Mã: 
Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" ( _
                ByVal hHook As Long) As LongPtr

Trích

1.JPG

Long trong ngoặc mới là LongPtr
 
Lần chỉnh sửa cuối:
batman1 đã viết:
Bạn làm không đúng tôi hướng dẫn.
Theo tôi hướng dẫn phải là
Mã: 
Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" ( _
                ByVal hHook As LongPtr) As Long
Bạn có ngược lại
Mã: 
Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" ( _
                ByVal hHook As Long) As LongPtr

Trích

View attachment 227176

Long trong ngoặc mới là LongPtr
Nhấp chuột vào đây để mở rộng...
Dạ, cảm ơn bác @batman1 đã nhiệt tình hướng dẫn và giúp đỡ. Em có sửa lại nhưng phát sinh thêm lỗi mới như hình đính kèm ạ!

1572014723450.png

Lại nhờ bác và mọi người xem thêm giúp ạ. Em cảm ơn !
 

File đính kèm

quick87 đã viết:
Dạ, cảm ơn bác @batman1 đã nhiệt tình hướng dẫn và giúp đỡ. Em có sửa lại nhưng phát sinh thêm lỗi mới như hình đính kèm ạ!

View attachment 227183

Lại nhờ bác và mọi người xem thêm giúp ạ. Em cảm ơn !
Nhấp chuột vào đây để mở rộng...
À còn sót.

Thử thay
Mã: 
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As Long
bằng
Mã: 
#If VBA7 Then
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As LongPtr
#Else
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As Long
#End If
 
batman1 đã viết:
À còn sót.

Thử thay
Mã: 
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As Long
bằng
Mã: 
#If VBA7 Then
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As LongPtr
#Else
Private Function MouseProc( _
            ByVal nCode As Long, _
            ByVal wParam As Long, _
            ByRef lParam As MOUSEHOOKSTRUCT) As Long
#End If
Nhấp chuột vào đây để mở rộng...
Dạ, hết lỗi rồi ah. Cảm ơn bác thật nhiều !
 
batman1 đã viết:
Khai báo
Mã: 
#If VBA7 Then
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#Else
Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" _
                Alias "SetWindowsHookExA" ( _
                ByVal idHook As Long, _
                ByVal lpfn As Long, _
                ByVal hmod As Long, _
                ByVal dwThreadId As Long) As Long
#End If
là sai.

Thử thay xem sao bằng
Mã: 
#If VBA7 Then
    Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As LongPtr, ByVal hmod As LongPtr, ByVal dwThreadId As Long) As LongPtr
#Else
    Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
                (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
#End If
-----------
Khai báo


cũng sai. Phải là LongPtr.
-------------
Khai báo

cũng sai. Phải là LongPtr
-------------
Khai báo

cũng sai. Phải là LongPtr
-----------
Khai báo

cũng sai. Phải là LongPtr
-----------
Khai báo

cũng sai. Phải là LongPtr
-------------
Thay
Mã: 
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
bằng
Mã: 
#If VBA7 Then
    Private mLngMouseHook As LongPtr
    Private mControlHwnd As LongPtr
#Else
    Private mLngMouseHook As Long
    Private mControlHwnd As Long
#End If

Thay
Mã: 
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long

bằng

Mã: 
#If VBA7 Then
    Dim lngAppInst As LongPtr
    Dim hwndUnderCursor As LongPtr
#Else
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long
#End If

Hi vọng đã sửa hết.
Nhấp chuột vào đây để mở rộng...
Bác viết quá chi tiết và cặn cẽ, rất dễ hiểu.
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

Bài viết mới nhất

00029591
Cần hỗ trợ công thức tổng hợp dữ liệu không cần cột phụ Vlookup
Trả lời
3
Đọc
118
tle2003
T
D
  • Đã giải quyết
Quản lý email outlook qua VBA cần giúp đỡ (1 người xem)
2
Trả lời
22
Đọc
434
nguyendang95
N
G
Xin Code xóa Module.
Trả lời
7
Đọc
208
VetMini
V
S
Mở 2 cửa sổ riêng biệt
2
Trả lời
30
Đọc
23K
sakuraluu
S
F
Nhập dấu . (chấm) ở bàn phím phụ không tự chuyển thành dấu , (phẩy)
Trả lời
16
Đọc
57K
tubaodn21
tubaodn21
PhanTuHuong
Sách Lập trình VBA trong AutoCAD đã có mặt
    • Thích
    • Yêu thích
2
Trả lời
21
Đọc
1K
PhanTuHuong
PhanTuHuong
L
Lỗi font khi convert từ pdf
Trả lời
3
Đọc
134
lamvu0677
L
N
Khắc phục lỗi "The picture is too large and will be truncated"
Trả lời
9
Đọc
5K
SonBDND
S
GPE-Trợ Lý
[GPE] TALKSHOW: PHÂN TÍCH BÁO CÁO ĐỘ NHẠY SỬ DỤNG EXCEL SOLVER (1 người xem)
    • Thích
Trả lời
0
Đọc
1K
GPE-Trợ Lý
GPE-Trợ Lý
K
  • Question Question
nhờ ace giúp đỡ tự động filter và In hàng loạt từng mục trong piviot table
Trả lời
1
Đọc
110
khkkh
K
K
Xin dax tính tỷ trọng doanh thu
Trả lời
18
Đọc
783
SteveNguyen1991
S
F
  • Question Question
Tự động Merge Mail bằng VBA
Trả lời
6
Đọc
210
Hoàng Tuấn 868
H
N
Một ví dụ về XLL add-in: Tương tác với Google Gemini dưới dạng công thức bảng tính
    • Thích
Trả lời
0
Đọc
134
nguyendang95
N
H
Nhờ anh/chị giúp đỡ em viết công thức trừ dữ liệu theo FiFo (1 người xem)
Trả lời
1
Đọc
122
HieuCD
H
BNTT
LockXLS - Chương trình bảo vệ an toàn cho các file bảng tính Excel (1 người xem)
    • Thích
4 5 6
Trả lời
118
Đọc
73K
YêuCN
Y
vsitcnh
Hỗ trợ công thức tính điểm dựa theo điều kiện.
Trả lời
14
Đọc
215
thuytrangbp28
T
micam111
  • Question Question
Cách chạy nhiều đồng hồ đếm giờ trong VBA
Trả lời
4
Đọc
705
thuytrangbp28
T
B
Xin giải pháp chống sửa, xóa dữ liệu đã nhập vào từ ngày hôm trước.
    • Thích
2
Trả lời
26
Đọc
7K
Tuấn Bụng Bự
Tuấn Bụng Bự
Emyeuexcel
  • Question Question
In tất cả các file trong cùng 1 thư mục
Trả lời
3
Đọc
220
Hoàng Tuấn 868
H
1
Hỏi về đánh dấu hàng ngang hàng dọc bằng màu khi kích chuột vào 1 ô
Trả lời
7
Đọc
215
Gà Công Nghệ
Gà Công Nghệ
Xem thêm…

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Đếm ngược thời gian

000
Ngày
00
Giờ
00
phút
00
giây
TALK SHOW: CÙNG NHẢY LAM BA ĐA VỚI HÀM LAMBDA (λ) EXCEL 365
Back
Top Bottom