From 8d4180aa9449e4327408bfb6d817e11262ab71a4 Mon Sep 17 00:00:00 2001 From: RaoulJacobs Date: Mon, 27 Mar 2023 13:50:59 +0200 Subject: [PATCH] Update M_omExcel.def add SelectionUpdateBold Function --- M_omExcel.def | 3 +++ 1 file changed, 3 insertions(+) diff --git a/M_omExcel.def b/M_omExcel.def index ee5098b..75f16e8 100644 --- a/M_omExcel.def +++ b/M_omExcel.def @@ -50,6 +50,9 @@ Public Sub AutoFit() omExcelFunctions.AutoFitColumns xlWB.ActiveSheet omExcelFunctions.AutoFitRows xlWB.ActiveSheet End Sub +Public Sub SelectionUpdateBold(bold As Boolean) + UpdateFontOnSelection xlWB.ActiveSheet, bold +End Sub Private Sub Class_Terminate() Set xlWB = Nothing xlApp.Quit