返回带有字体颜色的文本 [英] Return text with font colour

问题描述

嗨 



例如，有没有办法执行以下操作？ 



例如，在单元格B1中，我想要A1中的任何内容，但使用相同的文本颜色。 



所以如果A1那么是红色的'你好' B1将以红色返回'hello' 



谢谢

推荐答案

如果是源列可以像列1 - 10一样确定，你可以像这样编码：

Hi,

If source column can be determined like column 1 - 10, you can make code like this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim myRow As Integer
    For myRow = 1 To 100
        Cells(myRow, 2).Font.Color = Cells(myRow, 1).Font.Color
    Next
End Sub

活跃单元格为A1

  
$
选择单元格B4（选择更改） 

  
$
____________

Ashidacchi

active cell is A1
  
cell B4 is selected (selection change)  
  
____________
Ashidacchi

这篇关于返回带有字体颜色的文本的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！