calvuch

Inserta un modulo (desde el editor de visual basic ALT+F11). En ese modulo pegas esta función: Public Function extrae_numeros(cadena As String) 'extrae los digitos de una cadena de texto ' calvuch 01/08/2011 Dim i As Integer Dim res As String cadena...

Los datos están separados por ; por que no utilizas la utilidad "Texto en columnas" ubicada en pestaña datos, allí utilizas delimitador ; y te queda cada dato en una columna independiente, luego es solo tomar cada dato y cancatenarlo con el valor de...

Ok lo que necesitas es una pequeña sub para verificar si existe o no el dato a ingresar. Para ello necesitas definir el rango a recorrer ( en donde se aloja el odigo) y debes declarar una variable boleana de tipo global, la que nos indicara el...

Excel no tiene control timer, tendrías que hacerlo vía código... y de todas maneras para que tener un bucle contando segundos si para abrir archivos puedes utilizar el panel de tareas programadas de windows. Que ya hace eso. O sea para que escribir...

Lo puedes arreglar con un macro que recorra los rangos y concatene las cadenas con la cadena ":" Preguntas: ¿El autómata te pasa automáticamente los datos a la hoja excel?... ¿En qué rangos? ( Columna fecha y columna hora y desde que fila comienzan)...

Así como esta el bucle hace bien su trabajo, o sea rellenar si el TextBox1.Text <> Hoja1. Cells(k, 3) Según lo que leo de tu script el text 3 y 4 lo pasas a las columnas 10 y 11 siempre que antes exista el id del usuario, hasta allí bien. El problema...

Te falta un "end if" antes del "next" del bucle

Esta fila estas contando la columna A y debes contar la B, quedando así: iFila = ws.Cells(Rows.Count, 2).End(xlUp).Offset(1, 0).Row

Bien. Abre el editor de Visual basic (ALT +F11) Desde la barra de proyecto dale doble click al objeto Hoja9. En la ventana de edición que e abrió pegas esto Private Sub Worksheet_Change(ByVal Target As Range) Dim fila As Integer Dim hojas As Integer...

Si ese script solo "reconoce" contraseña, da igual que usuario sea. Prueba así Private Sub CommandButton1_Click() Contraseña = Usuario.Text & Contraseña.Text If Contraseña = "JUAN26937536" Then MsgBox "BIENVENIDO, Contraseña correcta", vbInformation,...