Foros del Web » Soporte técnico » Software General »

necesito crear un formularios con macros en excel

Estas en el tema de necesito crear un formularios con macros en excel en el foro de Software General en Foros del Web. necesito crear un formulario en vb para excel que tenga 1 listbox y que cuando seleccione uno o mas valores, seleccione e imprima los rangos ...
  #1 (permalink)  
Antiguo 01/03/2004, 10:44
 
Fecha de Ingreso: febrero-2004
Ubicación: valparaiso
Mensajes: 9
Antigüedad: 20 años, 2 meses
Puntos: 0
Exclamación necesito crear un formularios con macros en excel

necesito crear un formulario en vb para excel que tenga 1 listbox
y que cuando seleccione uno o mas valores, seleccione e imprima los rangos a los que dichos valores seleccionados hacen referencia

ejemplo:

valor a = range("a1:b2")
valor b = range("a3:b4")
valor c = range("a5:b6")

seleccionar e imprimir de la lista los valores a y c solamente


de antemano gracias
  #2 (permalink)  
Antiguo 02/03/2004, 07:35
Avatar de judoka  
Fecha de Ingreso: enero-2004
Ubicación: viña del mar
Mensajes: 180
Antigüedad: 20 años, 3 meses
Puntos: 3
Hola
debes un rango con las opciones
a, b, c
por ejemplo en d12,d13,d14
luego agregas un un cuadro combinado
y le asignas el rango d12:d14
y lo vinculas con una celda por ejemplo b14
luego en la opcion codigo del cuadro combinado
copias la macro siguiente:

Sub Listadesplegable2_AlCambiar()
rango = Cells(14, 2).Value
Select Case rango
Case 1
Range("a1", "b2").Select
Case 2
Range("a3", "b4").Select
Case 3
Range("a5", "b6").Select
End Select
respuesta = MsgBox("Desea Imrimir", vbYesNo, "Imprimir")
If respuesta = vbYes Then ' El usuario eligió el botón Sí.
Selection.PrintOut Copies:=1, Collate:=True
Else ' El usuario eligió el botón No.
MiCadena = "No" ' Ejecuta una acción.
End If

End Sub

espero te sirva...
__________________
hay tres tipos de matemáticos, los que saben contar y los que no.
Oscar
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 01:45.