Crear boton "Salir"

02/01/2007 - 17:57 por Rafa | Informe spam
Saludos y Feliz Año nuevo 2007 para todos.

Agradecería me ayudaran para crear en una hoja de Excel 2003 un botón que al
pulsarlo se cerrara la hoja sin necesidad de pulsar en "Archivo" "Salir" o
en el ángulo superior derecho en "X"
Muchas gracias por vuestra colaboración, saludos.

Preguntas similare

Leer las respuestas

#1 Ivan
02/01/2007 - 18:23 | Informe spam
hola Rafa

una posibilidad a falta de mas detalles ->

insertas un boton de comando de la barra de herramientas "Barra de
controles" (lo clickas y haces click donde quieras de la hoja) ->
click derecho sobre el boton-> ver codigo -> en el panel que se te abre
y exactamente donde se situa el cursor (debajo de 'Private Sub
CommandButton1_Click()' y antes de 'End Sub' )pegas esto ->

CommandButton1.Caption="Salir"
Thiworkbook.Close

-> cierras el editor de vba -> desactivas el modo diseño y -> ..

dale al boton a ver si te vale

espero te sirva
Un saludo
Ivan
Respuesta Responder a este mensaje
#2 Ivan
02/01/2007 - 18:26 | Informe spam
perdon, como siempre me he comido algo (una s)

pega esto ->

CommandButton1.Caption="Salir"
ThisWorkbook.Close

un saludo
Respuesta Responder a este mensaje
#3 Ivan
02/01/2007 - 18:31 | Informe spam
otra vez perdon

pega solo esto ->

ThisWorkbook.Close

y cuando cierres el editor nuevo boton derecho sobre el boton ->
Propiedades -> seleccionas 'Caption' -> escribes "Salir" sin las
comillas -> cierra el cuadro propiedades -> desactiva el modo diseño
(boton con escuadrita) y prueba a ver que pasa

un saludo
Ivan
Respuesta Responder a este mensaje
#4 Rafa
02/01/2007 - 18:49 | Informe spam
Muchas gracias Iván por tus molestias, pero siento decirte que no me entero
de nada de lo que me has explicado.
Gracias de nuevo.

"Ivan" escribió en el mensaje
news:
otra vez perdon

pega solo esto ->

ThisWorkbook.Close

y cuando cierres el editor nuevo boton derecho sobre el boton ->
Propiedades -> seleccionas 'Caption' -> escribes "Salir" sin las
comillas -> cierra el cuadro propiedades -> desactiva el modo diseño
(boton con escuadrita) y prueba a ver que pasa

un saludo
Ivan
Respuesta Responder a este mensaje
#5 Ivan
02/01/2007 - 22:07 | Informe spam
hola de nuevo Rafa

a ver si puedo ser un poco mas claro

en excel existe una barra de herramientas que se llama 'Cuadro de
controles'. S i no la tienes visible sigue los siguientes pasos

1º desliega el menu 'Ver'
2º elige en el : -> 'Barras de herramientas'
3º en la lista desplegable que aparece marca la opcion 'Cuadro de
controles'

se te habra colocado una nueva barra de herramientas juanto a las
otras. Para asegurarte de cual es puedes volver a seguir los anteriores
pasos y desmarcarla / marcarla varias veces hasta que estes seguro de
cual es.

su primer boton (suele ser 'Modo edicion' (una escuadra, una regla y un
lapiz dibujados). Olvidate de el por el momento y recorre con el cursor
por encima de los demas botones hasta que encuentres uno que diga en el
desplegable mas o menos esto :-> 'Boton de comando'.

-> haz click en el y ve al sitio de la hoja donde quieras colocar el
boton.

-> vuelve a hacer click.

deberia aparecerte un boton con el texto CommandButton1 dentro (a no
ser que tengas ya otros botones incrustados, en cuyo caso pondria el
numero que le correspondiera)

ahora tienes (al menos) dos opciones

-> bien hacer click con el boton derecho del raton dentro del boton
(CommandButton1) y en el desplegable que aparece elegir la opcion 'Ver
codigo',

-> o bien ir a la misma barra de herramientas (con el CommandButton1
seleccionado) y buscar el boton 'Ver codigo' y pulsarlo

ahora se te deberia abrir una nueva ventana (el editor de Visual Basic)
en la cual deberia aparecer sobre una especie de hoja en blanco algo
parecido a esto->


Private Sub CommandButton1_Click()

End Sub

que es el principio y el final del procedimiento (o codigo) que se
ejecutara cuando hagas Click en el boton que has insertado en la hoja

en medio es donde deberias pegar/ copiar la instruccion que te
comentaba ->

ThisWorkbook.Close

y quedaria mas o menos asi ->

Private Sub CommandButton1_Click()
ThisWorkbook.Close
End Sub

una vez echo esto cierras el editor (x superior dcha de la ventana) y
te encuentras otra vez en excel

ahora el boton ya realizaria lo que querias (cerrar el "libro", no la
hoja, que no puede cerrarse), pero supongo que te gustaria que tubiera
un texto descriptivo, y no el commandbutton1 que aparece por defecto

para ello otra vez dos opciones + o - iguales a las anteriores ->

-> bien hacer click con el boton derecho del raton dentro del boton
(CommandButton1) y en el desplegable que aparece elegir la opcion
Propiedades',

-> o bien ir a la misma barra de herramientas (con el CommandButton1
seleccionado) y buscar el boton 'Propiedades' y pulsarlo

ahora deberia aparecerte una pequeña ventana llamada 'Propiedades' que
contiene las idem del boton

veras que esta formada por una lista de das columnas-> la 1ª contiene
el nombre de las diversas propiedades del boton y la 2º el valor que
tienen asignado dichas propiedades (las que lo tienen)

si buscas te daras cuenta de que una de las propiedades de esa columna
izqda. se llama 'Caption' -> esta propiedad es la que define el
texto/titulo/rotulo (llamalo x) que aparecera en el boton

ahora solo tienes que seleccionar la casilla dcha. correspondiente a
'Caption' y escribir (tras borrar CommandButton1, o simplemente
sobreescribirlo) lo que quieras que aparezca en el boton pej: 'Salir',
'Cerrar', etc

una vez echo esto, cierras la ventana propiedades (click x superior
dcha) y vuelves a estar en la hoja, pero en teoria el boton seguira
seleccionado, pues te encuentras en modo diseño, por lo que
simplemente debe volver a ir a la barra 'Cuadro de controles' y pulsar
sobre el boton 'Modo diseño' para desmarcarlo y volver a un uso normal
de excel.

si analizas los pasos de los mensajes anteriores (metedura de pata con
el codigo aparte) veras que mas o menos dicen lo mismo pero
esquematizado, y te daras cuenta que cuando le cojas un poco el
tranquillo a esto ( si se tercia) resulta igual de claro pero mucho mas
breve.

bueno, espero me hayas entendido y te sea util

un saludo y hasta pronto
ivan
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida