Jump to content

meduvilla

Members
  • Content Count

    82
  • Joined

  • Last visited

Everything posted by meduvilla

  1. Maestro Antoni primero que todo, le estoy muy agradecido, pero muy agradecido por compartir sus conocimeinto y ayuda brindada (no soy programador) pero mecánicamente he aprendido algunas cositas en este mundo del excel. a Ud. y todos sus colegas les agradezco mucho por toda la tolerancia y paciencia. atte Milton Villarroel
  2. Buenas tardes Antoni - Haplox estimados bueno retomando dicha planilla en la cual trate de guiarme segun la programacion de Mr Antoni agregando mas textbox al formulario , pero al momento de digitar algun numero en casillero de Tolva me marca un error por favor es posible ayuden . adjunto archivo desde ya agradecido con uds. Copia de Reclamo Nvo v4.xlsm
  3. Haplox , maestro Antonio gracias, terminando mi laburo.. revisare esta gran ayuda .. nuevamente gracias por esta atencion ..
  4. Buenas Noches a todos, por favor me pueden ayudar en este tema ... estimados en este ejercicio me gustaria que los todos los Textbox y Label del formulario son 2 turnos diferentes se puedan ir a la hoja "Reclamo" y se carguen en culumnas segun corresponda desde ya muchas gracias a todos ayuexcel.xlsm
  5. Gracias Haplox, aplique otro codigo similar al que enviastes y me resulto . pero se me presenta otro problema .. quiero sumar varios textbox y que el resultado lo muestre de inmediato en el Ultimo textbox ( adjunto archivo) , me puedes ayudar.. parace facil.. pero...h ... sumar.xltm
  6. Buen dia estimados... por favor me pueden ayudar con esta solicitud Llevar los Valores de los textbox a las celdas que indique, pero Sin insertar celdas llevar textbox 26 a hoja "Reclamo " celda E8 llevar textbox 27 a hoja "Reclamo " celda F8 llevar textbox 28 a hoja "Reclamo " celda E9 llevar textbox 29 a hoja "Reclamo " celda F9 y en Textbox 51 Vaya Mostranto total desde ya muy agradecido de Uds Reclamo2.xlsm
  7. Disculpe master... Antonio, lo distraido y cansado en la madrugada.. sin afan de ofenderle cambiandole su nombre ...de significado "Valiente " si es verdad.. a veces ni idea .. pero tratando de aprender (cuesta mucho) esto que comense hace un par de meses.. pero de verdad muchas gracias por darse el tiempo de cooperarme... atte MIlton Villarroel
  8. gracias jerson , pero no ..aplica si es que selecciono varios elementos .. atte
  9. gracias tierra_pampa ... recien revise tu respuesta , ingreso el label3 y solamene lleva el la informacion a la columna E de esa etiqueta pero las demas labels no los considera ( son como 20 label con codigo)
  10. Buenas tardes Estimado Jerson... necesito cargar en la columna E de la hoja de salida el codigo del producto, seria posible tu ayuda en esta.. gracias existencias jerson pineda.xlsm
  11. Estimado Gerson . muchas gracias por tomarte el tiempo y dar respuesta a mi solicitud atte Milton
  12. Estimado JSD// estimado Gerson ... muchas gracias por su ayuda y preocupacion , excelente .. cumple con lo que requeria..(exceleente) disculpen la frescura pero.. para futuros..me agradaria entender el significado o lo que estoy diciendo con esto Dim Ctl As Control: Dim Ctl2 As Control For Each Ctl2 In Me.Controls If TypeOf Ctl2 Is MSForms.Frame Then For Each fram In Ctl2.Controls If fram.Value Then With Hoja2 vuf = .Range("B" & .Rows.Count).End(xlUp).Row + 1 Gracias JSD//, gracias Gerson muy agradecido de todos uds..
  13. Estimado JSDJSD buenas tardes a todos los grandes Maestro.. espero este bien ... bien la verdad quisiera su ayuda para un formulario de salidas el trabajo es con botones opciones (por lo rapido ) y quiero saber si puede llevar el concepto o caption del Frame (Buzo de Papel) y el concepto de la opcion seleccionda (Talla - S) a planilla hoja de salida Existencias .xlsm
  14. estimado JSD// por favor disculpa que te moleste..el archivo de lo valores en listbox super pero al aplicar la Sintaxis en mi formulario me aparace un Error que estare haciendo mal 

    cambie el nro de formulario de uno a Userform4 

    y el nombre de la hoja1 al de Compra de donde sale el listbox 

    image.thumb.png.766f0e94718025147044e81acc67a69a.png

    1. meduvilla

      meduvilla

      Ya... encontre el problema que tenia... ya estamos  bien con el formulario

    2. JSDJSD

      JSDJSD

      Ok, si tienes algún problema sube tu archivo al foro.

  15. Eeeexxcelenteee....Sensei...JSD//.muchisimas gracias ... es lo que necesito... te pasates... ( Caso cerrado... como alguien dice en la TV)
  16. Estimado Sensei JSD// excelente ... es lo que buscaba....pero la idea es que siempre esten los valores en pantalla del listbox No tansolo cuando busque por fecha , se puede gran maestro?
  17. Estimados Maestros , envio algo mas espesifico por si se entendio mi solicitud.. es algo asi lo que necesito que sume columnas dentro del listbox
  18. Estimados Maestros , envio algo mas espesifico por si se entendio mi solicitud.. es algo asi lo que necesito que sume columnas dentro del listbox
  19. muchas gracias mi estimado DiegoLG, pero No plica para lo que necesito atte
  20. Buenos dias Maestros..espero todos esten bien .. aqui otra ves ...molestando... por favor me pueden ayudar en esta solicitud tengo un listbox y necesito que este muestre en su pantalla la suma total de la culumna Neto, Iva y Total lo ideal seria que tambien muestre la cantidad de registro que esta considerando en las sumas Cantidad de facturas : xxxx Total Neto : xx Total Iva : x Total $ : xxx es posible dentro del listbox? desde ya Gracias Totales a Todos totales en listbox.xlsm
  21. gracias Mister JSDJSD.... quedo super... el formulario gracias
  22. gracias Mister,,, te pasastes..por la gran ayuda... seria bueno cuando le de enter al Textbox3 "de el mensaje "y no al grabar o en el boton de grabar... puedes...por favor
  23. Hola a todos...estimados... por favor me pueden ayudar...pls..pls.. la idea es que el formulario controle que No se repitan las facturas de un mismo proveedor ..(adjunto form.) se podra? desde ya agracias totales repfactura.xlsm
  24. adjunto por si sirve de ayuda lo que tengo en el formuario de facturas (k no puedo cargar el form.) Option Explicit Const TPCIVA As Integer = 19 'Porcentaje de IVA ----------------------------------------------------------------------------------------------------------------- Private Sub CommandButton1_Click() Dim Ulinea As Long On Error Resume Next Sheets("compras").Select 'llevar desde formulario a planilla excel' Ulinea = Range("a" & Rows.Count).End(xlUp).Row + 1 Range("B" & Ulinea).Value = Me.TextBox4.Text Range("C" & Ulinea).Value = Me.TextBox18.Text Range("D" & Ulinea).Value = Me.TextBox2.Text Me.TextBox2.Text = "" Me.TextBox4.Text = "" Me.TextBox18.Text = "" TextBox2.SetFocus End Sub -------------------------------------------------------------------------------------------------------------------------------- Private Sub CommandButton3_Click() 'boton de salida' End End Sub ------------------------------------------------------------------------------------------------------------------------------ Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Dim rut$ Dim uF& Dim cel As Range ' ingreso rut proveedor Select Case Len(TextBox2.Value) Case 2 TextBox2.Value = TextBox2.Value & "." Case 6 TextBox2.Value = TextBox2.Value & "." Case 10 TextBox2.Value = TextBox2.Value & "-" End Select '--> Código por Haplo - 02/03/2019 <-- 'completar los textbox' If KeyCode = vbKeyReturn Then rut = TextBox2 uF = Sheets("Datos").Range("B" & Rows.Count).End(xlUp).Row Set cel = Sheets("Datos").Range("B4:B" & uF).Find(rut, lookat:=xlWhole) If Not cel Is Nothing Then TextBox3 = cel.Offset(, 1) TextBox18 = cel.Offset(, 1) TextBox12 = cel.Offset(, -1) TextBox13 = cel.Offset(, 2) TextBox14 = cel.Offset(, 3) TextBox15 = cel.Offset(, 4) TextBox16 = cel.Offset(, 5) TextBox17 = cel.Offset(, 6) Else MsgBox "El rut no existe" & vbNewLine & vbNewLine & "Compruebe rut ", vbCritical, "Error de rut" Exit Sub End If End If End Sub
  25. arch. con 568 kb y nos permite solo cargar 102 kb...
×
×
  • Create New...

Important Information

Privacy Policy