Jump to content

jik

Members
  • Content Count

    29
  • Joined

  • Last visited

About jik

  • Rank
    Member

Profile information

  • Gender
    Hombre
  • Localización:
    Santiago, Chile

Converted

  • Campos
    ,

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Hola a todos, Espero poder explicarme bien. Adjunto archivo y a continuación la explicación. Tengo una gran base de datos de la cual necesito pasar los datos de 2 columnas no contiguas a filas mientras éstos tengan el mismo ID. En el ejemplo, a partir de la columna L (marcado en rojo) pongo intercalado los valores de la columna K y D en la misma fila mientras el ID_FORMULA (columna A) sea igual y siempre en la primera fila del grupo (por grupo me refiero a igual valor en columna A). Aclaro que la cantidad de filas por ID no es fija. Ejemplo.xlsxPuede ser desde 2 filas hasta
  2. Hola. Muchas gracias por la respueta pero no la entendí. Que quiere decir?
  3. Muchas gracias....hay alguna forma de poder hacerlo de forma automática cuando se abre el archivo?
  4. Hola. Estoy declarando una variable de una ruta al abrir un libro para después utilizarla en varios módulos. La pruebo con MsgBox y la variable queda bien declarada pero al tratar de utilizarla en otro módulo su valor (también probado con una msgbox) queda en blanco. ¿por qué me pasa esto? No soy muy experto por lo cual agradezco una explicación relativamente simple. Muchas gracias A continuación la declaración cuando se abre el libro: Option Explicit Public ImpPredeter As String Public RutaData As String ------------------------------------------------------------------------
  5. Hola a todos, Tengo un lista box que me carga la información de una tabla de 13 columnas de las cuales me interesan sólo 5 de ellas: la 1, 4, 9, 11 y 13 por lo cual oculto las que no tienen con ancho 0. El listbox carga los datos sin problema. El buscador funciona bien también pero cuando la columna es la 10 o mayor de .list es menor que 10. Va marcado en azul y negritas donde está el problema. ¿cómo puedo solucionarlo? Private Sub UserForm_Initialize() 'se definen características del Listbox (columnas, ancho, títulos) With LstBusqueda .ColumnCount = 13
  6. Hola de nuevo, Lo he hecho así: Dim i, k As Byte Dim a, c As String Dim b As Variant For i = 1 To 10 k = 3 * (i - 1) 'para ir saltando de a 3 columnas a = Controls("CbxComp" & i).Value 'código de componente a ingresar en tabla ProdStd b = Replace(Controls("TxtComp" & i & "Cant").Value, ",", ".") 'cantidad de componente a ingresar en tabla. Como es un dato de texto, se cambia la coma por punto para que la función VAL pueda comprender que hay decimal c = Controls("CbxComp" & i & "Pp").Value 'proceso de producción de cada pas
  7. Mira estoy pensando en esto: b = Controls("TxtComp" & i & "Cant").Value TxtComp1Cant, TxtComp2Cant es donde se ingresan los valores pero por algún motivo se me devuelven como texto y no puedo hacer ningún cálculo. Hay alguna forma de convertirlos a número? Saludos
  8. y si en lugar de la variable Cant1, Cant2, cito el textbox donde se han puesto dicho valores?
  9. muchas gracias. No tengo idea lo que es un array. Soy principiante.
  10. Hola a todos, Tengo la siguiente macro para ir completando una tabla a partir de valores definidos en el módulo y llamados Cant1, Cant2, Cant3.......hasta el 100 Dim i, k As Byte Dim a As String For i = 1 To 100 k = 3 * (i - 1) 'para ir saltando de a 3 columnas a = "Cant" & i 'cantidad % de componente a ingresar en tabla If a = "" Then Exit For Else Cells(FilaIngreso, 1 + k).Value = a End If Next i El bucle como tal funciona pero en lugar de ponerme los valores antes definidos de Cant1, Cant2....etc, me
  11. Hola a todos. Tengo un bucle donde el nombre del la variable de la cual necesito obtener el valor va cambiando de Cant1....a....Cant10 (he simplificado el ejemplo que sigue). Los valores de estas variables Cant1.. fueron definidos antes para todo el módulo. Dim i As Byte Dim a As String For i = 1 To 10 a = "Cant" & i Cells(Fila, 1).Value = a Next i El bucle como tal funciona pero tengo el problema que en lugar de ponerme el valor de Cant1, Cant2 (definidos antes) me escribe el texto "cant1", "cant2". Como obtengo el valor de Cant1 a Cant10? G
  12. Antoni, aprovecho a consultar: como borrar todo el contenido de las LABELS si el nombre no tiene una constante como el caso anterior?
  13. Muchas gracias por la respuesta pero no me sirve por 2 motivos: 1) borra todos los combobox del formulario y yo sólo quiero los 10 que indiqué 2) borra el contenido y la lista queda en blanco. Yo necesito que la lsita quede con contenido para elegir un nuevo valor. Saludos y muchas gracias.
×
×
  • Create New...

Important Information

Privacy Policy