Protected Sheet and Cell Formating


Board Regular
Jun 10, 2018
I created a document, Job Card, for our technicians to fill in after completion of work. There is plenty formulas in there as well as certain size constraints for printing purposes. Therefore I protected the sheet with a password. Pretty straight forward.
Some of the technicians want to be able to change the font for the sections that they fill in. (Kind of a personal signature/personality thing) I have no issues with that. Firstly I would like to create a VBA code for them to be able to do this. I will create my code by selecting all the ranges that they is filled in, including those with the formulas that is locked. They must choose the font name, and enter that into a provided space/cell and run the code by means of a form control button. One of my issues that I currently have is that when some fonts are chosen, the cell width or height are automatically adjusted. I would like to prevent this, as this will affect the print region. Especially if the cells are now bigger than before.

Is there some code that I can use to prevent the cells from auto size with a font change?

Thanks in advance for your assistance.

Some videos you may like

Excel Facts

Best way to learn Power Query?
Read M is for (Data) Monkey book by Ken Puls and Miguel Escobar. It is the complete guide to Power Query.

Gerald Higgins

Well-known Member
Mar 26, 2007
Oh wow, if this was me I definitely would NOT want to allow users to change the font to suit themselves.
But if you want to do that, why not include within your existing code, some new code towards the end to reset the row height / column width back to whatever they should be.

Watch MrExcel Video

Forum statistics

Latest member

This Week's Hot Topics

  • Timer in VBA - Stop, Start, Pause and Reset
    [CODE=vba][/CODE] Option Explicit Dim CmdStop As Boolean Dim Paused As Boolean Dim Start Dim TimerValue As Date Dim pausedTime As Date Sub...
  • how to updates multiple rows in muliselect listbox
    Hello everyone. I need help with below code. code is only chaning 1st row in mulitiselect list box. i know issue with code...
  • Delete Row from Table
    I am trying to delete a row from a table using VBA using a named range to find what I need to delete. My Range is finding the right cell. In the...
  • Assigning to a variable
    I have a for each block where I want to assign the value in column 5 of the found row to the variable Serv. [CODE=vba] For Each ws In...
  • Way to verify information
    Hi All, I don't know what to call this formula, and therefore can't search. I have a spreadsheet with information I want to reference...
  • Active Cell Address – Inactive Sheet
    How to use VBA to get the cell address of the active cell in an inactive worksheet and then place that cell address in a location on the current...