none
Visual BASIC (VBA) RRS feed

  • Pergunta

  • Como consegue-se, a partir do visual basic colocar número abaixo do texto. ou seja no meu caso é uma fórmula quimica C5H3S2 que advém já de fórmulas . Ou seja, não é diretamente escrita no excel pois assim seria fácil mas sim vem a partir de fórmulas anteriores

    Obrigado

    Cumprimentos,

    Luís Ribeiro

    segunda-feira, 17 de outubro de 2016 14:22

Todas as Respostas

  • Sub Main()
        Dim iCell As Range
        Dim j As Long
        
        For Each iCell In Selection
            For j = 1 To iCell.Characters.Count
                If IsNumeric(iCell.Characters(j, 1).Text) Then
                    iCell.Characters(j, 1).Font.Subscript = True
                End If
            Next j
        Next iCell
    End Sub
    


    http://www.ambienteoffice.com.br - http://www.clarian.com.br

    segunda-feira, 17 de outubro de 2016 16:44
    Moderador