............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

BOTON PARA BORRAR CONTENIDO DE UN RANGO

Ver el tema anterior Ver el tema siguiente Ir abajo

BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por arekmv el Jue Ago 08, 2013 8:11 am

hola a tod@s,

lo primero, ruego al moderador si esta consulta no es de este foro que lo traslade al que corresponda, por favor.

tengo una serie de números que sumar y me gustaría saber si hay la posibilidad de crear un boton o celda que me borre el contenido de ese rango, sin tener que seleccionarlo y borrar.

muchas gracias anticipadas y al foro por prestarme este espacio.

arekmv

Masculino Cantidad de envíos : 11
Edad : 36
Ciudad - Pais : buegos - españa
Version de Excel : 2007
Fecha de inscripción : 17/05/2013

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por renem el Mar Ago 13, 2013 11:37 pm

Hola, si el rango es fijo, algo fácil es lo indicado en el adjunto. Espero te sirva.
(no pude subir el adjunto pero indico el código)


Código:
Private Sub CommandButton1_Click()
   Sheets("Sheet1").Select
   Range("D5:E14").Select
   Selection.ClearContents
   Range("D5").Select
End Sub

renem

Cantidad de envíos : 82
Ciudad - Pais : Santiago - Chile
Fecha de inscripción : 05/11/2008

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por Tatayayan el Vie Ago 16, 2013 6:41 pm

Hola, podría abreviarse:

Private Sub CommandButton1_Click()
Sheets("Sheet1").Range("D5:E14").ClearContents
Sheets("Sheet1").Range("D5").Select
End Sub

Tatayayan
Moderador
Moderador

Masculino Cantidad de envíos : 319
Ciudad - Pais : Chamical- La Rioja - ARG
Fecha de inscripción : 20/11/2008

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por arekmv el Lun Ago 19, 2013 11:41 am

ok, gracias.

pero mi nivel de excel me indica que no sé dónde escribir esta cadena de texto ni luego como usarla.

alguna pista más, por favor.

arekmv

Masculino Cantidad de envíos : 11
Edad : 36
Ciudad - Pais : buegos - españa
Version de Excel : 2007
Fecha de inscripción : 17/05/2013

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por Tatayayan el Lun Ago 19, 2013 12:19 pm

mmm a ver.. aunque es complicado (por temor a confundirte), voy a tratar de ayudarte.
Supongamos que tienes Excel 2010, vas a la ficha (si no aparece, tienes que buscarla en opciones), y clic en el icono Visual Basic o presionas Alt + F11, con esto pasamos a Visual Basic para Applicaciones, instarmos un módulo y ahí colocamos:

Sub MiMacro()
Sheets("Sheet1").Range("D5:E14").ClearContents
Sheets("Sheet1").Range("D5").Select
End Sub

pasamos nuevamonete a Excel (otra vez Alt + F11) Enla ficha Programador / Insertar / Controles de formulario, elegimos botón (NO CONTROL ACTIVEX), aparece una ventana e indicamos la macro creada.

Otro "camino", insertar un botón pero de los ActiveX, una vez insertado doble clic sobre el y te llevará al editor de VBA, y colocas el código:

Private Sub CommandButton1_Click()
Sheets("Sheet1").Range("D5:E14").ClearContents
Sheets("Sheet1").Range("D5").Select
End Sub

O bien puedes insrtar una autoforma y asiganrle la macro creada, o bien crear un formulario con un botón y colocar el código allí.


Tatayayan
Moderador
Moderador

Masculino Cantidad de envíos : 319
Ciudad - Pais : Chamical- La Rioja - ARG
Fecha de inscripción : 20/11/2008

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por arekmv el Mar Ago 20, 2013 6:03 am

buenos días,

he procedido a hacer lo que me has indicado y me salta error de ejecución.

inserto el excel 2007 con lo que he hecho.

si puedes/podéis ayudarme, por favor.

arekmv

Masculino Cantidad de envíos : 11
Edad : 36
Ciudad - Pais : buegos - españa
Version de Excel : 2007
Fecha de inscripción : 17/05/2013

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por Tatayayan el Mar Ago 20, 2013 12:30 pm

Cambia donde dice Sheet1 por el nombre de la hoja en tu caso es Hoja1, osea debe quedar así:
Sub MiMacro()
Sheets("Hoja1").Range("D5:D14").ClearContents
Sheets("Hoja1").Range("D5").Select
End Sub


Private Sub CommandButton1_Click()
Sheets("Hoja1").Range("H5:H14").ClearContents
Sheets("Hoja1").Range("H5").Select
End Sub


osea lo que esta enre comillas es el nombre de la hoja, otro menejo es llamarlo por el nombre del objeto u referenciarlo por índice pero creo eso es avanzado para tí.

Salu2.xlsx

Tatayayan
Moderador
Moderador

Masculino Cantidad de envíos : 319
Ciudad - Pais : Chamical- La Rioja - ARG
Fecha de inscripción : 20/11/2008

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por arekmv el Jue Ago 22, 2013 8:50 am

MUCHISIMAS GRACIAS, MUCHISIMAS GRACIAS...etc, etc.... y así hasta desgastarme las yemas de los dedos.

cúanto tiempo voy a ahorrar.

Es que de macros no tengo ni papa y sin que te enseñen es muy complicado.

un saludo y gracias.

arekmv

Masculino Cantidad de envíos : 11
Edad : 36
Ciudad - Pais : buegos - españa
Version de Excel : 2007
Fecha de inscripción : 17/05/2013

Volver arriba Ir abajo

Re: BOTON PARA BORRAR CONTENIDO DE UN RANGO

Mensaje por Contenido patrocinado Hoy a las 11:24 pm


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.