Menu Ripbon Dll viết bằng Delphi

[thuyyeu99]

Vô tình lang thang mò trên mạng lụm được cái Menu Ripbon bằng Delphi. Nhờ các anh chị Test giúp nó chạy được 32 voi 64 không ah
32
https://secufiles.com/rejS/ThuyEAddin.dll

64
https://secufiles.com/rejT/ThuyEAddin.dll

 

[thuyyeu99]

Cái Dll này không giống cái Dll anh Tuân chỉ, chỉ cần Reg 32 đăng ký là ok

Bài đã được tự động gộp: 19/9/19

Office 16 + win 10 32 ok

 

[huonglien1901]

Em tải về báo lỗi, googlw chorme nó chặn không cho tải

Em tải về khi add vào nó báo lỗi.

Win10 64 bit office 2016

 

[Kiều Mạnh]

Em tải về báo lỗi, googlw chorme nó chặn không cho tải
View attachment 225208
Em tải về khi add vào nó báo lỗi.

Win10 64 bit office 2016
View attachment 225206

Run As Excel xong Add nó là vào

 

[huonglien1901]

Run As Excel xong Add nó là vào

Em add nó không add vào.
bản 32 thì báo lỗi.
bản này 64 thì nó không add vào

 

[thuyyeu99]

bạn đăng ký regsvr32 xx.dll

 

[huonglien1901]

bạn đăng ký regsvr32 xx.dll

Cách đăng ký regsvr32 xx.dll như thế nào vậy chị?

Em cảm ơn chị nhiều!

 

[Kiều Mạnh]

áp dụng viết Add-in hay đó
Nhưng ko biết xài code trong đó sao ??? khai báo API hay cái gì !!! @thuyyeu99 he

 

[thuyyeu99]

Run
REGSVR32 C:\Windows\System32\xxx.dll
hay tao file .bat trong cung thu muc với dll
REGSVR32 xxx.dll

 

[thuyyeu99]

áp dụng viết Add-in hay đó
Nhưng ko biết xài code trong đó sao ??? khai báo API hay cái gì !!! @thuyyeu99 he

Giám đốc Tặng Sim đẹp đi, em Share luôn hihihihi

 

[Kiều Mạnh]

Giám đốc Tặng Sim đẹp đi, em Share luôn hihihihi

Share đi he
đoán 1 chút cấu trúc customUI trên Delphi nó khác trên VBA 1 tẹo nhỉ
tại trên VBA biết chút đỉnh giờ qua Delphi thì nó cũng nhanh thôi

Code sau là mẫu trên Delphi đó he

function TDelphiAddin4.GetCustomUI(const RibbonID: WideString): WideString;
begin
  result:=
    '<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" loadImage="GetImage">'#13#10 +
    '  <ribbon>'#13#10 +
    '    <tabs>'#13#10 +
    '      <tab id="myglaTab" label="Mygla">'#13#10 +
    '        <group id="myglaGroup1" label="Mygla''s">'#13#10 +
    { ... }
    '          <button id="MyglaButton12" size="large" image="Mygla.png" onAction="RibbonClick"/>'#13#10 +
    { ... }
    '        </group>'#13#10 +
    '     </tab>'#13#10 +
    '   </tabs>'#13#10 +
    '  </ribbon>'#13#10 +
    '</customUI>';
end;

 

[thuyyeu99]

hihihiihihi

Bài đã được tự động gộp: 20/9/19

Share đi he
đoán 1 chút cấu trúc customUI trên Delphi nó khác trên VBA 1 tẹo nhỉ
tại trên VBA biết chút đỉnh giờ qua Delphi thì nó cũng nhanh thôi

Code sau là mẫu trên Delphi đó he

function TDelphiAddin4.GetCustomUI(const RibbonID: WideString): WideString;
begin
  result:=
    '<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" loadImage="GetImage">'#13#10 +
    '  <ribbon>'#13#10 +
    '    <tabs>'#13#10 +
    '      <tab id="myglaTab" label="Mygla">'#13#10 +
    '        <group id="myglaGroup1" label="Mygla''s">'#13#10 +
    { ... }
    '          <button id="MyglaButton12" size="large" image="Mygla.png" onAction="RibbonClick"/>'#13#10 +
    { ... }
    '        </group>'#13#10 +
    '     </tab>'#13#10 +
    '   </tabs>'#13#10 +
    '  </ribbon>'#13#10 +
    '</customUI>';
end;

Vậy thì mò đi hehehehe

 

[Kiều Mạnh]

Eo ôi thế ko share à

 

[thuyyeu99]

Eo ôi thế ko share à

anh có rồi Share gì nữa trời

 

[Kiều Mạnh]

anh có rồi Share gì nữa trời

đâu có bất chợt tới trang sau nó có nói sơ bộ qua nên đoán thế

Excel COM Add-Ins with Delphi Part III | My Glade

Mới làm xong nhờ các Bạn test dùm ... Ai đam mê Delphi vào link trên tìm là thấy Code Mẫu he
Nó như cái DLL @Nguyễn Duy Tuân chỉ đó thôi chỉ khác thêm mấy cái Hàm kết nối qua COM .... hehehehe

 

[thuyyeu99]

đâu có bất chợt tới trang sau nó có nói sơ bộ qua nên đoán thế

Excel COM Add-Ins with Delphi Part III | My Glade

Mới làm xong nhờ các Bạn test dùm ... Ai đam mê Delphi vào link trên tìm là thấy Code Mẫu he
Nó như cái DLL @Nguyễn Duy Tuân chỉ đó thôi chỉ khác thêm mấy cái Hàm kết nối qua COM .... hehehehe

Giỏi hỉ Hihihi

 

[Kiều Mạnh]

Giỏi hỉ Hihihi

Vọc vài ngày coi sao xong viết cái customUI trên VBA tạo sẳn hết xong ghép nó vào Delphi chứ làm tay chắc chết quá

 

[thuyyeu99]

Vọc vài ngày coi sao xong viết cái customUI trên VBA tạo sẳn hết xong ghép nó vào Delphi chứ làm tay chắc chết quá

Tạo được menu là ổn lắm rồi, bay giờ còn tạo event workbook nữa là đẹp hihi

 

[Kiều Mạnh]

Tạo được menu là ổn lắm rồi, bay giờ còn tạo event workbook nữa là đẹp hihi

Mò đi xong chỉ mạnh với
Còn cái menu thực ra mạnh có code mẫu lâu rồi có điều chưa thật sử để ý tới nó .... bất chợt có thớt này nhớ lại mới làm sáng nay thôi
Cơ bản vậy là xong he

 

[thuyyeu99]

Mò đi xong chỉ mạnh với
Còn cái menu thực ra mạnh có code mẫu lâu rồi có điều chưa thật sử để ý tới nó .... bất chợt có thớt này nhớ lại mới làm sáng nay thôi
Cơ bản vậy là xong he

Anh còn trang nào hay nữa không

 

[Kiều Mạnh]

Mạnh đang suy nghĩ lúc nào rảnh viết chuẩn lại thành 2 Unit khi nào viết Cái DLL nào cần thiết thì Uses nó vào là xong hay cứ Uses sẳn vào đó thì Cũng ko tốm kém mấy dung lượng vậy là ta được 2 cái trong 1

1/ Thư viện hàm API
2/ Menu xài khi cần thiết ( Viết các hàm chuẩn nhất vào đó )
....
quá trình học tập cải tiến và viết thêm code vào 2 Unit đó là ok
cứ thế mài dùi đục mài diết có ngày thành cái kim he

thong thả có nhiều trang hay ....