Как сохранить линии сетки при заливке цвета в Excel?
Как мы все знаем, когда мы заполняем цвет фона для ячеек, линии сетки также будут покрыты, в этом случае, как мы можем сохранить линии сетки при заливке цвета фона в ячейках Excel, чтобы получить следующий снимок экрана.
Сохранять линии сетки при заливке цвета кодом VBA
Сохранять линии сетки при заливке цвета кодом VBA
Обычно у нас нет прямого способа решить эту задачу, но здесь я могу представить вам код VBA. Пожалуйста, сделайте следующее:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Слева Проект-VBAProject панель, дважды щелкните Эта рабочая тетрадь под расширенным ВБАПроект, затем скопируйте и вставьте следующий код VBA в пустой модуль:
Код VBA: сохранить линии сетки при заливке цвета
Dim xRgPre As Range
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
If Not xRgPre Is Nothing Then DrawBorders xRgPre
Set xRgPre = Target
End Sub
Private Sub DrawBorders(ByVal Rg As Range)
'Updateby Extendoffice 20160725
Dim xCell As Range
Application.ScreenUpdating = False
For Each xCell In Rg
If xCell.Interior.ColorIndex = xlNone Then
With xCell.Borders
If .ColorIndex = 15 Then
.LineStyle = xlNone
End If
End With
Else
With xCell.Borders
If .LineStyle = xlNone Then
.Weight = xlThin
.ColorIndex = 15
End If
End With
End If
Next
Application.ScreenUpdating = True
End Sub
3. А затем сохраните и закройте окно кода, теперь, когда вы заполняете цвет для диапазона ячеек, линии сетки будут отображаться автоматически.
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
