Add in SwitchSheet: Quay lại các sheet đã xem trước đó bằng phím tắt (1 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)
huuthang_bd

huuthang_bd

Chuyên gia GPE
Tham gia
10/9/08
Bài viết
8,933
Được thích
11,353
Donate (Momo)
Donate
Giới tính
Nam
Nghề nghiệp
Thợ đụng
Tôi nghĩ đa số những người dùng máy tính thường xuyên sử dụng phím tắt Alt + Tab để mở lại cửa sổ gần nhất vì nó rất tiện lợi. Tuy nhiên, trên Excel khi ta muốn xem lại sheet vừa xem thì phải tìm và chọn. Đối với những file có nhiều sheet thì rất mất thời gian. Vì vậy, tôi tạo ra Addin này.

Công dụng duy nhất: Mở lại các Sheet đã mở gần nhất bằng phím tắt Alt + q (tôi chọn phím q vì phím q gần với phím tab, các bạn có thể sửa lại trong code)

Hy vọng Addin này sẽ giúp tiết kiệm thời gian cho những người thường xuyên làm việc trên Excel.
 

File đính kèm

Lần chỉnh sửa cuối:
-- cám ơn ban nhiều ..................................
 
Mình tìm cái này mãi, thank bạn rất nhiều
 
Cài Free Tab cho tiện
 
