de primer año, como me voy a una hoja?
Publicado por enrique54 (90 intervenciones) el 28/01/2010 00:29:02
he hecho esta macro para ir a una hoja en concreto, seleccionando la celda y digitando el texto que necesito con las caracteristicas de color, pero hace todo menos el brincar a la hoja indicada
el codigo es el siguiente:
Dim tex As String, celda As String, hoja As String
hoja = InputBox("Escribe que hoja quieres que aparezca") 'no se como se llama a la hoja
celda = InputBox("Escribe la celda a donde quieres ir")
tex = InputBox("escribe lo que quieras que parezca")
'Worksheets(hoja).Activate 'aqui lo intento pero no me obedece
ActiveSheet.Range(celda).Value = tex
With ActiveSheet.Range(celda)
.Font.Bold = True
.Font.Color = RGB(0, 0, 255)
End With
agradecere mucho la ayuda del foro
el codigo es el siguiente:
Dim tex As String, celda As String, hoja As String
hoja = InputBox("Escribe que hoja quieres que aparezca") 'no se como se llama a la hoja
celda = InputBox("Escribe la celda a donde quieres ir")
tex = InputBox("escribe lo que quieras que parezca")
'Worksheets(hoja).Activate 'aqui lo intento pero no me obedece
ActiveSheet.Range(celda).Value = tex
With ActiveSheet.Range(celda)
.Font.Bold = True
.Font.Color = RGB(0, 0, 255)
End With
agradecere mucho la ayuda del foro
Valora esta pregunta
0