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

BOTON PARA BORRAR CONTENIDO DE UN RANGO

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 : 37
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
avatar
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
avatar
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 : 37
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í.

avatar
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 : 37
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
avatar
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 : 37
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


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba


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