JasallBcn
Respuestas de la comunidad
-
JasallBcn's post in Validar registro duplicado formulario was marked as the answer
Buenas, te paso una forma, saludos
Base_ de_Datos_1.xlsm
-
JasallBcn's post in copiando otro dato desde un archivo cerrado, pero ajustando macro ya creada was marked as the answer
Buenas, por lo que veo sería:
en la función:
Function GetDepthFromCSV(csvData As Variant, holeID As String) As Variant cambia la línea done crea el array lineData , el delimitador de esta mal:
lineData = Split(csvData(i), ";") ' cambia "," por ";" y la captura del campo, cambia el número de columnas
GetDepthFromCSV = lineData(3) ' Asume que la columna 1 es PROF_REC ' cambio por 3 de esta manera parece que funciona como lo quieres.
saludos
survey_test2_v1.xlsm
-
JasallBcn's post in Ayuda! Buscador dinámico funciona a veces was marked as the answer
Buenas, te paso otra solución con código,
lo que hace es recorrer la tabla y guarda en una lista los resultados para luego filtrarlos.
Saludos
Ayuda buscador hoja4_ver2.xlsm
-
JasallBcn's post in Insertar datos en una fila al final de una tabla con datos con una macro was marked as the answer
Buenas, te paso el archivo modificado, también te arreglé la rutina modificación
saludos
Base de datos de alumnos2.xlsm
-
JasallBcn's post in Búsqueda de un patrón en una tabla, siendo el detonante la columna B was marked as the answer
Buenas, prueba
saludos
Archivo consulta_023516_V2.xlsm
-
JasallBcn's post in de un rango de columnas ocultar todas y dejar una visible was marked as the answer
Buenas, prueba
saludos
Ocultar columnas de un rango y dejar uno.xlsm
-
JasallBcn's post in TPV me da error was marked as the answer
Buenas, para pasar los datos a las cajas de texto
Private Sub Botón_Click() ID = Mid(Botón.Name, 2, Len(Botón.Name)) With TpvListado .xId = Hoja1.Range(ID) .xDescripción = Hoja1.Range(ID).Offset(0, 1) .xReferencia = Hoja1.Range(ID).Offset(0, 2) .xPrecio = Hoja1.Range(ID).Offset(0, 6) .xCantidad = 1 End With End Sub lo otro , no lo entiendo
saludos