Skip to content

Instantly share code, notes, and snippets.

@furyutei
Last active April 21, 2024 04:43
Show Gist options
  • Save furyutei/b27b53675e6c09d1e0b58e05b22fe117 to your computer and use it in GitHub Desktop.
Save furyutei/b27b53675e6c09d1e0b58e05b22fe117 to your computer and use it in GitHub Desktop.
[VBE] VBEThemeColorEditor/VBEThemeColorTool用テーマ集(仮)

[VBE] VBEThemeColorEditor/VBEThemeColorTool用テーマ集(仮)

VBEThemeColorTool(VBEThemeColorEditor用のテーマファイルを適用するためのコマンドラインツール)で使用できるテーマ集(予定)。

使い方

基本的には、適当なフォルダ(例ではVBETheme)下に

VBETheme\
    vbetctool.exe  
    各バッチ(*.bat)ファイル  
    Themes\
        各テーマ(*.xml)ファイル  

のように置いておき、Microsoft Office製品(VBAが使えるもの)をすべて終了したことを確認後、適用したいテーマに対応したバッチファイル(*.bat)を管理者として実行すると、VBEに当該テーマが適用されるはず。

vbetctool.exeについては、こちらから最新版をダウンロードし、ZIPファイルを解凍してdist下にあるものを使用すること。
※詳細はVBEThemeColorEditorのREADMEを参照。

VBEThemeColorEditorに含まれる実行ファイル(VBEThemeColorEditor.exe)でテーマファイルを読み込むと、パレット(色)を確認できる(ただし、VBE.DLLへの適用(Apply theme to VBE.DLL)するとVBE.DLLが壊れてVBEの動作が不安定になる可能性があるため、誤って適用してしまわないように要注意)。

テーマ

Monokai like Theme

Monokai的なのを目指して挫折したもの。

要件

  • vbetctool>=0.1.3

ファイル

利用イメージ

image

<?xml version="1.0" encoding="UTF-8"?>
<!--//
[Monokai](https://monokai.nl/)-like Theme
//-->
<VbeTheme name="MonokaiLike" desc="Monokai-like Theme">
<ThemeColors>
<Color colorID="1" HexColor="E6DB74" />
<Color colorID="2" HexColor="F8F8F2" />
<Color colorID="3" HexColor="FD971F" />
<Color colorID="4" HexColor="88846F" />
<Color colorID="5" HexColor="66D9EF" />
<Color colorID="6" HexColor="AE81FF" />
<Color colorID="7" HexColor="272822" />
<Color colorID="8" HexColor="565A59" />
<Color colorID="9" HexColor="F92672" />
<Color colorID="10" HexColor="86B42B" />
<Color colorID="11" HexColor="333333" />
<Color colorID="12" HexColor="C4265E" />
<Color colorID="13" HexColor="B3B42B" />
<Color colorID="14" HexColor="6A7EC8" />
<Color colorID="15" HexColor="8C6BC8" />
<Color colorID="16" HexColor="56ADBC" />
</ThemeColors>
</VbeTheme>
@echo off
pushd "%~dp0"
setlocal
set VBE7DLL64="C:\Program Files\Microsoft Office\root\vfs\ProgramFilesCommonX64\Microsoft Shared\VBA\VBA7.1\VBE7.DLL"
set VBE7DLL32="C:\Program Files (x86)\Microsoft Office\root\vfs\ProgramFilesCommonX86\Microsoft Shared\VBA\VBA7.1\VBE7.DLL"
if exist %VBE7DLL64% (
set VBE7DLL=%VBE7DLL64%
) else if exist %VBE7DLL32% (
set VBE7DLL=%VBE7DLL32%
) else (
echo VBE7.DLL not found.
goto CLEANUP
)
set ThemeXml=".\Themes\MonokaiLike.xml"
set ForeColors="1 2 2 3 2 4 5 2 6 1 0 0 0 0 0 0"
set BackColors="7 8 9 7 10 7 7 7 7 7 0 0 0 0 0 0"
set IndicatorColors="delete"
vbetctool -l %VBE7DLL% -t %ThemeXml% -f %ForeColors% -b %BackColors% -i %IndicatorColors% -V
:CLEANUP
popd
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment