Czy wiesz, ze dajac komus plik excela mozesz miec rowniez wplyw na wyglad samego programu (np. wstazki)? (office 2007-2016, na nowszym nie testowalem)
Jak zapewne wiesz, plik excela to tak na prawde spakowane w formacie zip rozne pliki i katalogi - zmieniajac rozszerzenie na .zip mozna zajrzec do sroka i/lub wypakowac zawartosc. Stworz teraz nowy plik, zapisz go jako plik excela z makrami (.xlsm), zamknij program, a nastepnie zmien rozszerzenie pliku na .zip. Teraz wypakuj zawartosc.
Utworz nowy katalog (folder) i nazwij go customUI. W srodku stworz plik o nazwie customUI.xml i do srodka wklej ponizszy kod:
Niestety to jeszcze nie koniec. Teraz idz do katalogu _rels i otworz w notatniku plik .rels Odnajdz linijke:
`
i zaraz za nia wklej: `
zapisz plik i zamknij.
Teraz z rozpakowanych plikow i katalogow utworz plik .zip, po czym zmien jego rozszerzenie na .xlsm
Po jego otwarciu powinienes zobaczyc to, co na obrazku nizej.
Oczywiscie klikanie na ikonach bedzie skutkowac informacja o bledzie, bo nie ma stworzonych odpowiednich makr. By je dodac - idz do edytora kodu VBA i stworz odpowiednie procedury, np dla przykladu wyzej:
' kod vba Sub smietnik(ByVal control As IRibbonControl) MsgBox "a tu smietnik" End Sub
Sub czarnolisto(ByVal control As IRibbonControl) MsgBox "czarnolisto!" End Sub Mozesz tez nie usuwac standardowych wstazek, ale dodac cos do istniejacych. W tym celu ustaw startFromScratch na "false" zamiast "true", a w customUI uzyj kodu ponizej do zastapienia sekcji :
w ten sposob dwa przyciski zostana dodane do wstazki Home.
Do czego moze sie to przydac? Np. zamiast powtarzac jakies kontrolki do uruchamiania makr na kazdym arkuszu w pliku, do ograniczenia dzialan uzytkownika (oprocz zabezpieczenia arkusza) i co tylko jeszcze przyjdzie ci do glowy.
Jak zapewne wiesz, plik excela to tak na prawde spakowane w formacie zip rozne pliki i katalogi - zmieniajac rozszerzenie na .zip mozna zajrzec do sroka i/lub wypakowac zawartosc. Stworz teraz nowy plik, zapisz go jako plik excela z makrami (.xlsm), zamknij program, a nastepnie zmien rozszerzenie pliku na .zip. Teraz wypakuj zawartosc.
Utworz nowy katalog (folder) i nazwij go customUI. W srodku stworz plik o nazwie customUI.xml i do srodka wklej ponizszy kod:
Niestety to jeszcze nie koniec. Teraz idz do katalogu _rels i otworz w notatniku plik .rels
Odnajdz linijke:
`
`i zaraz za nia wklej:
zapisz plik i zamknij.
Teraz z rozpakowanych plikow i katalogow utworz plik .zip, po czym zmien jego rozszerzenie na .xlsm
Po jego otwarciu powinienes zobaczyc to, co na obrazku nizej.
Oczywiscie klikanie na ikonach bedzie skutkowac informacja o bledzie, bo nie ma stworzonych odpowiednich makr. By je dodac - idz do edytora kodu VBA i stworz odpowiednie procedury, np dla przykladu wyzej:
' kod vba
Sub smietnik(ByVal control As IRibbonControl)
MsgBox "a tu smietnik"
End Sub
Sub czarnolisto(ByVal control As IRibbonControl)
MsgBox "czarnolisto!"
End Sub
Mozesz tez nie usuwac standardowych wstazek, ale dodac cos do istniejacych. W tym celu ustaw startFromScratch na "false" zamiast "true", a w customUI uzyj kodu ponizej do zastapienia sekcji :
w ten sposob dwa przyciski zostana dodane do wstazki Home.
Do czego moze sie to przydac? Np. zamiast powtarzac jakies kontrolki do uruchamiania makr na kazdym arkuszu w pliku, do ograniczenia dzialan uzytkownika (oprocz zabezpieczenia arkusza) i co tylko jeszcze przyjdzie ci do glowy.
Lista ikon do uzycia jako imageMso: https://www.spreadsheet1.com/office-excel-ribbon-imagemso-icons-gallery-page-01.html
#excel #vba #office
źródło: comment_1612637881ZWQZEQQNihkpfHIEw5pFAs.jpg
Pobierz