Tạo nút có hình hai mũi tên để chuyển sang sheet bên cạnh (1 người xem)

[LikeIt]

Gửi các Anh Chị,

Mong các anh chị chỉ giáo vài đường,chỉ cho em tạo ra cái nút mà có hình mũi tên (như file gửi kèm). Để khi kích vào nút forward or back thì nó có thể link dc sang trang phía trước hoặc phía sau. Do em không hiểu về VBA, vì vậy nếu có sử dụng VBA thì làm đơn giản cho em và chỉ em chi tiết cáchh thực hiện.

Thanks/ NHT

 

[anhphuong]

Macro đơn giản

Gửi các Anh Chị,

Mong các anh chị chỉ giáo vài đường,chỉ cho em tạo ra cái nút mà có hình mũi tên (như file gửi kèm). Để khi kích vào nút forward or back thì nó có thể link dc sang trang phía trước hoặc phía sau. Do em không hiểu về VBA, vì vậy nếu có sử dụng VBA thì làm đơn giản cho em và chỉ em chi tiết cáchh thực hiện.

Thanks/ NHT

Gửi bạn một macro rất đơn giản. Mở file, nhấn Alt+F11 để xem
Thân

 

[LikeIt]

Gửi bạn một macro rất đơn giản. Mở file, nhấn Alt+F11 để xem
Thân

Cám ơn anhphuong nhiều, Như vậy là nếu muốn các sheet đều có cái nút kiểu như đó thì cứ copy đoạn code trong macro và paste vào sheet cần tạo phải không bạn?

 

[anhphuong]

1/ Tạo nút lệnh
2/ Nhấn đúp vào nút lệnh để mở VBA
3/ Copy mã lệnh vào
Thân

 

[LikeIt]

Cám ơn anhphuong nhiều.NHT

 

[anhtuan1066]

Bạn sử dụng chức năng Record New Macro (giống như thu hình 1 đoạn phim vậy). Bạn làm gì thì macro tự ghi thành mã Code... Như vậy sẽ dễ dàng hơn!
ANH TUẤN

 

[anhtuan1066]

Còn 1 cách đơn giản nữa ko cần đến VBA, đó là dùng chức năng Hyperlink
ANH TUẤN

 

[dmtdmtbb]

Còn 1 cách đơn giản nữa ko cần đến VBA, đó là dùng chức năng Hyperlink
ANH TUẤN

- Nói thêm 1 chút về Hyperlink
- Bạn có thể link tới bất cứ file excel nào và bất cứ sheet nào khi bạn chọn Hyperlink và chọn Bookmark..., không chỉ file excel mà bạn còn có thể link tới bất cứ file nào.

 

[LikeIt]

Cám ơn anh Tuấn, em cũng đã sử dụng hyperlink, nhưng làm cái mũi tên và nút lệnh đó trong một số dox trông nó pro hơn.

 

[Mr Okebab]

- Bạn có thể link tới bất cứ file excel nào và bất cứ sheet nào khi bạn chọn Hyperlink và chọn Bookmark..., không chỉ file excel mà bạn còn có thể link tới bất cứ file nào.

Làm Hyperlink thì đơn giản và dễ dàng hơn bao giờ hết. Đây thực sự là cái mà những người moéi bắt đầu cần thiết.

Tuy nhiên có những rắc rối nhỏ như khi ta thay đổi tên Sheet thì ta phải sửa lại đường dẫn của các HyperLink .

Vì thế nếu dùng VBA tuy vất vả hơn nhưng lại không phải thay đổi khi sheet thay đổi.

Tùy các bạn thấy cái nào phù hợp để áp dụng.

1/ Tạo nút lệnh
2/ Nhấn đúp vào nút lệnh để mở VBA
3/ Copy mã lệnh vào

Trong code bác nên gọi tên sheet trong VBA, tránh gọi tên sheet trong excel để khi người dùng sửa lại tên sheet không bị lỗi

Thân!

 

[hoaloaken]

Chào các bác
EM đã bắt chước cách trên mà vẫn không được
cái nút next thì hoạt động, mà cái nút previous lại không hoạt động, nó báo lỗi.
Các bác xem em sai ở chỗ nào, em thì chưa biết gì về VBA cả. Thanks các bác nhiều

 

[anhphuong]

Sửa lại là : Sheets("Mar").Select
Thân

 

[yeudoi]

Bạn làm như anh Okebab ấy. Bạn nên đổi là sheet10.select khi thay đổi tên sheet không bị ảnh hưởng

 

[anhtuan1066]

Bạn Hiếu ơi! Mấy code ấy thì đàng nào khi bấm vào nút lệnh nó cũng thực hiện bằng cách "chọn" vào 1 sheet có tên nào đó! Có code nào nói cho Excel hiểu là NEXT SHEET ko nhỉ?
ANH TUẤN

 

[ThuNghi]

Có chớ Bác à!
...
ActiveSheet.Next.Select
ActiveSheet.Previous.Select
...

 

[Mr Okebab]

Có chớ Bác à!
...
ActiveSheet.Next.Select
ActiveSheet.Previous.Select
...

Khi đó, ta chỉ cần thiết lập 1 sub ở module, sau đó các nút ở các sheet chỉ cần gọi nó ra là được.

Tránh tính trạng sheet nào cũng có 1 sub con, không hợp lý và mất thời gian.

Thân!

 

[dmtdmtbb]

- Minh họa cho bác Mr.Okelab
View attachment a.xls

 

[Mr Okebab]

- Minh họa cho bác Mr.Okelab
View attachment 2602

Rất tốt, tuy nhiên cần thêm dòng
On Error Resume Next

vào đầu câu lệnh nhằm tránh TH vào sheet cuối rồi không thể next được nữa
(tương tự với Previous) thì sẽ bị lỗi.

Nhân đây cho hỏi làm cách nào xác định đây là sheet đầu tiên hay cuối cùng không nhỉ ???

 

[anhtuan1066]

Thế thì ổn rồi... cần gì Select chính xác tên 1 sheet nào đó cho mất công... Ah... thường tôi thấy khi mình gõ các Code vào thì khi đến dấu "." nó sẽ xuất hiện 1 popup cho mình chọn tham số... Thế sao có lệnh thì có Popup, có lệnh lại ko thấy xuất hiện nhỉ... Cụ thế là khi gõ: ActiveSheet. chẳng thấy cái gì xổ xuống cả ???
ANH TUẤN

 

[Mr Okebab]

Thế thì ổn rồi... cần gì Select chính xác tên 1 sheet nào đó cho mất công... Ah... thường tôi thấy khi mình gõ các Code vào thì khi đến dấu "." nó sẽ xuất hiện 1 popup cho mình chọn tham số... Thế sao có lệnh thì có Popup, có lệnh lại ko thấy xuất hiện nhỉ... Cụ thế là khi gõ: ActiveSheet. chẳng thấy cái gì xổ xuống cả ???
ANH TUẤN

Cái này phải hỏi các cao thủ thôi, giống như Cells vậy. Nhiều khi muốn dùng nó phải dùng range trước, sau đó thay lại.
(farmer mà)

Thân!

 

[anhtuan1066]

Có thể dò tìm trong Help đễ có dc cái danh sách xổ xuống này ko bạn
ANH TUẤN

 

[levanduyet]

Chào bạn anhtuan1066,
Trong VBA, chúng ta có các đối tượng Excel (Excel Object) và Collection.
Một đối tượng chúng ta có thể hiểu một cách đơn giản như thế này:
Đối tượng nó giống như một chiếc xe hơi.
_Xe hơi thì có nhà sản xuất, kiểu dáng, màu sắc...(1)
_Xe hơi thì có thể chạy, có thể ngừng,...(2)
Bạn có để ý (1) đa số là tính từ không? Nó mô tả đối tượng. (1) được gọi là các thuộc tính (properties) của đối tượng.
Đồng thời bạn có để ý (2), đa số là động từ không? (2) được gọi là các phương thức (Method) của đối tượng.
Vậy tóm lại mỗi đối tượng nó có thuộc tính và phương thức.
Lúc bạn lập trình, khi bạn gõ Application. thì bạn sẽ thấy một danh sách hiện ra đó chính là các phương thức và thuộc tính của đối tượng. Đối tượng trên cùng của Excel chính là Application.
Để Excel nhắc chúng ta bạn vào màn hình VBE (tức là từ Excel bạn nhấn tổ hợp phím Alt + F11) chọn Tools/Options. Trong Tab Editor bạn chọn Auto List Members
Nếu trong trường hợp không hiện ra khi bạn gõ "." xong, bạn có thể nhấn tổ hợp phím Ctrl + Space bar.

Chúc bạn thành công.

Lê Văn Duyệt

 

[Mr Okebab]

Để Excel nhắc chúng ta bạn vào màn hình VBE (tức là từ Excel bạn nhấn tổ hợp phím Alt + F11) chọn Tools/Options. Trong Tab Editor bạn chọn Auto List Members
Nếu trong trường hợp không hiện ra khi bạn gõ "." xong, bạn có thể nhấn tổ hợp phím Ctrl + Space bar.

Đối với Activesheet thì làm theo bác vẫn không được.
Thân!

 

[LikeIt]

Bạn sử dụng chức năng Record New Macro (giống như thu hình 1 đoạn phim vậy). Bạn làm gì thì macro tự ghi thành mã Code... Như vậy sẽ dễ dàng hơn!
ANH TUẤN

Anh Tuấn ơi em không biết về cái record Macro, anh chỉ cho em phương pháp làm với, vì có những công việc hiện nay em cứ làm đi làm lại hàng ngày mà không biết làm cách nào để nó chạy tự động thì tốt. Anh chỉ cho em nhơ đính kèm hình ảnh nhé. tks anh trc

 

[anhphuong]

Macro

1/ Vào me nu Tools/Macro, chọn Record New Macro. Đặt tên macro vào hộp thoại hiển thị và phim tắt nếu muốn.
2/ Thực hành những gì bạn muốn làm. Trong khi bạn thực hành, macro sẽ như một cái máy quay phim âm thầm ghi lại tất cả những thao tác của bạn, kể cả những thao tác thừa
3/ Nhấn nút Stop macro(hình ô vuông) hoặc vào lại menu trên nhấn Stop macro
4/ Nhấn Alt+F11 để xem lại đoạn phim mà macro đã ghi cho bạn
Chúc thưc hành tiến bộ
Thân

 

[LikeIt]

Cám ơn anh Phuong, em sẽ thử và hỏi anh sau vì em đang cũng rất cần cái món này, nếu đc thì em nghĩ nó sẽ save cho em nhiều thời gian để vào đc diễn đàn học hỏi các anh chị nhiều.Tks.

 

[LikeIt]

Hi Anh Phuong, em đã thử và đã xem đc đoạn code macro đã ghi lại cho em, vậy em làm gì để file đó hoạt động và sử dụng nó đc? anh giải thích giùm em chút

 

[anhphuong]

Cách thứ nhất :
1/ Nếu đã đặt tên macro, tạo một nút lệnh giống như bạn đã tạo nút Back hoac Next trong Sheet
2/ Kích đúp nút lệnh, ghi vào giữa hai dong lệnh có sẵn câu lệnh sau : Call Thu(Thu là tên macro do bạn đặt tên từ trước)
Khi đó cứ mỗi lần kích nút lệnh thì macro thi hành

Cách thứ hai :
1/ Nếu khi bắt dầu ghi macro bạn đã gán phím tắt thì mổi lần muốn macro họat động bạn hảy nhấn tổ hợp phím tắt ấy
2/ Nếu chưa gán phím tắt, vào menu Tools/Macro/Macro(hoặc nhấn Alt+F8) chon macro bạn vừa ghi, kich chọn Options rồi gán phím tắt

Chúc thực hành tốt
Thân

 

[levanduyet]

Đối với Activesheet thì làm theo bác vẫn không được.
Thân!

Thế thì em thử cái này xem sao.

Sub test()
Dim wsh As Worksheet
Set wsh = Application.ActiveSheet
wsh.  'Chắc chắn sẽ hiện ra :)
End Sub

Lê Văn Duyệt

 

[quynhbao]

Bạn vui lòng chỉ cho mình cách tạo nút nhấn giống như bạn với.

 

[LikeIt]

Bạn vui lòng chỉ cho mình cách tạo nút nhấn giống như bạn với.

bạn đọc kỹ các hướng dẫn như trên,các anh ấy HD chi tiết lắm mình cũng không hiểu gì về VBA mà còn cut và paste và đúng theo chỉ dẫn là ổn

 

[phu]

em muốn làm cái back và next sao ko được, anh chị nao chỉ dùm cho các bước nhé,em mới học excel nên chưa rõ lắm

 

[trung_dang]

Mình có tạo cái mũi tên và nút lệnh trông khá pro. Ban thử dùng xem như thế nào

 

[echo07]

Chào các tiền bối. Em là lính mới đăng nhập sáng nay. Các tiền bối có thể chỉ cho em cách sử dụng Visua Basic Editor k? Em thấy hay phết mà làm k được. Thanks

 

[syhoang24]

Anh Phương cho em hỏi ???
Em có một file như thế này nhờ anh giúp đỡ.
File của em có 3 sheet sheet báo giá thì không vấn đề gì, nhưng sheet quan lý thông tin và phiếu báo giá.
Ở đây bên sheet phiếu báo giá thì khi em nhập dữ liệu là số phiếu vào thì ở mục tên hàng sẽ tự động lấy dữ liệu bên sheet thông tin với nhiều dữ liệu thoả mãn một điều kiện đó
Anh xem file có thể giúp em được không ?

 

[thaoseas]

tui thay dau co can cau lenh VBA gi dau
1. bạn vào Developer/insert/chọn Button (form control) --->cái này là tạo nút lệnh
2. tại sheet 1 bạn thực hiện record macro, (marco đang quay phim)
3. tiếp theo bạn click tới sheet 2 (sheet 2 là sheet mà bạn muốn chuyển đến khi nhấn nút lệnh) lúc này bạn thực hiện stop record macro.
4. bạn quay về sheet1, click chuột phải vào nút lệnh, rồi chọn assign macro, chọn cái macro lúc nãy bạn đã quay. thế là xong
5. bạn kiểm tra lại (tui làm thấy ok mà)