cái này dùng làm sao thế mọi người :( mình excel mới học nên chả biết gì :( mong mọi người chỉ giáo
 
À.
Cái này chỉ là di chuyển giữa các sheet thôi.
Chứ ko phải là các tab.
 
kbw1 đã viết:
Đúng như bạn nói.
Nhiều khi mình dùng Alt+tab nó ko về ngay file excel vừa mở.
Thôi, mình nghĩ dùng alt+tab cũng được. Cho đơn giản.
Nhấp chuột vào đây để mở rộng...
Tôi thấy phím kết hợp Alt+ Tab có thể dùng chuyển đổi giữa các ứng dụng bất kỳ được mở trên Win. Nguyên tắc nhấn 1 lần Alt+Tab là chuyển đổi giữa 2 file liền kề sát nhau. Còn nhấn Alt+nhiều lần Tab thì chuyển lần lượt tiếp các ứng dụng đang mở.
 
Nó chỉ cho chuyển qua chuyển lại giữa 2 tab thôi hả bạn!
 
Cập nhật phiên bản mới

Gửi tặng các bạn phiên bản mới của Add-in này.

Ở phiên bản mới này bạn có thể quay lại không chỉ 1 mà là tất cả các sheet bạn đã xem trước đó (tính từ lúc mở file)
Sử dụng hoàn toàn giống với việc chuyển cửa sổ bằng tổ hợp phí Alt + Tab của Windows nhưng ta sẽ sử dụng tổ hợp phím Alt + Q

Mô tả và cách sử dụng:

Thứ tự ưu tiên các sheet được sắp xếp theo thời điểm cuối cùng bạn xem sheet đó, gần với thời điểm hiện tại được ưu tiên hơn.
Nhấn Alt + Q để quay lại sheet vừa xem.
Giữ Alt và nhấn Q nhiều lần để quay lại sheet đã xem trước đó.
Giữ thêm Shift nếu muốn di chuyển ngược.

Nói chung cách dùng hoàn toàn giống với tổ hợp phím Alt + Tab

Pass: Như cũ


P/S: Nếu có thể, nhờ BQT sửa lại tiêu đề cho phù hợp với bản cập nhật 'Add-in SwitchSheet: Quay lại các sheet đã xem trước đó' chẳng hạn.
 

File đính kèm

PAS là gì thế bác. 2013 dùng bình thường hết.
 
phiên bản mới rất hay, dùng tốt trên office 2013, em cảm ơn bác nhiều!
 
hpkhuong đã viết:
Thế mà tôi add trên 2013 của tôi lại không sử dụng được.hixhix........
Nhấp chuột vào đây để mở rộng...

Có khi dùng chưa đúng cách cũng nên. Nếu vừa mở file lên bạn bấm Ctrl + q ngay thì sẽ không có gì xảy ra cả vì lúc đó chưa có sheet "lịch sử" nào cả
 
tác giả vui lòng cập nhật lại
báo lỗi khi chạy sub ExcelApp_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
chèn thêm 1 dòng
Mã: 
Dim i As Long
vào sub trên để tránh báo lỗi khi người dùng tắt 1 file excel . cảm ơn
 
đã thử 3 pass sau đây đều không được
2-July-06
Như cũ
Như cũ
tác giả có thể vui lòng cho biết pass thật của add in này ?
 
hpkhuong đã viết:
Hix. Không phải không đúng cách đâu bác ạ! Vì tôi cố tình mở 2 hoặc nhiều file cùng lúc để test mà.........có lẻ do office 2013 64bit rồi.........64bit rắc rối quá!
Nhấp chuột vào đây để mở rộng...
Bạn test như vậy cũng không đúng. Công dụng của Add-in này là quay lại các sheet đã xem trước đó. Vì vậy muốn test bạn phải chọn qua sheet khác (để có 'sheet đã xem trước đó') rồi mới test.
doveandrose đã viết:
tác giả vui lòng cập nhật lại
báo lỗi khi chạy sub ExcelApp_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
chèn thêm 1 dòng
Mã: 
Dim i As Long
vào sub trên để tránh báo lỗi khi người dùng tắt 1 file excel . cảm ơn
Nhấp chuột vào đây để mở rộng...
Đúng là khai báo thiếu biến i nhưng tôi không khai báo Option Explicit nên cũng không bị lỗi gì đâu
doveandrose đã viết:
đã thử 3 pass sau đây đều không được
2-July-06
Như cũ
Như cũ
tác giả có thể vui lòng cho biết pass thật của add in này ?
Nhấp chuột vào đây để mở rộng...
Copy pass tôi ghi ở bài #16 dán vào là được mà.
 
huuthang_bd đã viết:
Xem lại bài #29 nhé.
Nhấp chuột vào đây để mở rộng...
đã có 2 người không sử dụng được pass mà bạn nói thì bạn cũng nên xem lại
bạn có thể vui lòng ghi theo mẫu sau được không ?
pass : "xx" (password nằm trọn giữa 2 dấu ngoặc kép )
mục đích khi bạn viết ra add in là để cho nhiều người xài . mà bạn nói câu là "tôi không khai báo Option Explicit nên cũng không bị lỗi gì đâu" bạn cũng nghe được ?
bản thân tôi không xài option explicit vẫn báo lỗi
sau đây là những chỗ bị báo lỗi khi sử dụng trên office 2013 64 bit
1/tại sub Sub ExcelApp_WorkbookBeforeClose đã nói ở trên . không có option explicit vẫn lỗi và chỉ sửa được khi khai báo
Mã: 
dim i as long
2/tại function Function Get_Sheets_Ordinal ở dòng
Mã: 
Sheets_Ordinal = Mid(Sheets_Ordinal, 2, Len(Sheets_Ordinal) - 2)
sửa => bỏ luôn dòng này
và sau khi làm theo 2 điều trên add in đã hoạt động tốt trên máy tôi . thiết nghĩ rằng 2 điều đã nêu ở trên cũng sẽ không ảnh hưởng gì tới các máy hệ 32 bit
chúng ta vì mục đích chung để add in cho nhiều người xài được chứ đâu phải đi bắt lỗi nhau

 
doveandrose đã viết:
đã có 2 người không sử dụng được pass mà bạn nói thì bạn cũng nên xem lại
bạn có thể vui lòng ghi theo mẫu sau được không ?
pass : "xx" (password nằm trọn giữa 2 dấu ngoặc kép )
mục đích khi bạn viết ra add in là để cho nhiều người xài . mà bạn nói câu là "tôi không khai báo Option Explicit nên cũng không bị lỗi gì đâu" bạn cũng nghe được ?
bản thân tôi không xài option explicit vẫn báo lỗi
sau đây là những chỗ bị báo lỗi khi sử dụng trên office 2013 64 bit
1/tại sub Sub ExcelApp_WorkbookBeforeClose đã nói ở trên . không có option explicit vẫn lỗi và chỉ sửa được khi khai báo
Mã: 
dim i as long
2/tại function Function Get_Sheets_Ordinal ở dòng
Mã: 
Sheets_Ordinal = Mid(Sheets_Ordinal, 2, Len(Sheets_Ordinal) - 2)
sửa => bỏ luôn dòng này
và sau khi làm theo 2 điều trên add in đã hoạt động tốt trên máy tôi . thiết nghĩ rằng 2 điều đã nêu ở trên cũng sẽ không ảnh hưởng gì tới các máy hệ 32 bit
chúng ta vì mục đích chung để add in cho nhiều người xài được chứ đâu phải đi bắt lỗi nhau
Nhấp chuột vào đây để mở rộng...

Xin phép tác giả em viết Pass cụ thể của add-in để mọi người tiện sử dụng nhé.
Pass của add-in này là:
Mã: 
2-July-06
 
Chủ thớt có thể hướng dẫn em đặt phím tắt cho macro bằng phím ALT + q như thế nào không ạ.
Em đặt phím tắt cho macro mà nó chỉ đặt được Ctlr thôi ạ.
Thanks
 
doveandrose đã viết:
đã có 2 người không sử dụng được pass mà bạn nói thì bạn cũng nên xem lại
bạn có thể vui lòng ghi theo mẫu sau được không ?
pass : "xx" (password nằm trọn giữa 2 dấu ngoặc kép )
mục đích khi bạn viết ra add in là để cho nhiều người xài . mà bạn nói câu là "tôi không khai báo Option Explicit nên cũng không bị lỗi gì đâu" bạn cũng nghe được ?
bản thân tôi không xài option explicit vẫn báo lỗi
sau đây là những chỗ bị báo lỗi khi sử dụng trên office 2013 64 bit
1/tại sub Sub ExcelApp_WorkbookBeforeClose đã nói ở trên . không có option explicit vẫn lỗi và chỉ sửa được khi khai báo
Mã: 
dim i as long
2/tại function Function Get_Sheets_Ordinal ở dòng
Mã: 
Sheets_Ordinal = Mid(Sheets_Ordinal, 2, Len(Sheets_Ordinal) - 2)
sửa => bỏ luôn dòng này
và sau khi làm theo 2 điều trên add in đã hoạt động tốt trên máy tôi . thiết nghĩ rằng 2 điều đã nêu ở trên cũng sẽ không ảnh hưởng gì tới các máy hệ 32 bit
chúng ta vì mục đích chung để add in cho nhiều người xài được chứ đâu phải đi bắt lỗi nhau
Nhấp chuột vào đây để mở rộng...
1. Máy tôi win 32 bit nên không biết khai báo thiếu biến sẽ lỗi trên win 64 bit.
2. Tôi viết dòng đó là có lý do, không thừa đâu. Bản tôi úp lên tôi sẽ không sửa. Bạn thích sửa thì bạn cứ sửa nhé.
Split("/Sheet1/", "/") khác với Split("Sheet1", "/") nhé. Kết quả không khác nhau do tôi đã có lệnh kiểm tra sự tồn tại của sheet bên dưới nhưng không lý do gì bắt máy tính làm việc nhiều hơn khi kết quả như nhau.
3. Về vấn đề password, tôi chẳng hiểu các bạn làm gì mà bảo password sai. Tôi sẽ úp bản không khóa lên nhưng các bạn cứ xem clip này xem tôi có nói sai password không.
[video=youtube;39r6pGj3Z8I]https://www.youtube.com/watch?v=39r6pGj3Z8I&feature=youtu.be[/video]
 

File đính kèm

Lần chỉnh sửa cuối:
huuthang_bd đã viết:
1. Máy tôi win 32 bit nên không biết khai báo thiếu biến sẽ lỗi trên win 64 bit.
2. Tôi viết dòng đó là có lý do, không thừa đâu. Bản tôi úp lên tôi sẽ không sửa. Bạn thích sửa thì bạn cứ sửa nhé.
Split("/Sheet1/", "/") khác với Split("Sheet1", "/") nhé. Kết quả không khác nhau do tôi đã có lệnh kiểm tra sự tồn tại của sheet bên dưới nhưng không lý do gì bắt máy tính làm việc nhiều hơn khi kết quả như nhau.
3. Về vấn đề password, tôi chẳng hiểu các bạn làm gì mà bảo password sai. Tôi sẽ úp bản không khóa lên nhưng các bạn cứ xem clip này xem tôi có nói sai password không.
Nhấp chuột vào đây để mở rộng...

số bài viết của tôi còn chưa được bằng cái số lẻ của bạn . tôi thấy bạn là người có uy tín ở cái diễn đàn này nên mới nói ra những câu như bài #32 để hi vọng cộng đồng có thể có 1 sản phẩm hoàn thiện từ bạn . nhưng có lẽ tôi đã sai
bạn hành xử cố chấp và quan liêu y như cái bọn .....(ai cũng biết)
nếu thêm lệnh Mid thì chúc mừng bạn đã giúp chương trình xử lý nhanh hơn so với lúc không có lệnh Mid khoảng 1/1000 000 000 giây
và sẽ bị lỗi trên máy 64 bit . đó là mục tiêu của bạn ?
chuyện đi sửa thì tất nhiên tôi cần là tôi sửa để được việc . vậy còn các bạn khác không biết chỗ nào mà sửa thì sao ?
tôi nhớ có lần có người kiến nghị với Admin của diễn đàn này là có 1 số chỗ dịch sang tiếng Việt trên giao diện Web chưa hợp lý . Admin vẫn vui vẻ đi sửa mặc dù nếu không sửa cũng chả chết ai . đó mới là hành xử của những người có uy tín để người khác nể phục . còn bạn thì .....
 
doveandrose đã viết:
số bài viết của tôi còn chưa được bằng cái số lẻ của bạn . tôi thấy bạn là người có uy tín ở cái diễn đàn này nên mới nói ra những câu như bài #32 để hi vọng cộng đồng có thể có 1 sản phẩm hoàn thiện từ bạn . nhưng có lẽ tôi đã sai
bạn hành xử cố chấp và quan liêu y như cái bọn .....(ai cũng biết)
nếu thêm lệnh Mid thì chúc mừng bạn đã giúp chương trình xử lý nhanh hơn so với lúc không có lệnh Mid khoảng 1/1000 000 000 giây
và sẽ bị lỗi trên máy 64 bit . đó là mục tiêu của bạn ?
chuyện đi sửa thì tất nhiên tôi cần là tôi sửa để được việc . vậy còn các bạn khác không biết chỗ nào mà sửa thì sao ?
tôi nhớ có lần có người kiến nghị với Admin của diễn đàn này là có 1 số chỗ dịch sang tiếng Việt trên giao diện Web chưa hợp lý . Admin vẫn vui vẻ đi sửa mặc dù nếu không sửa cũng chả chết ai . đó mới là hành xử của những người có uy tín để người khác nể phục . còn bạn thì .....
Nhấp chuột vào đây để mở rộng...
Tôi có quan điểm sống riêng của tôi. Tôi chỉ tin những gì tự tay tôi kiểm tra được. Bạn muốn đánh giá tôi sao cũng được. Trên cái thế giới ảo này tôi không quan tâm lắm việc người khác đánh giá tôi như thế nào.
Nếu bạn nói office 64 bít bị lỗi như vậy thì tôi sẽ sửa lại như sau:
PHP: 
    If Sheets_Ordinal <> "/" Then
        Sheets_Ordinal = Mid(Sheets_Ordinal, 2, Len(Sheets_Ordinal) - 2)
        Array_Ordinal = Split(Sheets_Ordinal, "/")
        For i = LBound(Array_Ordinal, 1) To UBound(Array_Ordinal, 1)
thành
PHP: 
    If Sheets_Ordinal <> "/" Then

        Array_Ordinal = Split(Sheets_Ordinal, "/")
        For i = LBound(Array_Ordinal, 1) + 1 To UBound(Array_Ordinal, 1) - 1
 

File đính kèm

huuthang_bd đã viết:
Tôi có quan điểm sống riêng của tôi. Tôi chỉ tin những gì tự tay tôi kiểm tra được. Bạn muốn đánh giá tôi sao cũng được. Trên cái thế giới ảo này tôi không quan tâm lắm việc người khác đánh giá tôi như thế nào.
Nếu bạn nói office 64 bít bị lỗi như vậy thì tôi sẽ sửa lại như sau:
PHP: 
    If Sheets_Ordinal <> "/" Then
        Sheets_Ordinal = Mid(Sheets_Ordinal, 2, Len(Sheets_Ordinal) - 2)
        Array_Ordinal = Split(Sheets_Ordinal, "/")
        For i = LBound(Array_Ordinal, 1) To UBound(Array_Ordinal, 1)
thành
PHP: 
    If Sheets_Ordinal <> "/" Then

        Array_Ordinal = Split(Sheets_Ordinal, "/")
        For i = LBound(Array_Ordinal, 1) + 1 To UBound(Array_Ordinal, 1) - 1
Nhấp chuột vào đây để mở rộng...
Mình hơi gà tí, bạn có thể cho mình pass cụ thể của phiên bản addin này được không mình đã dùng pass 2-July-06 và Password view code: =TEXT(2-July-06,"d-mmmm-yy") nhưng vẫn khong được . chân thành cảm ơn bạn
 
Em cảm ơn chương trình. Anh có thể phát triển cho em xin thêm chức năng, khi thao tác đánh dấu "=" để thực hiện công việc liên kết thì chức năng Alt+q không hiệu lực. Cho em xin chuyển phím Alt+q sang Ctrl+q được không (trong cad dùng Ctrl+tab hay dùng nên quen tay) ? Em cảm ơn.
 
quyettam đã viết:
Em cảm ơn chương trình. Anh có thể phát triển cho em xin thêm chức năng, khi thao tác đánh dấu "=" để thực hiện công việc liên kết thì chức năng Alt+q không hiệu lực. Cho em xin chuyển phím Alt+q sang Ctrl+q được không (trong cad dùng Ctrl+tab hay dùng nên quen tay) ? Em cảm ơn.
Nhấp chuột vào đây để mở rộng...
Để đổi lại thành phím tắt Ctrl + q thì bạn sửa Sub Auto_Open trong Module M01 thành như sau:
PHP: 
Private Sub Auto_Open()
Application.OnKey "^{q}", "SwitchSheet"
Set App = New clsExcelApp
App.Wrap Application
End Sub
Khi đang nhập liệu (bạn gõ dấu "=") thì không gọi được macro nha bạn.
 
huuthang_bd đã viết:
1. Máy tôi win 32 bit nên không biết khai báo thiếu biến sẽ lỗi trên win 64 bit.
2. Tôi viết dòng đó là có lý do, không thừa đâu. Bản tôi úp lên tôi sẽ không sửa. Bạn thích sửa thì bạn cứ sửa nhé.
Split("/Sheet1/", "/") khác với Split("Sheet1", "/") nhé. Kết quả không khác nhau do tôi đã có lệnh kiểm tra sự tồn tại của sheet bên dưới nhưng không lý do gì bắt máy tính làm việc nhiều hơn khi kết quả như nhau.
3. Về vấn đề password, tôi chẳng hiểu các bạn làm gì mà bảo password sai. Tôi sẽ úp bản không khóa lên nhưng các bạn cứ xem clip này xem tôi có nói sai password không.
[video=youtube;39r6pGj3Z8I]https://www.youtube.com/watch?v=39r6pGj3Z8I&amp;feature=youtu.be[/video]
Nhấp chuột vào đây để mở rộng...
Mình cài addin của bạn và thấy chạy ok, rất hữu ích.
Theo mình biết thì có phím tắt Ctrl+ [ để tham chiếu đến ô chứa thành phần của công thức ở ô hiện tại.
Nhưng phím tắt nào để từ ô thành phần này quay trở lại ô ban đầu, không biết có cách nào không nhỉ ? Thanks
 
Loan1989 đã viết:
Mình cài addin của bạn và thấy chạy ok, rất hữu ích.
Theo mình biết thì có phím tắt Ctrl+ [ để tham chiếu đến ô chứa thành phần của công thức ở ô hiện tại.
Nhưng phím tắt nào để từ ô thành phần này quay trở lại ô ban đầu, không biết có cách nào không nhỉ ? Thanks
Nhấp chuột vào đây để mở rộng...
Cũng là 1 chiêu thức đơn giản, tôi học được và chia sẻ với các bạn.
Chỉ cần nhấn F5/Enter là quay lại cell ban đầu.
 
vanle33 đã viết:
Cũng là 1 chiêu thức đơn giản, tôi học được và chia sẻ với các bạn.
Chỉ cần nhấn F5/Enter là quay lại cell ban đầu.
Nhấp chuột vào đây để mở rộng...
Khi cài add in mà mất tác dụng của phím Ctrl+[ rồi thì làm thế nào để đến được địa chỉ của công thức đó vậy bạn?
 
Loan1989 đã viết:
Mình cài addin của bạn và thấy chạy ok, rất hữu ích.
Theo mình biết thì có phím tắt Ctrl+ [ để tham chiếu đến ô chứa thành phần của công thức ở ô hiện tại.
Nhưng phím tắt nào để từ ô thành phần này quay trở lại ô ban đầu, không biết có cách nào không nhỉ ? Thanks
Nhấp chuột vào đây để mở rộng...

Đã biết có Ctrl + [ vậy sao không thử Ctrl + ] xem thế nào
Dù chưa thử cũng có thể đoán: Cái này là NGƯỢC với cái kia
 
ndu96081631 đã viết:
Tự dưng bấm không không thế thì nó báo lỗi phải rồi
Bạn phải xem tác giả người ta hỏi cái gì mà thí nghiệm cho đúng
Nhấp chuột vào đây để mở rộng...
Em thấy bạn Loan1989 hỏi ở bài #43 phải không bác?
Em đặt con trỏ tại cell link đến, nhấn Ctrl+[ thì quay lại cell được link. Nhấn tiếp Ctrl+] thì báo lỗi như em nói. Em đã làm như vậy.
 
kbw1 đã viết:
Khi cài add in mà mất tác dụng của phím Ctrl+[ rồi thì làm thế nào để đến được địa chỉ của công thức đó vậy bạn?
Nhấp chuột vào đây để mở rộng...
Bạn cài add-in nào bị mất tác dụng phím tắt mà vô đây hỏi???
ndu96081631 đã viết:
Đã biết có Ctrl + [ vậy sao không thử Ctrl + ] xem thế nào
Dù chưa thử cũng có thể đoán: Cái này là NGƯỢC với cái kia
Nhấp chuột vào đây để mở rộng...
Trường hợp 1 ô được tham chiếu đến nhiều ô khác thì cách này có vẻ không ổn.
 
vanle33 đã viết:
Tham chiếu đến nhiều ô thì bấm Ctrl+[ nhiều lần được mà bạn! Sẽ quay đến cell đầu tiên của dữ liệu nguồn.
Nhấp chuột vào đây để mở rộng...

Nếu ô chứa công thức link đến các cell khác ở trong cùng 1 sheet thì sẽ hiển thị hết, nếu các cell này ở các sheet khác thì sẽ không hiển thị hết.
 
Loan1989 đã viết:
Nếu ô chứa công thức link đến các cell khác ở trong cùng 1 sheet thì sẽ hiển thị hết, nếu các cell này ở các sheet khác thì sẽ không hiển thị hết.
Nhấp chuột vào đây để mở rộng...
Tôi thấy link sang sheet khác của file khác thì nhấn Ctrl+[ vẫn quay lại đến cell đầu tiên mà. (Quay lại đến cell là values thì dừng). Tôi vừa thử xong.
 
vanle33 đã viết:
Tôi thấy link sang sheet khác của file khác thì nhấn Ctrl+[ vẫn quay lại đến cell đầu tiên mà. (Quay lại đến cell là values thì dừng). Tôi vừa thử xong.
Nhấp chuột vào đây để mở rộng...
Hình như bạn không hiểu ý của những người khác.

Mà sao chuyện này lại bàn ở đây???
 
huuthang_bd đã viết:
Để đổi lại thành phím tắt Ctrl + q thì bạn sửa Sub Auto_Open trong Module M01 thành như sau:
PHP: 
Private Sub Auto_Open()
Application.OnKey "^{q}", "SwitchSheet"
Set App = New clsExcelApp
App.Wrap Application
End Sub
Khi đang nhập liệu (bạn gõ dấu "=") thì không gọi được macro nha bạn.
Nhấp chuột vào đây để mở rộng...

1. Cảm ơn anh đã quan tâm. Anh ơi file .xla anh em không mở được nên không chuyển được phím tắt.
2. Ý em là khi thao tác khối lượng ở sheet 1 em bấm = và nhấn tổ hợp phím Alt+q thì có thể chuyển qua sheet 2 hoặc sheet 3
 
quyettam đã viết:
1. Cảm ơn anh đã quan tâm. Anh ơi file .xla anh em không mở được nên không chuyển được phím tắt.
2. Ý em là khi thao tác khối lượng ở sheet 1 em bấm = và nhấn tổ hợp phím Alt+q thì có thể chuyển qua sheet 2 hoặc sheet 3
Nhấp chuột vào đây để mở rộng...
File ở bài #38 không có password nhé bạn.
Tôi đã nói rồi, đang nhập liệu không chạy macro được.
 
quyettam đã viết:
2. Ý em là khi thao tác khối lượng ở sheet 1 em bấm = và nhấn tổ hợp phím Alt+q thì có thể chuyển qua sheet 2 hoặc sheet 3
Nhấp chuột vào đây để mở rộng...

Bản thân Excel cho phép làm điều này: Bạn bấm = xong thì bấm Ctrl + PGUP hoặc Ctrl + PGDN là được
 
Addin này ko hoạt động được trên office 2016 đúng ko, tôi cài mà ko sử dụng được
 
Sao tôi cài vào lại không bấm được Alt+Q vậy? Tôi xài excel 2007. Chỉ được 1 hoặc 2 lần lại k được. Bạn huuthang_bd hồi âm nha.
 
nam_civilengineer đã viết:
Sao tôi cài vào lại không bấm được Alt+Q vậy? Tôi xài excel 2007. Chỉ được 1 hoặc 2 lần lại k được. Bạn huuthang_bd hồi âm nha.
Nhấp chuột vào đây để mở rộng...
Công dụng duy nhất: Mở lại Sheet đã mở gần nhất bằng phím tắt Alt + q (tôi chọn phím q vì phím q gần với phím tab)
Phải có Sheet đã mở gần nhất thì mới quay lại được bạn nhé. Bạn mở file lên và không chọn sang sheet khác thì sẽ không có Sheet đã mở gần nhất để quay lại.
 
Mình thậm chí đã chọn nhiếu sheet nhưng vẫn k được. K rõ là lỗi gì?
 
Mình đã sử dụng Add-in này hơn 2 năm nay và rất ưng ý, nhưng khi cài lên Office 2016 thì Add-in này không hoạt động!!!. Giúp mình với nhé. Thanks
 
huuthang_bd đã viết:
Có thông báo lỗi hay thông báo gì khác không bạn?
Nhấp chuột vào đây để mở rộng...

"Alt + q" là phím nóng "tell me what you want to do..." của Office 2016, chức năng "tell me what you want to do..." mới có trong Office 2016

Mình đã thử theo cách bạn hướng dẫn chuyển thành phím "Ctrl + q", Kết quả là khi nhấn "Ctrl + q" thì bảng chuyển Sheet cũng hiện lên nhưng không chuyển Sheet được (Hình đính kèm)

Nhờ bạn hỗ trợ điều chỉnh add-in cho phù hợp Office mới nhé, Thanks bạn nhiều
 

File đính kèm

  • Untitled-1.jpg
    Untitled-1.jpg
    42.4 KB · Đọc: 81
tungtm007 đã viết:
"Alt + q" là phím nóng "tell me what you want to do..." của Office 2016, chức năng "tell me what you want to do..." mới có trong Office 2016

Mình đã thử theo cách bạn hướng dẫn chuyển thành phím "Ctrl + q", Kết quả là khi nhấn "Ctrl + q" thì bảng chuyển Sheet cũng hiện lên nhưng không chuyển Sheet được (Hình đính kèm)

Nhờ bạn hỗ trợ điều chỉnh add-in cho phù hợp Office mới nhé, Thanks bạn nhiều
Nhấp chuột vào đây để mở rộng...

Bạn sử dụng file này. Nếu muốn thay đổi phím tắt thì thay đổi các dòng khai báo đầu trong module M01 theo hướng dẫn được ghi chú trong code.
 

File đính kèm

Tôi đã down và sử dụng addin này, tuy nhiên vẫn còn lỗi nhỏ, mong các bác xem và giải quyết giúp: khi bật nhiều file excell khác nhau, khi tắt 1 file nào đó đi thì nó hiện ra lỗi nhỏ, sau đó mới cho save hay don't save. Và sau đó thì các file excell khác không dùng được addin này nữa. Muốn sử dụng lại addin thì phải tắt toàn bộ excell đi và mở lại thì mới sử dụng được.
 
doxuanbinh đã viết:
Tôi đã down và sử dụng addin này, tuy nhiên vẫn còn lỗi nhỏ, mong các bác xem và giải quyết giúp: khi bật nhiều file excell khác nhau, khi tắt 1 file nào đó đi thì nó hiện ra lỗi nhỏ, sau đó mới cho save hay don't save. Và sau đó thì các file excell khác không dùng được addin này nữa. Muốn sử dụng lại addin thì phải tắt toàn bộ excell đi và mở lại thì mới sử dụng được.
Nhấp chuột vào đây để mở rộng...

Hiện ra lỗi nhỏ là lỗi gì? Cụ thể đi bạn, tốt nhất là bằng hình ảnh.
 
huuthang_bd đã viết:
Hiện ra lỗi nhỏ là lỗi gì? Cụ thể đi bạn, tốt nhất là bằng hình ảnh.
Nhấp chuột vào đây để mở rộng...

Tức là lỗi:
1. Khi close 1 file excell thì hiện ra lỗi, Microsoft Visual.... lỗi modul clsApp... bắt phải ấn OK rồi sau đó mới được lưu file lại.
2. Kể từ khi ấn OK và lưu hay ko lưu file vừa close thì từ đó trở đi không sử dụng được Addin chuyển đổi sheet này nữa. Muốn sử dụng lại thì phải tắt excell đi và mở lại thì mới dùng được.
 

File đính kèm

  • Khi tat.jpg
    Khi tat.jpg
    95.9 KB · Đọc: 32
  • sau do.jpg
    sau do.jpg
    63.8 KB · Đọc: 24
doxuanbinh đã viết:
Tức là lỗi:
1. Khi close 1 file excell thì hiện ra lỗi, Microsoft Visual.... lỗi modul clsApp... bắt phải ấn OK rồi sau đó mới được lưu file lại.
2. Kể từ khi ấn OK và lưu hay ko lưu file vừa close thì từ đó trở đi không sử dụng được Addin chuyển đổi sheet này nữa. Muốn sử dụng lại thì phải tắt excell đi và mở lại thì mới dùng được.
Nhấp chuột vào đây để mở rộng...
Bạn đã sử dụng file ở bài nào?
 
Mình sử dụng file ở bài đầu hoặc bài #38 cũng đều bị (office mình cài 2016 bản 64bit, ngày trước bản 2013 64bit cũng bị như thế).
Bác xem có hiệu chỉnh được lỗi này không?
 
doxuanbinh đã viết:
Mình sử dụng file ở bài đầu hoặc bài #38 cũng đều bị (office mình cài 2016 bản 64bit, ngày trước bản 2013 64bit cũng bị như thế).
Bác xem có hiệu chỉnh được lỗi này không?
Nhấp chuột vào đây để mở rộng...
Bạn thử chụp hình lỗi khi sử dụng file ở bài #38 xem.
 
Em đã thử thêm dòng
Dim i As Long
thì ngon rồi bác ạ.
Thanks bác rất nhiều.
 
Các bác cho mình hỏi là có addin nào hỗ trợ office 2016 64 bit ko, mình cũng đang cần cái này
 
cài vào thì chạy ok, nhưng sau khi thoát excel ra hết,lúc vào lại nó không còn tác dụng, lại phải vào bổ trợ cài lại. mong bác chỉ cách khắc phục. em xài 2010
 
nvtnet đã viết:
cài vào thì chạy ok, nhưng sau khi thoát excel ra hết,lúc vào lại nó không còn tác dụng, lại phải vào bổ trợ cài lại. mong bác chỉ cách khắc phục. em xài 2010
Nhấp chuột vào đây để mở rộng...
Sau khi cài, sử dụng bình thường và thoát Excel. Khi bạn mở lại Excel có thông báo gì không?
 
nvtnet đã viết:
nghĩa là làm như bước chèn 1 addins mới ấy bác, nhưng cũng chỉ xài được tạm thời như vậy, thoát hết excel là nó lại mất tác dụng
Nhấp chuột vào đây để mở rộng...
Nếu được thì bạn quay clip quá trình cài add-in sử dụng bình thường, khởi động lại Excel add in bị mất tác dụng phải cài lại mới sử dụng được.
File này tôi không khóa VBA và nhiều người sử dụng bình thường, nên nếu có vấn đề thì có thể do bạn cài add in có chỗ nào đó chưa đúng.
 
huuthang_bd đã viết:
Nếu được thì bạn quay clip quá trình cài add-in sử dụng bình thường, khởi động lại Excel add in bị mất tác dụng phải cài lại mới sử dụng được.
File này tôi không khóa VBA và nhiều người sử dụng bình thường, nên nếu có vấn đề thì có thể do bạn cài add in có chỗ nào đó chưa đúng.
Nhấp chuột vào đây để mở rộng...
đây bác ơi [video]https://youtu.be/5fCesRqaTOE[/video]
 
cảm ơn bác, có gì bác cho em nick fa cho tiện liên hệ, FB của em: nvt.net@gmail.com
 
cảm ơn sự nhiệt tình chu đáo của bác huuthang_bd nhé, chúc diễn đàn càng nagyf càng lớn mạnh
 
Chào bạn huuthang_bd,

Tình hình là máy mình xài Office 2016 + Win 64 bit. Mình đã chạy Add-in nhưng nó không hoạt động và cứ báo lỗi "Missing microsoft windows common controls 6.0 (sp6)"
Bạn biết cách khắc phục không, chỉ mình với ?
Mình đã thử một số version Addin trong Topic này đều không được.

Cảm ơn bạn1.jpg2.jpg
 
minhdung1991 đã viết:
Chào bạn huuthang_bd,

Tình hình là máy mình xài Office 2016 + Win 64 bit. Mình đã chạy Add-in nhưng nó không hoạt động và cứ báo lỗi "Missing microsoft windows common controls 6.0 (sp6)"
Bạn biết cách khắc phục không, chỉ mình với ?
Mình đã thử một số version Addin trong Topic này đều không được.

Cảm ơn bạnView attachment 171260View attachment 171261
Nhấp chuột vào đây để mở rộng...

Hình nhỏ quá tôi không thấy gì cả.
 
mình cũng bị lỗi y như bạn phía trên, mong cao thủ chỉnh sửa để chạy được trên excel 2016 64bit
Thanks
Hình đính kèm
1.PNG2.jpg
 

File đính kèm

  • 1.jpg
    1.jpg
    35.9 KB · Đọc: 29
  • 2.jpg
    2.jpg
    34.5 KB · Đọc: 20
Ok, mình đã làm được, cảm ơn bạn
 
Bạn có chắc một điều rằng sau khi mở file excel lên, ít nhất bạn phải chọn vào 2 sheet (lần lượt bất kỳ sheet nào), thì Alt + q mới có tác dụng. Còn trường hợp bạn mở file excel mà mà không chọn sheet nào khác ngoài sheet đang mở thì Alt + q sẽ không có tác dụng.
Thân! #17
 
cái này có khác gì so với tổ hợp ctrl+page up, ctrl + page down không vậy chủ thớt
 
mình cũng đang ấn Alt + Q mà chưa có thấy ok gì cả.
 
huuthang_bd đã viết:
Tôi nghĩ đa số những người dùng máy tính thường xuyên sử dụng phím tắt Alt + Tab để mở lại cửa sổ gần nhất vì nó rất tiện lợi. Tuy nhiên, trên Excel khi ta muốn xem lại sheet vừa xem thì phải tìm và chọn. Đối với những file có nhiều sheet thì rất mất thời gian. Vì vậy, tôi tạo ra Addin này.

Công dụng duy nhất: Mở lại Sheet đã mở gần nhất bằng phím tắt Alt + q (tôi chọn phím q vì phím q gần với phím tab)

Hy vọng Addin này sẽ giúp tiết kiệm thời gian cho những người thường xuyên làm việc trên Excel.

Password view code: =TEXT([Sinh nhật GPE],"d-mmmm-yy")
Nhấp chuột vào đây để mở rộng...
Ad ơi cho mình hỏi tại sao add in này mỗi lần sử dụng ở 1 file excel khac đều phải vào phần bổ trợ và load lại nó mới chạy, không nó sẽ không chạy mặc dù đã load ở file excel cũ rồi
 
nvtnet đã viết:
không có gì cả bác ơi, các addin khác xài bình thường, có cái này cứ toát hết excel, vào lại là mất tác dụng, muốn dùng lại phải cập nhật lại
Nhấp chuột vào đây để mở rộng...
bạn ơi đã xử lý được tình huống phải cập nhập lại add in đó chưa, mình cũng gặp phải vậy, k biết phải làm sao
 
huuthang_bd đã viết:
Tôi nghĩ đa số những người dùng máy tính thường xuyên sử dụng phím tắt Alt + Tab để mở lại cửa sổ gần nhất vì nó rất tiện lợi. Tuy nhiên, trên Excel khi ta muốn xem lại sheet vừa xem thì phải tìm và chọn. Đối với những file có nhiều sheet thì rất mất thời gian. Vì vậy, tôi tạo ra Addin này.

Công dụng duy nhất: Mở lại Sheet đã mở gần nhất bằng phím tắt Alt + q (tôi chọn phím q vì phím q gần với phím tab)

Hy vọng Addin này sẽ giúp tiết kiệm thời gian cho những người thường xuyên làm việc trên Excel.

Password view code: =TEXT([Sinh nhật GPE],"d-mmmm-yy")[/QUOT
mình có đọc 1 bài hướng dẫn tạo code vba để dùng phím tắt di chuyển lại giữa 2 sheet nhưng bị lỗi, bạn làm ơn xem giúp mình code bị lỗi ở chỗ nào nhé!hỉ
Nhấp chuột vào đây để mở rộng...
 

File đính kèm

dangky47h đã viết:
Ad ơi cho mình hỏi tại sao add in này mỗi lần sử dụng ở 1 file excel khac đều phải vào phần bổ trợ và load lại nó mới chạy, không nó sẽ không chạy mặc dù đã load ở file excel cũ rồi
Nhấp chuột vào đây để mở rộng...
Bạn mô tả chi tiết các bước bạn làm và ý bạn không được là sao nhé.
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

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

Q
Không chỉnh sửa, copy được hình ảnh trong file excel. (3 người xem)
Trả lời
6
Đọc
4K
thaivanthao
T
L
Nhờ giúp file word (3 người xem)
Trả lời
1
Đọc
77
minhminh27
minhminh27
GPE-Trợ Lý
[GPE] TASKSHOW 14: TỪ BẢNG TÍNH ĐẾN BÁO CÁO ĐỘNG - BẮT ĐẦU VỚI LOOKER STUDIO (3 người xem)
    • Thích
Trả lời
1
Đọc
11K
GPE-Trợ Lý
GPE-Trợ Lý
dungluyen2119
  • Question Question
Code VBA để tính tổng theo chiều ngang mà số cột không cố định (1 người xem)
Trả lời
5
Đọc
258
dungluyen2119
dungluyen2119
ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (1 người xem)
    • Thích
    • Yêu thích
    • Cảm ơn
2 3 4
Trả lời
390
Đọc
46K
phdong
P
8
Theo dõi bán hàng
Trả lời
10
Đọc
309
84huong
8
L
  • Question Question
Nhờ sửa code ChrW () (1 người xem)
Trả lời
2
Đọc
94
le_vis
L
N
  • Question Question
Hỗ trợ tiếng việt trong macro
Trả lời
12
Đọc
525
Quang_Hải
Quang_Hải
D
xin hỏi về lỗi mô đun ẩn.
Trả lời
6
Đọc
295
du trung kien
D
haohvnh
Lỗi hàm SUM không hiển thị ra kết quả
Trả lời
19
Đọc
45K
ptm0412
ptm0412
minhduc1o2
Hình ảnh bị lỗi #VALUE (1 người xem)
Trả lời
5
Đọc
174
minhduc1o2
minhduc1o2
ongke0711
  • Question Question
Tra cứu thông tin mã số thuế (cập nhật lại code cũ)
    • Thích
    • Cảm ơn
    • Yêu thích
Trả lời
5
Đọc
310
ongke0711
ongke0711
befaint
Chia sẻ tâm tư, xả nỗi lòng
    • Thích
6 7 8
Trả lời
761
Đọc
61K
SA_DQ
SA_DQ
S
  • Question Question
Object.close và Set Object = nothing
Trả lời
14
Đọc
1K
nguyendang95
N
H
Lỗi khi sort data xin được hỗ trợ
Trả lời
2
Đọc
123
hunglq48
H
Nguyenkhang2404
Tính định mức sản phẩm
    • Chấp nhận
Trả lời
9
Đọc
371
Nguyenkhang2404
Nguyenkhang2404
T
Ngắt kết nối với tệp lệnh đính kèm
Trả lời
2
Đọc
136
TungXauGiai
T
ongke0711
  • Question Question
Trộn dữ liệu từ Excel sang Word mở rộng (phiên bản ongke0711)
    • Thích
    • Yêu thích
    • Cảm ơn
2 3
Trả lời
277
Đọc
35K
joker102
J
S
tỷ lệ % không khớp khi cộng tổng
Trả lời
2
Đọc
112
snoobcool
S
D
Tên sheet bị che khuất khi thực hiện sửa tên sheet
Trả lời
1
Đọc
273
PhamMaiTB
P
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

Thời gian đếm ngược.

000
Ngày
00
Giờ
00
phút
00
giây
Thân mời tham dự sự kiện sinh nhật GPE 2025
Back
Top Bottom