Note: The other languages of the website are Google-translated. Back to English

 Làm thế nào để chạy macro bằng cách nhấp vào siêu liên kết trong Excel?

Mã macro có thể rất hữu ích cho chúng tôi để giải quyết một số công việc phức tạp trong Excel, thông thường, chúng tôi có thể thực thi nó trong Microsoft Visual Basic cho các ứng dụng cửa sổ bằng cách nhấp vào chạy nút hoặc nhấn F5 Chìa khóa. Tuy nhiên, bạn đã bao giờ thử chạy các macro bằng cách nhấp vào các siêu liên kết tương đối trong trang tính chưa?

Chạy hoặc thực thi macro bằng cách nhấp vào siêu liên kết có mã VBA


mũi tên màu xanh bong bóng bên phải Chạy hoặc thực thi macro bằng cách nhấp vào siêu liên kết có mã VBA

Có thể thú vị đối với chúng tôi khi kích hoạt macro bằng cách nhấp vào siêu liên kết trong Excel, phương pháp sau có thể giúp bạn từng bước đạt được tác vụ này:

1. Tạo siêu liên kết mà bạn muốn sử dụng để thực thi các mã macro. Vui lòng nhấp vào một ô và tạo một siêu liên kết để liên kết với chính nó, xem ảnh chụp màn hình:

doc chạy macro từ siêu liên kết 1

2. Lặp lại bước trên để tạo các siêu liên kết khác mà bạn muốn sử dụng như ảnh chụp màn hình sau:

doc chạy macro từ siêu liên kết 2

3. Sau đó bấm chuột phải vào tab trang tính có chứa các siêu liên kết bạn muốn sử dụng, rồi chọn Mã Chế độ xem từ menu ngữ cảnh và trong Microsoft Visual Basic cho các ứng dụng cửa sổ, sao chép và dán mã sau vào Mô-đun trống:

Mã VBA: Chạy mã macro từ các siêu liên kết:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    If Target.Range.Address = "$B$6" Then
        Call Macro1
        End If
         If Target.Range.Address = "$B$8" Then
        Call Macro2
         End If
End Sub

doc chạy macro từ siêu liên kết 3

Chú thích: Trong đoạn mã trên, B6 B8 các ô có chứa siêu liên kết bạn muốn sử dụng không và vĩ mô1 vĩ mô2 là tên mã macro, vui lòng thay đổi chúng theo nhu cầu của bạn.

4. Sau đó lưu và đóng cửa sổ mã, từ bây giờ, khi bạn nhấp vào siêu liên kết, mã macro cụ thể sẽ được thực thi cùng một lúc.


Các bài liên quan:

Làm thế nào để chạy macro khi giá trị ô thay đổi trong Excel?

Làm thế nào để chạy macro dựa trên giá trị ô trong Excel?

Làm cách nào để chạy macro dựa trên giá trị được chọn từ danh sách thả xuống trong Excel?

Làm cách nào để chạy macro tự động trước khi in trong Excel?

Làm cách nào để chạy macro khi trang tính được chọn từ sổ làm việc?


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (5)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào
Điều này rất hữu ích, cảm ơn bạn, tuy nhiên điều này chỉ hoạt động nếu bạn đang ở trong ô $ B $ 8. Tôi muốn tạo cùng một siêu kết nối, thực hiện cùng một chức năng macro, nhưng ở mọi hàng xuống trang tính.
I E. Tôi có hai tab, trang tính 1 và trang tính 2. Người dùng đang ở Trang tính 1 và một macro được chạy để nhập dữ liệu vào trang tính 1 và trang tính 2 trên cơ sở từng hàng. Điều này hoạt động tốt, nhưng sau đó tôi muốn một macro để người dùng có thể nhấp vào liên kết trong ô tiếp theo và nó đưa họ trở lại hàng ban đầu trong trang tính 1, bù trừ một vài ô. Tôi có thể làm điều này bằng cách sử dụng ở trên, NHƯNG chỉ khi người dùng ở trong một hàng đã đặt trong trang tính 2 (ví dụ: $ B $ 8). Làm cách nào để tạo macro để macro hoạt động khi chúng ở trong sheet 2 B9, B10, B11 ....?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều này sẽ chỉ định sheet1 cột J, hàng 2 đến 35 với một siêu liên kết đến ô riêng của nó với tên văn bản

Sub AnythingName ()
Đối với i = 2 đến 35 Bước 1
ActiveCell.FormulaR1C1 = "tên"
Phạm vi ("J" & i). Chọn
ActiveSheet.Hyperlinks.Add Anchor: = Selection, Address: = "", SubAddress: = _
"'sheet1'! j" & i, TextToDisplay: = "name"
Sau

End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Ola,

Um dos poucos locais onde encontrei essa solução. Muito obrigado! Estou quase lá. Não estou usando uma célula para o hiperlink, mas uma imagem que inseri na planilha e indicando uma célula Qualquer como referenceência. Fiz como indicado, mas não funciona (Só para Verificação, fiz com uma célula e deu certo). Há alguma modificação a ser feita na macro?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi bán không có lỗi:

Lỗi biên dịch:
Không có gì xác định Sub o Chức năng
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
hoạt động tốt
Không có bình luận nào được đăng ở đây
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL