Lấy địa chỉ ô cell trong menu

Liên hệ QC

duong22000

Thành viên thường trực
Tham gia
8/5/13
Bài viết
322
Được thích
23
Mình đang sử dụng 1 menu có dạng:
Mã:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" >

<ribbon>

    <tabs>

        <tab id="MyCustomTab" label="TEN MOI">

            <group id="OneMenu" label="Menu Commands">

                <menu id="MySecretMenu" label="HO NGOC PHI" >

                    <button id="customButton1" label="Tinh tong" onAction="TinhTong" />

                    <button id="customButton2" label="Tinh tich" onAction="TinhTich" />

                    <menuSeparator id="Separator1" />

                    <menu id="MenuCap2" label="Menu cap 2" >

                        <button id="customButton3" label="Lua chon &amp;1" onAction="LuaChon1" />

                        <menuSeparator id="Separator2" />

                        <menu id="MenuCap2.1" label="Menu cap 2.1" >

                            <button id="customButton4" label="Menu cap 2.1.1" onAction="MenuCap211" />

                        </menu>

                        <button id="customButton5" label="Lua chon &amp;2" onAction="LuaChon2" />

                        <menuSeparator id="Separator3" />

                        <menu id="MenuCap2.2" label="Menu cap 2.2" >

                            <button id="customButton6" label="Menu cap 2.2.1" onAction="MenuCap221" />

                            <button id="customButton7" label="Lua chon &amp;3" onAction="LuaChon3" />

                        </menu>

                    </menu>

                </menu>

            </group>

        </tab>

    </tabs>

</ribbon>

</customUI>
Tuy nhiên mình muốn các chỗ:
label="HO NGOC PHI"
label="Tinh tong"
label="Tinh tich"
...
Các nội dung menu này sẽ thay đổi tùy theo thông tin thay đổi tại 1 địa chỉ ô cell cụ thể
VD: Sheet1.range("A1") đang ghi HO NGOC PHI ----> Chuc nang thì menu cung sẽ thay đổi theo
Sheet1.range("A2") đang gh Tinh tong ----> An dong thì menu cung sẽ thay đổi theo
Sheet1.range("A3") đang ghi Tinh tich ----> Hien dong thì menu cung sẽ thay đổi theo
......
Mọi người trên GPE giúp mình với, mình xin chân thành cảm ơn !
 
Tuy nhiên mình muốn các chỗ:
label="HO NGOC PHI"
label="Tinh tong"
label="Tinh tich"
...
Các nội dung menu này sẽ thay đổi tùy theo thông tin thay đổi tại 1 địa chỉ ô cell cụ thể
VD: Sheet1.range("A1") đang ghi HO NGOC PHI ----> Chuc nang thì menu cung sẽ thay đổi theo
Sheet1.range("A2") đang gh Tinh tong ----> An dong thì menu cung sẽ thay đổi theo
Sheet1.range("A3") đang ghi Tinh tich ----> Hien dong thì menu cung sẽ thay đổi theo
......
Mọi người trên GPE giúp mình với, mình xin chân thành cảm ơn !
Tôi hiểu là nếu A1, A2, A3 đổi thành (người dùng gõ lại nội dung 3 cell): Nguyen Van To, hic hic, blala thì 3 menu sẽ hiện thành Nguyen Van To, hic hic, blala. Ý là thế?

Thế trong 3 "cấu trúc":
HO NGOC PHI ----> Chuc nang
Tinh tong ----> An dong
Tinh tich ----> Hien dong

thì
Chuc nang
An dong
Hien dong

nó là những gì vậy?

Hay ý là hiện thời A1, A2, A3 là:
HO NGOC PHI
Tinh tong
Tinh tich

sau đó đổi thành
Chuc nang
An dong
Hien dong

chứ không như tôi ví dụ là thành
Nguyen Van To
hic hic
blala

???
 
Bạn xem file thử có phải ý bạn muốn như vậy không.
 

File đính kèm

