SUBINDICE & SUPERINDICE

INDICES Tecla alt 252 ³
SUBINDICES alt 253 ²
COMILLAS alt 174 «
alt 175 «
Con la tabla que te adjunto lograrás mucha más velocidad en tu escritura,
creo que no hay otra formula para hacerlo

"Jon" escribió:

Hola a todos,

Aqui vengo con otra pregunta...

Hay muchas veces que me interesa que una parte de una celda esté en
superindice / subindice, pero no toda la celda. Se que se puede seleccionar
el texto e ir a Formatos - Celdas - Fuente y ahi seleccionarlo, pero es un
poco farragoso tener que hacer eso cada vez si tienes muchas celdas en las
que hacerlo.

En Word se puede sacar a la barra el boton para superindice y subindice,
pero no asi en Excel, o por lo menos no lo he encontrado.

Alguien sabe si se puede hacer de alguna forma? se puede sacar el boton a un
lado? se puede hacer por combinacion de teclas? por medio de alguna macro?

Muchas gracias a todos y saludos.

Jon

Hola Luis,
He hecho lo que me dices y solo me funciona el superindice, pero no el
subindice, sabes como es eso? donde puedo encontrar las combinaciones de
teclas ?
Gracias!

"Luis Torres" wrote:

INDICES Tecla alt 252 ³
SUBINDICES alt 253 ²
COMILLAS alt 174 «
alt 175 «
Con la tabla que te adjunto lograrás mucha más velocidad en tu escritura,
creo que no hay otra formula para hacerlo

"Jon" escribió:

> Hola a todos,
>
> Aqui vengo con otra pregunta...
>
> Hay muchas veces que me interesa que una parte de una celda esté en
> superindice / subindice, pero no toda la celda. Se que se puede seleccionar
> el texto e ir a Formatos - Celdas - Fuente y ahi seleccionarlo, pero es un
> poco farragoso tener que hacer eso cada vez si tienes muchas celdas en las
> que hacerlo.
>
> En Word se puede sacar a la barra el boton para superindice y subindice,
> pero no asi en Excel, o por lo menos no lo he encontrado.
>
> Alguien sabe si se puede hacer de alguna forma? se puede sacar el boton a un
> lado? se puede hacer por combinacion de teclas? por medio de alguna macro?
>
> Muchas gracias a todos y saludos.
>
> Jon

hola, Jon !

Hay muchas veces que me interesa que una parte de una celda este en superindice / subindice, pero no toda la celda.
Se que se puede seleccionar el texto e ir a Formatos - Celdas - Fuente y ahi seleccionarlo
pero es un poco farragoso tener que hacer eso cada vez si tienes muchas celdas en las que hacerlo.
En Word se puede sacar a la barra el boton para superindice y subindice, pero no asi en Excel, o por lo menos no lo he encontrado.
... se puede hacer de alguna forma? ... sacar el boton a un lado? ... por combinacion de teclas? por medio de alguna macro?

si lo ves de una forma "operativa-real" (aun en word)...
"tienes que..." seleccionar (primero) el caracter al cual se le aplicara el formato (sub/super)indice

una forma de hacerlo en excel de manera +/- interactiva (entre otras variantes y posibilidades) es por macros
- si tienes en una celda (p.e.) el texto H2O...
- y en el inputbox (que presenta la macro de ejemplo) introduces =>2b<=...
- el 2do caracter sera transformado a suBindice ;)
(creo que el comportamiento de la macro sera +/- claro')

=>claro que... tendras que indicarle la posicion exacta del caracter y... si quieres que sean varios... :((<
si cualquier duda (o informacion adicional)... comentas?
saludos,
hector.

en un modulo de codigo 'normal' ==Sub Super_Sub()
If ActiveCell.HasFormula Then Exit Sub
Dim Comando As String, Posicion As Integer
Comando = Application.Substitute(InputBox( _
"Indica la posicion del caracter (#) + el 'tipo' de indice." & vbCr & _
"'P' = suPerindice, 'B' = suBindice y 'N' = Normal", "Superindices y Subindices"), " ", "")
If Comando = "" Then Exit Sub
Posicion = Left(Comando, Len(Comando) - 1)
If Posicion > Len(ActiveCell) Then Exit Sub
With ActiveCell.Characters(Posicion, 1).Font
Select Case UCase(Right(Comando, 1))
Case "P": .Superscript = True
Case "B": .Subscript = True
Case Else: .Superscript = False: .Subscript = False
End Select
End With
End Sub

Hola Hector,
Muchas gracias. Viendo que no hay otra forma de hacerlo, pues así tendrá que
ser.
Saludos,
Jon

"Héctor Miguel" wrote:

hola, Jon !

> Hay muchas veces que me interesa que una parte de una celda este en superindice / subindice, pero no toda la celda.
> Se que se puede seleccionar el texto e ir a Formatos - Celdas - Fuente y ahi seleccionarlo
> pero es un poco farragoso tener que hacer eso cada vez si tienes muchas celdas en las que hacerlo.
> En Word se puede sacar a la barra el boton para superindice y subindice, pero no asi en Excel, o por lo menos no lo he encontrado.
> ... se puede hacer de alguna forma? ... sacar el boton a un lado? ... por combinacion de teclas? por medio de alguna macro?

si lo ves de una forma "operativa-real" (aun en word)...
"tienes que..." seleccionar (primero) el caracter al cual se le aplicara el formato (sub/super)indice

una forma de hacerlo en excel de manera +/- interactiva (entre otras variantes y posibilidades) es por macros
- si tienes en una celda (p.e.) el texto H2O...
- y en el inputbox (que presenta la macro de ejemplo) introduces =>2b<=...
- el 2do caracter sera transformado a suBindice ;)
(creo que el comportamiento de la macro sera +/- claro')

=>claro que... tendras que indicarle la posicion exacta del caracter y... si quieres que sean varios... :((<>
si cualquier duda (o informacion adicional)... comentas?
saludos,
hector.

en un modulo de codigo 'normal' ==> Sub Super_Sub()
If ActiveCell.HasFormula Then Exit Sub
Dim Comando As String, Posicion As Integer
Comando = Application.Substitute(InputBox( _
"Indica la posicion del caracter (#) + el 'tipo' de indice." & vbCr & _
"'P' = suPerindice, 'B' = suBindice y 'N' = Normal", "Superindices y Subindices"), " ", "")
If Comando = "" Then Exit Sub
Posicion = Left(Comando, Len(Comando) - 1)
If Posicion > Len(ActiveCell) Then Exit Sub
With ActiveCell.Characters(Posicion, 1).Font
Select Case UCase(Right(Comando, 1))
Case "P": .Superscript = True
Case "B": .Subscript = True
Case Else: .Superscript = False: .Subscript = False
End Select
End With
End Sub