kumbus

kumbus

Consultor especializado en programar bases de datos para empresas o divisiones de mediano tamaño
 22,4K puntos  Madrid, España @kumbus desde - visto
Preguntar

Preguntas y respuestas en VBA

Respuesta en y en 2 temas más a

Access, Consultas - Función Elegir(Choose) vs. Siinm(Iif)

muchas tablas=mal diseño En todo caso usa claves.
Respuesta en y en 1 temas más a

Ciclo foreach next en excel vba

Sub datos() x = 1 Dim pos, a, val a = Range("A1:A" & ActiveSheet.UsedRange.Rows.Count).Value val = 339079 pos = Application.Match(val, a, False) Cells(x, 10) = val Cells(x, 11) = Cells(pos, 6) pos = Application.Match(val, a, True) Cells(x, 12) =...
Respuesta en y en 3 temas más a

Código para guardar datos de hojas en una sola y hacer un solo listado

Hay que hacer un macro que lea todas las hojas y las escriba en una hoja DATOS. Algo como Sub consolida() filaescribe = 1 With Sheets("DATOS") For h = 2 To ActiveWorkbook.Sheets.Count For filaslee = 1 To Sheets(h).UsedRange.Rows.Count For columna = 1...
Respuesta en y en 1 temas más a

Pasar datos a un listbox y datos repetidos resumidos en una sola línea

En el evento UserForm Activate de un formulario creado en Excel Dim Boletas(10000) As String Dim BoletasRellenas(10000) As String Dim BoletasBoleta(10000) As String Dim BoletasTipo(10000) As String Private Sub UserForm_Activate() With Hoja1 b = 0...
Respuesta en y en 2 temas más a

Problemas con edición de fichero XML

El formato de guardado del archivo es importante: Ascii utf8 utf16 con bom o sin bom. Fíjate qué formato tienen los archivos de ejemplo y generalo en el mismo.
Respuesta en y en 2 temas más a

¿Formulario segmentado por catalogo vba?

Private Sub Lista0_Click() Lista2.RowSource = "SELECT Pais FROM Tabla1 WHERE id =" & "'" & Lista0.Column(0, Lista0.ListIndex) & "'" End Sub
Respuesta en y en 1 temas más a

VBA / SpecialEffect cambie al clicar Comando Botón

en el evento click Me.nombrerectangulo.SpecialEffect=1 a 6 (prueba con los números hasta que salga el efecto deseado) Despues me. Repaint