Tôi hiểu là nếu A1, A2, A3 đổi thành (người dùng gõ lại nội dung 3 cell): Nguyen Van To, hic hic, blala thì 3 menu sẽ hiện thành Nguyen Van To, hic hic, blala. Ý là thế?

Thế trong 3 "cấu trúc":
HO NGOC PHI ----> Chuc nang
Tinh tong ----> An dong
Tinh tich ----> Hien dong

thì
Chuc nang
An dong
Hien dong

nó là những gì vậy?

Hay ý là hiện thời A1, A2, A3 là:
HO NGOC PHI
Tinh tong
Tinh tich

sau đó đổi thành
Chuc nang
An dong
Hien dong

chứ không như tôi ví dụ là thành
Nguyen Van To
hic hic
blala

???
Cảm ơn bạn đã quan tâm!
Đúng như bạn nói: nếu thay đổi thông tin ở A1A2A3 thì dữ liệu hiển thị cũng thay đổi theo ở menu, người dùng đổi tên thành gì cũng được khi thay đổi ở A1A2A3
 
Bạn xem file thử có phải ý bạn muốn như vậy không.
Cảm ơn bạn đã quan tâm !
Cách làm menu của bạn cũng hay nhưng cách này sửa code VBA trực tiếp ở các Modules
Nhưng file của mình thì sửa ở file customUI.xml khi nén tập tin và giải nén để sửa
Vậy bạn có cách nào liên kết hiển thị thông tin từ 1 ô cell đến file customUI.xml để có thể thay đổi tên menu ?
VD:
Từ code ban đầu trong file customUI.xml:
menu id="MySecretMenu" label="HO NGOC PHI" >

<button id="customButton1" label="Tinh tong" onAction="TinhTong" />

<button id="customButton2" label="Tinh tich" onAction="TinhTich" />
giả sử ta có thể thay địa chỉ ô cell vào như sau:
menu id="MySecretMenu" label=Sheet1.Range("A1") >

<button id="customButton1" label=Sheet1.Range("A2") onAction="TinhTong" />

<button id="customButton2" label=Sheet1.Range("A3") onAction="TinhTich" />
nhưng mình đã thử nhưng không được. Vậy chỗ này phải sửa sao cho được địa chỉ các ô cell trên ???
 
Lần chỉnh sửa cuối:
Cảm ơn bạn đã quan tâm !
Cách làm menu của bạn cũng hay nhưng cách này sửa code VBA trực tiếp ở các Modules
Nhưng file của mình thì sửa ở file customUI.xml khi nén tập tin và giải nén để sửa
Vậy bạn có cách nào liên kết hiển thị thông tin từ 1 ô cell đến file customUI.xml để có thể thay đổi tên menu ?
VD:
Từ code ban đầu trong file customUI.xml:
menu id="MySecretMenu" label="HO NGOC PHI" >

<button id="customButton1" label="Tinh tong" onAction="TinhTong" />

<button id="customButton2" label="Tinh tich" onAction="TinhTich" />
giả sử ta có thể thay địa chỉ ô cell vào như sau:
menu id="MySecretMenu" label=Sheet1.Range("A1") >

<button id="customButton1" label=Sheet1.Range("A2") onAction="TinhTong" />

<button id="customButton2" label=Sheet1.Range("A3") onAction="TinhTich" />
nhưng mình đã thử nhưng không được. Vậy chỗ này phải sửa sao cho được địa chỉ các ô cell trên ???
Cách này thì không được nhé, phải sửa code trong file excel (trừ khi trong file đã có sẳn code GetLabel rồi), một cách nửa bạn có thể tham khảo ở bài 8.
 
Cách này thì không được nhé, phải sửa code trong file excel (trừ khi trong file đã có sẳn code GetLabel rồi), một cách nửa bạn có thể tham khảo ở bài 8.
Cảm ơn bác giaiphap, em sẽ làm theo hướng dẫn. Có gì các bác giúp đỡ tiếp ạ
 
Web KT

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

Back
Top Bottom