Elsa Matilde

Excel no puede determinar en un texto con varios espacios dónde empieza y termina un nombre o apellido. Además que esto es bastante subjetivo, veamos: Ramón del Valle Inclán (sin guión) puede tener 1 nombre y 2 apellidos pero para nosotros 'del...

Tal como quedamos irá un modelo para los primeros criterios y veremos cómo lo ves en el ListBox y pasas directamente a la hoja de resultados.

Solo confirma si el proceso se hará día por día o al finalizar el mes. Si fuese por día: tendríamos que se crear la hoja 1 y se vuelca al consolidado. Mañana se crea la hoja 2 y se agrega al consolidado. O quizás quieras que se ejecute hasta el...

Si la base no tiene datos hay que evitar que se ordene. Entonces como primer instrucción evalua si la primer celda esta vacía o no. Imaginemos que tu tabla tiene títulos en fila 1 y datos a partir de A2 entonces sería: Private Sub...

No me quedo muy claro como indicas cual debe ser el frame visible. Comentas: '... Para mostrar solo uno de estos frames uso otro commandbuton que hace que no hagan visibles los demás y solo quede uno que haya seleccionado, entonces ese es el CASE...'...

Una opción: estando en esta hoja llames al botón de Opciones (Botón Office), Avanzadas y quites el tilde a la opción que marco en la imagen. Otra opción: utilizar un condicional, como en esta fórmula:...

Así como es extensa tu explicación (y eso está bien) así también es extensa la respuesta. Solo te comento cual es la idea pero luego enviame un correo (los míos aparecen en la portada de mi sitio que dejo al pie) para que te envíe un pequeño ejemplo...

Esta es la macro que necesitas: Private Sub Worksheet_Change(ByVal Target As Range) 'x Elsamatilde 'se controla el ingreso en col B If Target.Column <> 2 Or Target.Count > 1 Then Exit Sub 'si la celda se borra o no hay datos en col A no se ejecuta If...

Para obtener cada dato es necesario ubicar los espacios. La instrucción LEFT te devuelve el primer campo hasta el primer espacio: dato = ActiveCell 'se busca el lugar del primer espacio ubica = InStr(1, dato, " ") TextBox1 = Left(dato, ubica - 1) La...

Ya te estoy ajustando el ejemplo enviado a mi correo. Sdos! PD) Lo siento Dam pero tenía ya iniciado este tema de una consulta anterior, solo que el usuario olvidó indicar que la consulta estaba dirigida a mi nombre.