UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1RESUELTO cuadro de la lista y macro el 12/04/15, 05:02 am

jose235


Hola a todos
### el problema radica que al ejecutar el macro quiero que se copie el valor de la celda A1 ""que yo voy cambiando" pero el macro siempre copia el valor de cuando se creo el macro, alguien me puede ayudar a que el macro solo coja  los valores  de la celda A1 y luego los copie:cambiar el texto en rojo.
gracias por vuestra ayuda What a Face lol!



Sub Macro100()
'
' Macro100 Macro
'
'
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "textoceldaA1"
    Range("A10").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=textoceldaA1"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

2RESUELTO Re: cuadro de la lista y macro el 12/04/15, 09:49 pm

Igtelo


Hola José.

Si te entendí creo que esto te funciona:

Sub Macro100()

    With Range("A10").Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:=Range("A1")
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

Escribe en A1, ejecutas la macro y te cambia en A10.

Si quieres que sea por evento en la Hoja que lo uses (1,2,3,etc) dentro de VBA pega esto:

Private Sub Worksheet_Change(ByVal Target As Range)
Macro100
End Sub

Saludos
Ignacio Téllez

3RESUELTO cuadro de lista y macro el 13/04/15, 12:53 pm

jose235


Muy agracedido por la respuesta, si era esto lo que estaba buscando.

Solo falta introducir en la macro un igual delante del "="A1 para que el cuadro de la lista sea desplegable.
yo no se como hacerlo. te agradeceria que si puedes me lo soluciones.

de todas formas lo que me mandastes me soluciona un monton de trabajo,, gracias.

saludos, Arrow

4RESUELTO Re: cuadro de la lista y macro el 13/04/15, 09:34 pm

Igtelo


Hola José.

Hazlo con el grabador de macros y éste te dará la fórmula.

Saludos
Ignacio Téllez

5RESUELTO MACROS Y CUADRO DE LA LISTA el 14/04/15, 11:45 am

jose235


HOLA ,

gracias de nuevo
No he podido solucionarlo con el gravador pero lo he solucionado & dos celdas, y funciona correctamente.

algun manual basico para comprender el lenguaje de vba. lo cierto es q no tengo ni idea.
y aprendo a trompicones.

Saludos y gracias. Arrow

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

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