Я хочу, чтобы пользователи загружали имя файла в «административную ячейку» (на которую есть ссылка в коде), и чтобы такая ячейка была «помечена» в произвольном формате чисел, поэтому дополнительный столбец слева от такого типа пропущен (Filename: XXX).
Для удобства чтения я намерен иметь «Имя файла» жирным шрифтом и «XXX» в обычном .fontStyle.
Похоже, что .characters.FontStyle не работает с ячейками с пользовательским числовым форматом (например, numberformat ="" "Имя файла .:" "@")
При установке ячейки в стандартный числовой формат применяются два .FontStyles.
Ручная настройка ячейки для полужирного и обратного через vba, только последний не работаетили.Установка пользовательского формата чисел после «корректировки» .FontSyle также не работает.
Sub test()
With Range("A1")
.NumberFormat = """Filename: ""@"
.Value = "Sample.csv"
lngPos = InStr(.Text, ":")
Debug.Print lngPos
With .Characters(Start:=1, Length:=lngPos - 1).Font
.FontStyle = "Bold"
End With
End With
With Range("A2")
.Value = "Filename: Sample.csv"
lngPos = InStr(.Text, ":")
Debug.Print lngPos
With .Characters(Start:=1, Length:=lngPos - 1).Font
.FontStyle = "Bold"
End With
End With
End Sub
Sample
Мне бы хотелось иметь состояние ячейки "Имя файла:Sample.csv "с" Filename: "выделено жирным шрифтом и Sample.csv в обычном стиле шрифта, но только" Sample.csv "в качестве cell.value