Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como mudar rapidamente o tamanho da fonte com base no valor da célula no Excel?

doc altera o tamanho da fonte com base no valor 7
No Excel, você pode alterar o tamanho da fonte da célula como quiser, mas você já tentou mudar o tamanho da fonte da célula com base em outro valor da coluna, conforme mostrado abaixo na tela? Neste artigo, eu introduzo algum código VBA para ajudá-lo a mudar rapidamente o tamanho da fonte com base no valor da célula no Excel.
Alterar o tamanho da fonte com base em outro valor da coluna

Alterar o tamanho da fonte com base no valor da célula e comprimento do caractere

Selecione células específicas

Com Kutools for Excel's Selecione células específicas utilitário, você pode selecionar células / linha / colunas com base em um ou dois critérios e, em seguida, formata-os conforme necessário, altere o tamanho da fonte, o fundo e assim por diante.

doc selecionar células específicas
Guia do Office Habilitar Edição e Navegação por Guias no Office e Facilitar seu Trabalho ...
Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%
  • Reutilizar qualquer coisa: Adicione as fórmulas, gráficos e outras coisas mais usadas ou complexas aos seus favoritos e reutilize-os rapidamente no futuro.
  • Mais do que recursos de texto 20: Extrair Número da Cadeia de Texto; Extrair ou remover parte dos textos; Converta números e moedas em palavras inglesas ...
  • Mesclar Ferramentas: Várias pastas de trabalho e folhas em um; Mesclar várias células / linhas / colunas sem perder dados; Mesclar linhas duplicadas e soma ...
  • Ferramentas de divisão: Dados divididos em várias folhas com base no valor; Uma pasta de trabalho para vários arquivos Excel, PDF ou CSV; Uma coluna para várias colunas ...
  • Colar pulando Linhas ocultas / filtradas; Contagem e Soma pela cor de fundo; Criar lista de discussão e Envie e-mails pelo valor da célula...
  • Super Filtro: Crie esquemas de filtro avançados e aplique a qualquer folha; tipo por semana, dia, frequência e mais; filtros por negrito, fórmulas, comentário ...
  • Mais de recursos poderosos do 300; Funciona com o Office 2007-2019 e 365; Suporta todos os idiomas; Fácil implantação em sua empresa ou organização.

arrow blue right bubble Alterar o tamanho da fonte com base em outro valor da coluna


Para alterar o tamanho da fonte com base em outro valor da coluna, aqui está um código VBA pode ajudá-lo.

1. Vá para a folha que deseja alterar o tamanho da fonte com base em outra coluna e pressione Alt + F11 chave simultaneamente para abrir Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Módulo, e depois cole abaixo VBA para o Módulo. Ver captura de tela:

VBA: altere o tamanho da fonte com base em outro valor da coluna

Sub fontchange()
'UpdatebyExtendoffice20160614
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Select cells that you want to change font size:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "Only can select one column", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xCell.Font.Size = xCell.Offset(, 1).Value
    Next
    Application.ScreenUpdating = True
End Sub

doc altera o tamanho da fonte com base no valor 2

3. Pressione F5 chave, uma caixa de diálogo aparece e selecione as células que deseja alterar o tamanho da fonte. Ver captura de tela:
doc altera o tamanho da fonte com base no valor 3

4. Clique OK, e, em seguida, as células na coluna selecionada foram ajustadas com o tamanho da fonte com base nos valores ao lado da coluna.
doc altera o tamanho da fonte com base no valor 4


arrow blue right bubble Alterar o tamanho da fonte com base no valor da célula e comprimento do caractere

Kutools for Excel, com mais de 120 Funções úteis do Excel, aprimore sua eficiência operacional e economize seu tempo de trabalho.

Por outro lado, se você deseja alterar o tamanho da fonte com base no próprio valor da célula ou comprimento do caractere, por exemplo, quando o valor da célula for maior do que o 10, ou o comprimento do caractere é superior a 5, então o tamanho da fonte será 16, e a mudança de fonte para Arial, caso contrário, o tamanho da fonte é 11 e a fonte é Calibri conforme mostrado abaixo.
doc altera o tamanho da fonte com base no valor 5

1. Pressione Alt + F11 chaves para habilitar Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Módulo, e cole abaixo o código para Módulo roteiro. Ver captura de tela:

VBA: mude o tamanho da fonte com base no valor da célula ou comprimento do caractere

Private Sub Worksheet_Calculate()
'UpdatebyExtendoffice20160614
    Dim xCell As Range
    For Each xCell In Range("G2:H9")
        With xCell
            If Len(.Text) > 5 Or Val(.Value) > 10 Then
                .Font.Name = "Arial"
                .Font.Size = 16
            Else
                .Font.Name = "Calibri"
                .Font.Size = 11
            End If
        End With
    Next
End Sub

doc altera o tamanho da fonte com base no valor 6

3. Pressione F5 chave para executar o código, e os valores que são maiores do que 10 ou comprimento do caractere são mais do que 5 foram alterados sua fonte para Arial e tamanho da fonte para 16.

Dica: No código acima, você pode alterar o intervalo G2: B9 para outros como desejar.

download do doc 1


Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Inserir rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de endereços e enviar e-mails ...
  • Bar Super Fórmula (facilmente editar várias linhas de texto e fórmula); Layout de leitura (leia e edite facilmente grandes números de células); Colar para intervalo filtrado...
  • Mesclar células / linhas / colunas sem perder dados; Conteúdo de células divididas; Combinar linhas / colunas duplicadas... Prevenir Células Duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Exclusivo Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros de trabalho; Seleção aleatória ...
  • Cópia exata Múltiplas Células sem alterar a referência da fórmula; Criar automaticamente referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair texto, Adicionar texto, remover por posição, Remover espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salve e aplique esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro especial por negrito, itálico ...
  • Combinar pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Dividir dados em várias planilhas; Lote Converter xls, xlsx e PDF...
  • Mais de recursos poderosos do 300. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos Avaliação gratuita de um dia de 30.
kte tab 201905

A guia Office traz a interface com guias para o Office e torna seu trabalho muito mais fácil

  • Ativar edição e leitura com guias no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
fundo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.